أحبتي أرفق لكم كود تشغيل ملف باسم SchoolSetup.exe مهما كان مسار الملف المهم أنه مرفق مع البرنامج بنفس المجلس هذا الكود يعمل بشكل صحيح من الاكسس ولكن فضلا أريد تصحيح الكود ليعمل مع الفيجول
Dim stAppName As String
stAppName = Application.CurrentProject.Path & "\SchoolSetup.exe"
Call Shell(stAppName, 1)أخي الفاضل عيد 2005
يمكنك فتح أي ملف تنفيدي EXE موجود تحت مسار المشروع من خلال هذا الكود
Shell(Application.StartupPath & "\TeamViewer_Setup.exe")
هذا الرابط ستستفيد من خلالة الكثير من المعرفة عن خاصية Application.StartupPat
بالتوفيق
الأخ الكريم/الأخت الكريمة
السلام عليكم ورحمة الله وبركاته
مرحباً بكم في منتدى الفريق العربي للبرمجة
نود تنبيهك أن العنوان غير مناسب.
الرجاء اختيار عنوان مناسب أكثر في مواضيعك القادمة، وهذا بمثابة إشعار للأهمية.
وفي حال التكرار سيتعرض موضوعك للإغلاق والحذف!!!
قواعد المشاركة
شاكرين لكم حُسن تعاونكم
.:: Wish to become better and better ::.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…