這是我的代碼嘗試運行具有管理權限的cmd.exe。但是,我得到請求操作需要提升。如果我通過我的窗口運行「Run as Admin」運行cmd.exe,它可以工作,但是,通過vb,它不會。這是我的代碼。以管理員權限運行cmd.exe
Try
Dim process As New Process()
process.StartInfo.FileName = "cmd.exe "
process.StartInfo.Verb = "runas"
process.StartInfo.UseShellExecute = False
process.StartInfo.RedirectStandardInput = True
process.StartInfo.RedirectStandardOutput = True
process.StartInfo.RedirectStandardError = True
process.StartInfo.CreateNoWindow = True
process.Start()
process.StandardInput.WriteLine("route add 8.31.99.141 mask 255.255.255.255 " & cmdorder)
process.StandardInput.WriteLine("exit")
Dim input As String = process.StandardOutput.ReadToEnd
process.Close()
Dim regex As Regex = New Regex("(ok)+", RegexOptions.IgnoreCase) ' wa requested
' txtLog.AppendText(input)
Return regex.IsMatch(input)
謝謝。
'runas' param使這個過程要求特權升級的權限。這是完全正確的行爲。嘗試從管理工具中使用'psexec'。 –