ازهر عبد العزيز قام بنشر فبراير 25, 2022 مشاركة قام بنشر فبراير 25, 2022 (معدل) السلام عليكم في النموذج Fimg مريع صورة مسار الصورة له هو ="C:\bookimg\img\1.jpg" كيف اجغل هذا المسار مخصص لفولدر قاعدة البيانات اي لو تم نقل فلودر قاعدة البيانات الى بارتيسن اخر ولنفرض e لايتاثر مسار الصورة بمعنى ماذا اضع بدل حرف c ليفهم الاكسس ان هذة الصورة موجوده في قولدر قاعدة البيانات دائما bookimg.rar تم تعديل فبراير 25, 2022 بواسطه ازهر عبد العزيز رابط هذا التعليق شارك More sharing options...
أفضل إجابة Eng.Qassim قام بنشر فبراير 25, 2022 أفضل إجابة مشاركة قام بنشر فبراير 25, 2022 وعليكم السلام استاذ ازهر طالما ان الصور في نفس الفولدر استخدم الكود التالي في حدث الحالي وشاهد النتيجة Private Sub Form_Current() Dim Path As String Path = Application.CurrentProject.Path & "\img\" Me![صورة0].Picture = Path & "1.jpg" End Sub 1 رابط هذا التعليق شارك More sharing options...
ازهر عبد العزيز قام بنشر فبراير 25, 2022 الكاتب مشاركة قام بنشر فبراير 25, 2022 (معدل) جزبل الشكر بااخي وهو المطلوب تم تعديل فبراير 25, 2022 بواسطه ازهر عبد العزيز رابط هذا التعليق شارك More sharing options...
Eng.Qassim قام بنشر فبراير 25, 2022 مشاركة قام بنشر فبراير 25, 2022 بالخدمة رابط هذا التعليق شارك More sharing options...
jjafferr قام بنشر فبراير 25, 2022 مشاركة قام بنشر فبراير 25, 2022 وتكملة لكود اخي المهندس قاسم ، في حال لم يكن هناك صورة في المسار: Private Sub Form_Current() on error goto err_Form_Current Dim Path As String Path = Application.CurrentProject.Path & "\img\" Me![صورة0].Picture = Path & "1.jpg" Exit_Form_Current: exit sub err_Form_Current: if err.number=2220 then 'No image in path Me![صورة0].Picture = "" resume next else msgbox err.number & vbcrlf & err.description resume Exit_Form_Current end if End Sub جعفر 3 رابط هذا التعليق شارك More sharing options...
Eng.Qassim قام بنشر فبراير 25, 2022 مشاركة قام بنشر فبراير 25, 2022 احسنت استاذي القدير @jjafferr فربما يتم مسح احدى الصور بطريق الخطأ رابط هذا التعليق شارك More sharing options...
ازهر عبد العزيز قام بنشر فبراير 25, 2022 الكاتب مشاركة قام بنشر فبراير 25, 2022 منذ ساعه, jjafferr said: وتكملة لكود اخي المهندس قاسم ، في حال لم يكن هناك صورة في المسار: جزبل الشكر استاذ على هذا الكود الاكثر من رائع رابط هذا التعليق شارك More sharing options...
mrbakr قام بنشر فبراير 26, 2022 مشاركة قام بنشر فبراير 26, 2022 جزاكم الله كل خير رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.