30-08-18, 07:11 PM
(30-08-18, 06:08 PM)anoname كتب : لقد قمت باصلاح مشاكل بهاذا الكود
و اما عن الكودكود :
Dim p As Process = New Process()
Dim pi As ProcessStartInfo = New ProcessStartInfo()
If (permanent = True) Then
pi.Arguments = " " + "/K" & "/C" + " " + command + " " + arguments
End If
pi.FileName = "cmd.exe"
p.StartInfo = pi
p.Start()
فان الفيجوال يقول ان الخاصية MyUtilities لم تصرح و ارجوا حل سريع لهاذا الكود الثاني الصغيركود :
MyUtilities.RunCommandCom("DIR", "/W", true)
عفواً لم تصله لانه يجب وضع الكود داخل كلاس مستقل بهذا الاسم
اما فى نفس ملف كود الفورم او فى ملف كلاس مستقل وفى هذه الحالة ستقوم بتعريف الكلاس
فلا يلزم كل ذلك فقط استبدل سطر الكود بهذا السطر
كود :
RunCommandCom("DIR", "/W", true)واستخدم كود الـ Sub بشكل طبيعي
وبكده سيعمل معك بدون اى مشكلة
تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى
لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
▼ شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]
ساهم دائماً فى
لكل من يقوم بالمساهمةفى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
▼ شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية

