walid7799 قام بنشر فبراير 26, 2022 قام بنشر فبراير 26, 2022 السلام عليكم ورحمة الله مطلوب كود يجعل مربع الحوار يسمح باختيار اكثر من file فى المرة الواحدة وهذا يمكن ولكن المطلوب كود يسمح باختيار اكثر من file ويتم ادرجهم تلقائيا للجدول فى نموذج مستمر وشكرا
ازهر عبد العزيز قام بنشر فبراير 26, 2022 قام بنشر فبراير 26, 2022 وغليكم السلام استخدم اسنعلام التحديث ولن تحتاج الى كود 1
Moosak قام بنشر فبراير 26, 2022 قام بنشر فبراير 26, 2022 (معدل) 2 ساعات مضت, walid7799 said: السلام عليكم ورحمة الله مطلوب كود يجعل مربع الحوار يسمح باختيار اكثر من file فى المرة الواحدة وهذا يمكن ولكن المطلوب كود يسمح باختيار اكثر من file ويتم ادرجهم تلقائيا للجدول فى نموذج مستمر وشكرا وعليكم السلام ورحمة الله وبركاته .. الكود موجود ولكن نحتاج مرفق للتطبيق عليه .. 🙂 تم تعديل فبراير 26, 2022 بواسطه Moosak
walid7799 قام بنشر فبراير 27, 2022 الكاتب قام بنشر فبراير 27, 2022 8 ساعات مضت, ازهر عبد العزيز said: استخدم اسنعلام التحديث ولن تحتاج الى كود البيانات المطلوب اضافتها مسارات الصور استعلام التحدبث ؟؟ ازاى استعمله فى كتابة المسارات فى جدول داخل قاعدة البيانات ارجو الشرح
walid7799 قام بنشر فبراير 27, 2022 الكاتب قام بنشر فبراير 27, 2022 7 ساعات مضت, Moosak said: الكود موجود ولكن نحتاج مرفق للتطبيق عليه .. 🙂 ممكن حضرتك ترسلة وانا اجربة على قاعدة البيانات عندى مش لازم مرفق
Moosak قام بنشر فبراير 27, 2022 قام بنشر فبراير 27, 2022 51 دقائق مضت, walid7799 said: ممكن حضرتك ترسلة وانا اجربة على قاعدة البيانات عندى مش لازم مرفق هل هذا هو الكود الذي تريد التعديل عليه؟
Moosak قام بنشر فبراير 27, 2022 قام بنشر فبراير 27, 2022 (معدل) تفضل هذا هو الكود 🙂 : Sub GetFiles() Dim fdialog As Office.FileDialog Dim filepath As String Dim Item As Variant Set fdialog = Application.FileDialog(msoFileDialogFilePicker) With fdialog .Title = "Select image" .AllowMultiSelect = True .Filters.Clear .Filters.Add "Image file", "*.jpg ; *.bmp ; *.png" If .Show Then For Each Item In .SelectedItems DoCmd.GoToRecord , , acNewRec filepath = .SelectedItems(1) [PthIn1] = filepath Next Else Exit Sub End If End With MsgBox "تم إضافة الملفات بنجاح" End Sub تم تعديل فبراير 27, 2022 بواسطه Moosak 1
walid7799 قام بنشر مارس 4, 2022 الكاتب قام بنشر مارس 4, 2022 شكرأ على الاهتمام أخى الكريم السلام عليكم ورحمة الله وبركاته ... هذا الكود لكى يعمل لا بد من مديزل داعم وألا أصبح يأخذ مسار واحد وأنا شغال بالكود هذا من زمان وحفظه وشكرأ
Moosak قام بنشر مارس 4, 2022 قام بنشر مارس 4, 2022 7 ساعات مضت, walid7799 said: شكرأ على الاهتمام أخى الكريم السلام عليكم ورحمة الله وبركاته ... هذا الكود لكى يعمل لا بد من مديزل داعم وألا أصبح يأخذ مسار واحد وأنا شغال بالكود هذا من زمان وحفظه وشكرأ عدلت لك الكود ليقبل أكثر من ملف ويحفظ كل مسار في سجل جديد .. 1
أبو عبدالله الحلوانى قام بنشر مارس 5, 2022 قام بنشر مارس 5, 2022 في 4/3/2022 at 02:42, walid7799 said: هذا الكود لكى يعمل لا بد من مديزل داعم وألا أصبح يأخذ مسار واحد حقيقة لم افهم قصدك ولكن هذا اكود بحاجة لاضافة مكتبة الأوقيس الخاصة بالاصدار الذي تعمل عليه من الــ refrences مثل هذه الصور ملاحظة: يختلف رقم الاصدار حسب الاصدار الذي تعمل عليه فأوفيس 2003 تقريبا اصدار الخاص به 0.11 فأوفيس 2007 تقريبا اصدار الخاص به 0.12 وهكذا وعلي كلا ان لم يكن هذا مرادك فرجاءا زيادة توضيح عن ما المشكلة التي تواجهها 1
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.