如何执行宏命令:如何在.net 中执行console命令



=bvTitle id=subjcns!1pY_ZGE9nN-x38i68L7EcYbw!128>如何在.net 中执行console命令

Private Sub form1_Load(ByVal sender As .Object, ByVal e As .EventArgs) Handles MyBase.Load        \'创建个新进程对象
        Dim myCmdProcess As New Process
        \'注册进程退出事件
        \'myCmdProcess.Exited New .EventHandler(myCmdProcess_exited)
        AddHandler myCmdProcess.Exited, AddressOf myCmdProcess_exited
         myCmdProcess.StartInfo.FileName = \"cmd\"       \'要执行命令
        \'将参数传给要应用 /C 执行串指定命令然后终断 ,dir,同时将结果输出到应用文件夹下test.txt.
        myCmdProcess.StartInfo.Arguments = \"/C  dir >test.txt\"
        myCmdProcess.StartInfo.RedirectStandardOutput = True
        myCmdProcess.StartInfo.UseShellExecute = False
        myCmdProcess.StartInfo.CreateNoWindow = True
        myCmdProcess.EnableRaisingEvents = True
        myCmdProcess.Start
        Console.Read
    End Sub
 
\'进程退出时思路方法
Private Sub myCmdProcess_exited(ByVal sender As Object, ByVal e As .EventArgs)
        Try
            Dim myFile As .IO.StreamReader = New .IO.StreamReader(\"test.txt\")
            Dim myString As String = myFile.ReadToEnd
            myFile.Close
            MessageBox.Show(myString)
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
    End Sub



Tags:  执行命令失败 dos执行命令 执行命令 如何执行宏命令

延伸阅读

最新评论

发表评论