Bonjour
J'ai un base en Access 97, je cherche le moyen de stocker dans un champs le
chemin d'acces d'une photos et de pouvoir visualiser celle-ci en mode etats.
Car pour le moment, la photo est stocké dans la base elle-même ce qui a
tendance à la faire grossire, et arrive bientot à la limite du 1 Go.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
titisoft43
Private Sub ButImg1_Click() Dim Chem As String If Len(Chem) = 0 Then Chem = String(257, 0) End If Me.Img1 = ap_FileOpen2("Alliance ", Chem) Call Imag1 End Sub
Public Sub Imag1() If IsNull(Me.Img1) Then Else Me.OLE1.OLETypeAllowed = 0 Me.OLE1.SourceDoc = LTrim(Me.Img1) Me.OLE1.Action = 1 SendKeys "{F9}", True End If End Sub "HBTVS" a écrit dans le message de news:%
Bonjour J'ai un base en Access 97, je cherche le moyen de stocker dans un champs le
chemin d'acces d'une photos et de pouvoir visualiser celle-ci en mode etats.
Car pour le moment, la photo est stocké dans la base elle-même ce qui a tendance à la faire grossire, et arrive bientot à la limite du 1 Go.
Merci d'avance HBTVS
Private Sub ButImg1_Click()
Dim Chem As String
If Len(Chem) = 0 Then
Chem = String(257, 0)
End If
Me.Img1 = ap_FileOpen2("Alliance ", Chem)
Call Imag1
End Sub
Public Sub Imag1()
If IsNull(Me.Img1) Then
Else
Me.OLE1.OLETypeAllowed = 0
Me.OLE1.SourceDoc = LTrim(Me.Img1)
Me.OLE1.Action = 1
SendKeys "{F9}", True
End If
End Sub
"HBTVS" <any@one.com> a écrit dans le message de
news:%23lsiVKQZEHA.2456@TK2MSFTNGP10.phx.gbl...
Bonjour
J'ai un base en Access 97, je cherche le moyen de stocker dans un champs
le
chemin d'acces d'une photos et de pouvoir visualiser celle-ci en mode
etats.
Car pour le moment, la photo est stocké dans la base elle-même ce qui a
tendance à la faire grossire, et arrive bientot à la limite du 1 Go.
Private Sub ButImg1_Click() Dim Chem As String If Len(Chem) = 0 Then Chem = String(257, 0) End If Me.Img1 = ap_FileOpen2("Alliance ", Chem) Call Imag1 End Sub
Public Sub Imag1() If IsNull(Me.Img1) Then Else Me.OLE1.OLETypeAllowed = 0 Me.OLE1.SourceDoc = LTrim(Me.Img1) Me.OLE1.Action = 1 SendKeys "{F9}", True End If End Sub "HBTVS" a écrit dans le message de news:%
Bonjour J'ai un base en Access 97, je cherche le moyen de stocker dans un champs le
chemin d'acces d'une photos et de pouvoir visualiser celle-ci en mode etats.
Car pour le moment, la photo est stocké dans la base elle-même ce qui a tendance à la faire grossire, et arrive bientot à la limite du 1 Go.
