طلب كود رفع ملفات pdf & الصور داخل مجلد معين

[adnan3ali]

السلام عليكم ورجمة الله وبركاته 

كل عام وانتم بالف صحة وعافية 

عندي معضلة بحثت عن حلها حتى يئست  

تمنياتى من الاخوه تقديم المساعدة في حلها 

المشكله هي في رفع ملفات الصور والبدي اف داخل مجلد تم انشائه برقم القيد

بارك الله مقدما لكل من شارك او ساهم 

 

جديد.accdb

تم تعديل أبريل 12, 2024 بواسطه adnan3ali
تعديل الملف

[محمد احمد لطفى]

تفضل هل هذا ما تريد بالتوفيق

 

جديد.accdb

تم تعديل أبريل 12, 2024 بواسطه محمد احمد لطفى

[adnan3ali]

ما اريده هوه ان الله يوفقك دنيا واخرة 

باقي نقطه ان تكرمت عليا 

اذا امكن عرض مسار الملف ( المجلد)  على هيئة رابط تشعبي 

شاكرا ومقدرا 

[محمد احمد لطفى]

تفضل

مسار المجلد.rar مسار الملف.rar

[adnan3ali]

فضّلك الله على خلقه وبارك فيك  

هوه هذا المطلوب

 

[adnan3ali]

يا استاذ محمد هل بالامكان تحويل مسار المجلد كرابط يفتح المجلد 

[محمد احمد لطفى]

تفضل 
 

    Dim folderPath As String
        folderPath = Me.linkx
    '  or
    '    folderPath = "d:\MyFolder\" & Me.ID
    ' فتح المجلد
    Shell "explorer.exe """ & folderPath & """", vbNormalFocus

ضع الامر فى حدث عند النقر على حقل المسار 
أو من خلال الزرار فتح المجلد كما تريد     

[adnan3ali]

فتح الله عليك فتوح العارفين