الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

عندي مشكلة واريد لها حلاً

مغلق
بدأه محمد الشملان في 20 ديسمبر 2003 · 3 رد · 546 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

اخواني اهل الخبرة صممت برنامج يحتوي على واجة وعددة روابط ومجموعة برامج EXE على CD واريد اذا ضغطت على الكماند يقوم بفتح احد البرامج المدمجة بــCD مثال :

Dim D

D = Shell(App.Path & "\نفترض انه اسم مسار الملف\SETUP.exe", 1)

ولكن هذا الكود لايعمل اذا كان على السيدي ارجو مكم الاجابة وشكراً

#2

Shell app.path & "/setup.exe", vbNormalFocus

#3

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

ارجو منكم الافادة وجزاكم الله خيراّ

#4

أخوي

لما تكتب

app.path

إذا كنت داخل فولدر رح يعطيك

c:\bas

أما إذا كنت على الروت

C:\

مشان هيك إذا كنت بدك تشغل البرنامج من السي دي فورا لازم ماتضع علامة الباك سلاش

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

dim Path_P as string 
Path_p=app.path 
if len(Path_p)=3 then 
Path_p=app.path & "Name the Folder"
else
Path_p=app.path & "\Name the folder"
end if

وشكرا

CMS Sfhati , Website Generator


نظام إدارة المحتوى صفحتي ... جربه الآن 


 


small-logo.png

هذا الموضوع مغلق.

مواضيع مشابهة