سوال: نحوه استفاده از ole object برای درج تصویر در بانک اکسس و نمایش ان در فرمها و گزارشها [بایگانی]

bahram_ariana

چهارشنبه 18 آذر 1394, 13:12 عصر

با سلام و خسته نباشید
دوستان عزیر می خواستم ببینم چه جوری میشه با کمک فیلد از نوع ole object برای درج تصویر در بانک اکسس و نمایش ان در فرمها و گزارشها استفاده کرد؟ با تشکر فراوان

mohammadsaleh

چهارشنبه 18 آذر 1394, 16:35 عصر

استفاده از اين ابجكت توصيه نميشه. بهتره يك فولدر بسازيد و عكسهاتون را با شماره خاصي كه در جدولتون هست هماهنگ كنيد. روي فرمتون يك كنترل تصوير بگذاريد. براي نمايش عكس كافي است در رويداد آن كارنت محل تصوير را آدرس دهي كنيد.

نحوه كد نويسي:
https://support.microsoft.com/en-us/kb/285820

يا از كد ساده زير استفاده كني

Function setImagePath()
Dim strImagePath As String
On Error GoTo PictureNotAvailable
strImagePath = Me.memProperyPhotoLink
Me.memProperyPhotoLink.Locked = True
Me.memProperyPhotoLink.Enabled = False
Me.ImageFrame.Picture = strImagePath
Exit Function
PictureNotAvailable:
strImagePath = "C:\db_Images\NoImage.gif"
Me.ImageFrame.Picture = strImagePath
End Function