للمحترفين بالبيسك دوت نت .... الرجاء المساعدة
2 مشترك
صفحة 1 من اصل 1
للمحترفين بالبيسك دوت نت .... الرجاء المساعدة
انا حاب اسأل عن البرمجة بلغة بيسك دوت نت
لو عملنا فورم
وداخله بوتون
وبدي لما اعمل رن للبرنامج واكبس عالبوتون يشغلي برنامج محفوظ اصلا بالجهاز
مثلا بدي اشغل
برنامج ال
regedit
والي موجود بكل كمبيوتر على
C:\WINDOWS\system32\regedt32.exe
كيييييييييييييييييف
ارجو المساعدة ضروري لأني مليت وانا بدور وأسأل وما كنت القى جواب
لو عملنا فورم
وداخله بوتون
وبدي لما اعمل رن للبرنامج واكبس عالبوتون يشغلي برنامج محفوظ اصلا بالجهاز
مثلا بدي اشغل
برنامج ال
regedit
والي موجود بكل كمبيوتر على
C:\WINDOWS\system32\regedt32.exe
كيييييييييييييييييف
ارجو المساعدة ضروري لأني مليت وانا بدور وأسأل وما كنت القى جواب
shakespere- مشرف
- عدد الرسائل : 81
العمر : 37
الجامعه : ال البيت
التخصص : C I S
السنه الدراسيه : 0
sms : تبا لهذا العالم الذي لم يستطع إلى الآن ان يصنع أصوات من نحبهم أقراصا" نتناولها حين نصاب بوعكة الأشتياق
:
تاريخ التسجيل : 10/04/2008
رد: للمحترفين بالبيسك دوت نت .... الرجاء المساعدة
انا اللي بعرفه انه تقدر انت تعمل لنش ومينوتر لملف او برنامج موجود باستخدام الفي بي دوت نت ياستخدام
shell
يعني على سبيل المثال
id=shell(C:\WINDOWS\system32\regedt32.exe,vbNormalFocus)
او اذا بدك تشغل ملف موجود
System.Diagnostics.Process.Start _
("C:\WINDOWS\system32\regedt32.exe")
واذا ما فهمت اشي احكيلي عشان اعمل بحث تقني على الانترنت
shell
يعني على سبيل المثال
id=shell(C:\WINDOWS\system32\regedt32.exe,vbNormalFocus)
او اذا بدك تشغل ملف موجود
System.Diagnostics.Process.Start _
("C:\WINDOWS\system32\regedt32.exe")
واذا ما فهمت اشي احكيلي عشان اعمل بحث تقني على الانترنت
قصي- رئيس المنتدى
- عدد الرسائل : 316
العمر : 36
الجامعه : ال البيت
sms : <!--- MySMS By AlBa7ar Semauae.com -->
<form method="POST" action="--WEBBOT-SELF--">
<!--webbot bot="SaveResults" u-file="fpweb:///_private/form_results.csv" s-format="TEXT/CSV" s-label-fields="TRUE" --><fieldset style="padding: 2; width:208; height:104">
<legend><b>My SMS</b></legend>
<marquee onmouseover="this.stop()" onmouseout="this.start()" direction="up" scrolldelay="2" scrollamount="1" style="text-align: center; font-family: Tahoma; " height="78">منتدى اهران</marquee></fieldset></form>
<!--- MySMS By AlBa7ar Semauae.com -->
:
تاريخ التسجيل : 26/11/2007
رد: للمحترفين بالبيسك دوت نت .... الرجاء المساعدة
وهاي جبتلك برنامج يعمل فتح لشاشة اوامر الدوس ما عليك الا انك تغير اسم الملف من
cmd.exe
الى اسم الملف الذي تريد فتحه وانشالله تزبط معك لاني متا جربتها وبالتوفيق
Dim myProcess As Process = New Process()
Dim s As String
myProcess.StartInfo.FileName = "cmd.exe"
myProcess.StartInfo.UseShellExecute = False
myProcess.StartInfo.CreateNoWindow = True
myProcess.StartInfo.RedirectStandardInput = True
myProcess.StartInfo.RedirectStandardOutput = True
myProcess.StartInfo.RedirectStandardError = True
myProcess.Start()
Dim sIn As StreamWriter = myProcess.StandardInput
sIn.AutoFlush = True
Dim sOut As StreamReader = myProcess.StandardOutput
Dim sErr As StreamReader = myProcess.StandardError
sIn.Write("dir c:\windows\system32\*.com" & _
System.Environment.NewLine)
sIn.Write("exit" & System.Environment.NewLine)
s = sOut.ReadToEnd()
If Not myProcess.HasExited Then
myProcess.Kill()
End If
MessageBox.Show("The 'dir' command window was " & _
closed at: " & myProcess.ExitTime & "." & _
System.Environment.NewLine & "Exit Code: " & _
myProcess.ExitCode)
sIn.Close()
sOut.Close()
sErr.Close()
myProcess.Close()
MessageBox.Show(s)
cmd.exe
الى اسم الملف الذي تريد فتحه وانشالله تزبط معك لاني متا جربتها وبالتوفيق
Dim myProcess As Process = New Process()
Dim s As String
myProcess.StartInfo.FileName = "cmd.exe"
myProcess.StartInfo.UseShellExecute = False
myProcess.StartInfo.CreateNoWindow = True
myProcess.StartInfo.RedirectStandardInput = True
myProcess.StartInfo.RedirectStandardOutput = True
myProcess.StartInfo.RedirectStandardError = True
myProcess.Start()
Dim sIn As StreamWriter = myProcess.StandardInput
sIn.AutoFlush = True
Dim sOut As StreamReader = myProcess.StandardOutput
Dim sErr As StreamReader = myProcess.StandardError
sIn.Write("dir c:\windows\system32\*.com" & _
System.Environment.NewLine)
sIn.Write("exit" & System.Environment.NewLine)
s = sOut.ReadToEnd()
If Not myProcess.HasExited Then
myProcess.Kill()
End If
MessageBox.Show("The 'dir' command window was " & _
closed at: " & myProcess.ExitTime & "." & _
System.Environment.NewLine & "Exit Code: " & _
myProcess.ExitCode)
sIn.Close()
sOut.Close()
sErr.Close()
myProcess.Close()
MessageBox.Show(s)
قصي- رئيس المنتدى
- عدد الرسائل : 316
العمر : 36
الجامعه : ال البيت
sms : <!--- MySMS By AlBa7ar Semauae.com -->
<form method="POST" action="--WEBBOT-SELF--">
<!--webbot bot="SaveResults" u-file="fpweb:///_private/form_results.csv" s-format="TEXT/CSV" s-label-fields="TRUE" --><fieldset style="padding: 2; width:208; height:104">
<legend><b>My SMS</b></legend>
<marquee onmouseover="this.stop()" onmouseout="this.start()" direction="up" scrolldelay="2" scrollamount="1" style="text-align: center; font-family: Tahoma; " height="78">منتدى اهران</marquee></fieldset></form>
<!--- MySMS By AlBa7ar Semauae.com -->
:
تاريخ التسجيل : 26/11/2007
رد: للمحترفين بالبيسك دوت نت .... الرجاء المساعدة
كبييييييييييييييييييييييييييييير
ما انسالك المعروف يا غالي
اشكرك
اشكرك
اشكررررررررررررررررررررررررررررككك
بس بدي اسألك ..... بعرف اني ثقلتها عليك
شو كتبت لما بحثت عالجوجل
شو الكلمة المفتاحية للبحث
ما انسالك المعروف يا غالي
اشكرك
اشكرك
اشكررررررررررررررررررررررررررررككك
بس بدي اسألك ..... بعرف اني ثقلتها عليك
شو كتبت لما بحثت عالجوجل
شو الكلمة المفتاحية للبحث
shakespere- مشرف
- عدد الرسائل : 81
العمر : 37
الجامعه : ال البيت
التخصص : C I S
السنه الدراسيه : 0
sms : تبا لهذا العالم الذي لم يستطع إلى الآن ان يصنع أصوات من نحبهم أقراصا" نتناولها حين نصاب بوعكة الأشتياق
:
تاريخ التسجيل : 10/04/2008
رد: للمحترفين بالبيسك دوت نت .... الرجاء المساعدة
والله ناسيها يا شكسبير لكن حط
run exiting file using vb.net
run exiting file using vb.net
قصي- رئيس المنتدى
- عدد الرسائل : 316
العمر : 36
الجامعه : ال البيت
sms : <!--- MySMS By AlBa7ar Semauae.com -->
<form method="POST" action="--WEBBOT-SELF--">
<!--webbot bot="SaveResults" u-file="fpweb:///_private/form_results.csv" s-format="TEXT/CSV" s-label-fields="TRUE" --><fieldset style="padding: 2; width:208; height:104">
<legend><b>My SMS</b></legend>
<marquee onmouseover="this.stop()" onmouseout="this.start()" direction="up" scrolldelay="2" scrollamount="1" style="text-align: center; font-family: Tahoma; " height="78">منتدى اهران</marquee></fieldset></form>
<!--- MySMS By AlBa7ar Semauae.com -->
:
تاريخ التسجيل : 26/11/2007
shakespere- مشرف
- عدد الرسائل : 81
العمر : 37
الجامعه : ال البيت
التخصص : C I S
السنه الدراسيه : 0
sms : تبا لهذا العالم الذي لم يستطع إلى الآن ان يصنع أصوات من نحبهم أقراصا" نتناولها حين نصاب بوعكة الأشتياق
:
تاريخ التسجيل : 10/04/2008
صفحة 1 من اصل 1
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى