Cannot insert Pictures again

P

Peter

Hi,

We manage to insert the photos for Employee (JPG Files) on
our database.

However, we would like to allow end users to insert the
photos by themselves (i.e. giving them the choice of the
location and drive that they can insert the JPG file) ?

I have given an advice to use the MS Common Dialog Control
but there is problem. Some one advices me to use the
Common Dialog API in an Access Database.
http://support.microsoft.com/?kbid=303066

In this way, I change the coding as follow:

Private Sub Command1_Click()
Dim strFile As String
If LaunchCD(Me) <> "" Then
ImageBox.SourceDoc = LaunchCD(Me)
ImageBox.OLETypeAllowed = acOLELinked
ImageBox.Action = 1
End If
End Sub

ImageBox is the name of the container for the JPG file.

It works when we insert graphics in ImageBox if it is
blank (ie insert graphics successfully the first time).
However, when we attempt to insert again, there is error.
And it points to the line "ImageBox.Action = 1".

Your advice is sought.
 
Top