منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : كيف يمكن تنفيذ امر داخل الباور شل
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم اخوتي ممكن مساعدة في تنفيذ امر داخل الباور شل ..... يعني عند الضغط على البوتن يتم تنفيذ الكود
وعليكم السلام

كود :
       Dim p As Process = New Process()
       p.StartInfo.FileName = "PowerShell.exe"
       p.StartInfo.Arguments = "اكتب الكوماند الذي تريده هنا"
       p.StartInfo.WindowStyle = ProcessWindowStyle.Hidden
       p.StartInfo.UseShellExecute = False
       p.StartInfo.CreateNoWindow = True
       p.StartInfo.RedirectStandardError = True
       p.Start()
       p.WaitForExit()
       Dim ErrorText As String = p.StandardError.ReadToEnd()
       MsgBox(p.ExitCode)
       If ErrorText <> "" Then
           MsgBox(ErrorText)
       End If
(04-11-22, 10:23 AM)عبدالله الدوسري كتب : [ -> ]وعليكم السلام

كود :
       Dim p As Process = New Process()
       p.StartInfo.FileName = "PowerShell.exe"
       p.StartInfo.Arguments = "اكتب الكوماند الذي تريده هنا"
       p.StartInfo.WindowStyle = ProcessWindowStyle.Hidden
       p.StartInfo.UseShellExecute = False
       p.StartInfo.CreateNoWindow = True
       p.StartInfo.RedirectStandardError = True
       p.Start()
       p.WaitForExit()
       Dim ErrorText As String = p.StandardError.ReadToEnd()
       MsgBox(p.ExitCode)
       If ErrorText <> "" Then
           MsgBox(ErrorText)
       End If

الأخ الدوسري
عجيب يطرح عليك أحدهم سؤالا و عندما تجيبه يصمت فلا تعلم هل إجابتك حلت مشكلته أم لا 
نفس الشيء مع هذا الأخ 
من المفروض على الإخوة أن يتقيدوا بنظام التنبيه بعد تلقيهم إجابات على اسئلتهم 
و شكرا  Big Grin