请教怎么用VB.NET的Process编写在DOS命令提示符(CMD)下要运行的命令?
请问如何用VB.NET的Process编写在DOS命令提示符(CMD)下要运行的命令???
请问如何用VB.NET的Process编写在DOS命令提示符(CMD)下要运行的命令???
------解决方案--------------------
Process.Start( "cmd.exe ", "/k dir ")
不要和我抢分，半个月从光腚到星星的目标，就靠你了。。。
===================================================
技术交流不该有界限 资源共享不该有条件
博客空间：http://blog.****.net/lovingkiss
资源下载：http://download.****.net/user/lovingkiss
Email：loving-kiss＠163.com
本人说明： <我的帖子我做主,结贴率保持１００％>
1、欢迎一切问题有关的交流——无论答案对错；
2、不欢迎 顶、Mark、支持之类口水混分的人；
3、对带有性别的主题和求全部毕业代码者尽量不回答；
我保留对非 <散分贴> 蹭分者的厌恶和鄙视...
精通:jīnɡtōnɡ对学问技术等透彻的了解并熟练掌握
所以，我没有精通，只有JZ
===================================================
------解决方案--------------------
获取DOS命令输出结果:
Public Class ConsoleOutputClass ConsoleOutput
Private Sub New()Sub New()
End Sub
Private Shared gWorkingDirectory As String = Environment.GetFolderPath(Environment.SpecialFolder.Personal)
Public Shared Property WorkingDirectory() As String
Get
Return gWorkingDirectory
End Get
Set(ByVal Value As String)
gWorkingDirectory = Value
End Set
End Property
Public Shared Function ExcuteCmd()Function ExcuteCmd(ByVal command As String) As String
Dim mResult As String = " "
Dim tmpProcess As New Process
With tmpProcess
With .StartInfo
.CreateNoWindow = True
.FileName = .EnvironmentVariables.Item( "ComSpec ")
.RedirectStandardOutput = True
.UseShellExecute = False
.Arguments = String.Format( "/C {0} ", command)
.WorkingDirectory = gWorkingDirectory
End With
Try
.Start()
.WaitForExit(5000)
mResult = .StandardOutput.ReadToEnd
Catch e As System.ComponentModel.Win32Exception
mResult = e.ToString
End Try
End With
Return mResult
End Function
End Class
请问如何用VB.NET的Process编写在DOS命令提示符(CMD)下要运行的命令???
------解决方案--------------------
Process.Start( "cmd.exe ", "/k dir ")
不要和我抢分，半个月从光腚到星星的目标，就靠你了。。。
===================================================
技术交流不该有界限 资源共享不该有条件
博客空间：http://blog.****.net/lovingkiss
资源下载：http://download.****.net/user/lovingkiss
Email：loving-kiss＠163.com
本人说明： <我的帖子我做主,结贴率保持１００％>
1、欢迎一切问题有关的交流——无论答案对错；
2、不欢迎 顶、Mark、支持之类口水混分的人；
3、对带有性别的主题和求全部毕业代码者尽量不回答；
我保留对非 <散分贴> 蹭分者的厌恶和鄙视...
精通:jīnɡtōnɡ对学问技术等透彻的了解并熟练掌握
所以，我没有精通，只有JZ
===================================================
------解决方案--------------------
获取DOS命令输出结果:
Public Class ConsoleOutputClass ConsoleOutput
Private Sub New()Sub New()
End Sub
Private Shared gWorkingDirectory As String = Environment.GetFolderPath(Environment.SpecialFolder.Personal)
Public Shared Property WorkingDirectory() As String
Get
Return gWorkingDirectory
End Get
Set(ByVal Value As String)
gWorkingDirectory = Value
End Set
End Property
Public Shared Function ExcuteCmd()Function ExcuteCmd(ByVal command As String) As String
Dim mResult As String = " "
Dim tmpProcess As New Process
With tmpProcess
With .StartInfo
.CreateNoWindow = True
.FileName = .EnvironmentVariables.Item( "ComSpec ")
.RedirectStandardOutput = True
.UseShellExecute = False
.Arguments = String.Format( "/C {0} ", command)
.WorkingDirectory = gWorkingDirectory
End With
Try
.Start()
.WaitForExit(5000)
mResult = .StandardOutput.ReadToEnd
Catch e As System.ComponentModel.Win32Exception
mResult = e.ToString
End Try
End With
Return mResult
End Function
End Class