اذهب إلى المحتوى
  • 0

كيف أقوم بتنفيذ سكريبت VB من خلال #C

Mokhtar Ahmed2

السؤال

السلام عليكم ورحمة الله
هناك اسكربت  ( Vbscript ) باسم RebootRouter.vbs والملف معروف أنه يستخدم خدمة Telnet في التنفيذ ويتم تنفيذه بشكل صحيح في حال النقر عليه مباشرة من أي مجلد
محتويات الاسكربت كالتالي :

Option Explicit
On Error Resume Next
Dim WshShell
set WshShell=CreateObject("WScript.Shell")
WshShell.run "cmd.exe"
WScript.Sleep 1000
'Send commands to the window as needed - IP and commands need to be customized
'Step 1 - Telnet to remote IP'
WshShell.SendKeys "telnet 192.168.1.1"
WshShell.SendKeys ("{Enter}")
WScript.Sleep 1000
'Step 2 - Issue Commands with pauses'
WshShell.SendKeys "HereRouterUser"
WScript.Sleep 1000
WshShell.SendKeys ("{Enter}")
WScript.Sleep 1000
WshShell.SendKeys "HereRouterPassword"
WScript.Sleep 1000
WshShell.SendKeys ("{Enter}")
WScript.Sleep 1000
WshShell.SendKeys "enable"
WScript.Sleep 1000
WshShell.SendKeys ("{Enter}")
WScript.Sleep 1000
WshShell.SendKeys "admin"
WScript.Sleep 1000
WshShell.SendKeys ("{Enter}")
WScript.Sleep 1000
WshShell.SendKeys "sys reboot"
WScript.Sleep 1000
WshShell.SendKeys ("{Enter}")
WScript.Sleep 1000

لكن المشكلة أنني غير قادر على تنفيذه بشكل صحيح في حال وجود الملف في نفس مسار البرنامج المصمم بـ #C .
بحثت كثيراً عن طريقة لتنفيذ الملف من خلال #C ولم أفلح للأسف
من يعرف لا يبخل علينا بالمعلومة 
وجزا الله الجميع الخير والبركة 

رابط هذا التعليق
شارك على الشبكات الإجتماعية

Recommended Posts

  • 0

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

على اعتبار ان ملف السكربت موجود على القرص C، نقوم بتشغيله من سي شارب كأي تطبيق أخر بالشكل التالي:

System.Diagnostics.Process.Start(@"cscript //B //Nologo c:\RebootRouter.vbs");

 

تم التعديل في بواسطة طارق جهاد
رابط هذا التعليق
شارك على الشبكات الإجتماعية

  • 0

بارك الله فيك أستاذ طارق 
لكن للاسف لا يعمل الاسكربت بالشكل المطلوب حيث تطرح كل أوامره أخطاء
سأحاول أن اقوم بحلها برمجياً بدلاً من استدعاء الاسكربت - والله المستعان

رابط هذا التعليق
شارك على الشبكات الإجتماعية

انضم إلى النقاش

يمكنك أن تنشر الآن وتسجل لاحقًا. إذا كان لديك حساب، فسجل الدخول الآن لتنشر باسم حسابك.

زائر
أجب على هذا السؤال...

×   لقد أضفت محتوى بخط أو تنسيق مختلف.   Restore formatting

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   جرى استعادة المحتوى السابق..   امسح المحرر

×   You cannot paste images directly. Upload or insert images from URL.

  • إعلانات

  • تابعنا على



×
×
  • أضف...