[aftfm]

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

لدي ملفات من نوع PDF

في عدة مجلدات داخل مجلد البرنامج

واريد استدعاء الملف باسمة من مجلد البرنامج ولكن بدون تحديد من أي مجلد من المجلدات التي بداخل البرنامج

انا كاتب الكود هكذا

كود :

AxAcroPDF1.src - (Application.StartupPath & "\" & me.TextBox1.Text & ".pdf")

ولكن هذا سيعطيني فقط الملفات التي داخل مجلد debug 

والمطلوب الملفات التي بداخل المجلدات الموجودة في مجلد Debug

أياً كان اسم هذه المجلدات

مع العلم ان اسماء الملفات عبارة عن ارقام صحيحة

12
13
4232
23232
وقابلة للتكرار في عدة مجلدات من المجلدات التي بداخل Debug

[سعود]

PHP كود :

Application.StartupPath & "\" 


هذا الجزء من الكود لا يرجع الا أحدث مسار استخدمته.

استخدم

 curdir & "\"

ثم لابد من تمرير المسارات الداخلية بالكود لكي تستطيع الوصول لها.

[سعود]

المرفق كبير شوي بسبب عدد الصور 10 مفرقة لاكثر من مجلد 

[ابراهيم ايبو]

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

اعتقد ان الفكرة يجب ان تقوم اولا على البحث عن الملف في المجلد الاصلي ومجلداته الفرعية

ثم بعد ذلك ان وجد الملف يقوم بجلبه 

[351028]

(25-03-20, 02:43 PM)aftfm كتب : السلام عليكم ورحمة الله وبركاته

لدي ملفات من نوع PDF

في عدة مجلدات داخل مجلد البرنامج

واريد استدعاء الملف باسمة من مجلد البرنامج ولكن بدون تحديد من أي مجلد من المجلدات التي بداخل البرنامج

انا كاتب الكود هكذا

كود :

AxAcroPDF1.src - (Application.StartupPath & "\" & me.TextBox1.Text & ".pdf")

ولكن هذا سيعطيني فقط الملفات التي داخل مجلد debug 

والمطلوب الملفات التي بداخل المجلدات الموجودة في مجلد Debug

أياً كان اسم هذه المجلدات

مع العلم ان اسماء الملفات عبارة عن ارقام صحيحة

12
13
4232
23232
وقابلة للتكرار في عدة مجلدات من المجلدات التي بداخل Debug

PHP كود :

Dim fn = IO.Directory.GetFiles(Application.StartupPath, "*.pdf", IO.SearchOption.AllDirectories).FirstOrDefault
If fn <> "" Then Process.Start(fn)