Originally Posted by Fuse3k
If Not Dir(Me.Text48.Value, vbDirectory) = vbNullString Then
OK, that helped.
I tried the following:
Dim nullStr As String
Dim defaultStr As String
Dim currStr As String
nullStr = "c:\BowlPhotos\Thumbs\tmb.jpg"
defaultStr = "C:\BowlPhotos\Thumbs\NoBowltmb.jpg"
currStr = Me.Text48.Value
Me.Image58.Picture = nullStr
If Not Dir(currStr, vbDirectory) = currStr Then
Me.Image58.Picture = currStr
Me.Image58.Picture = defaultStr
- in that it gives the null image both when there is no product, AND
when there is a product but no image - but provides the proper image when one exists.
code does not seem to work, since it does not show the default "No Image
" image when a product exists and there is no existing image...
This will suffice for now - but I would like to know why the else code does not seem to work...