Tutorial cmd no visual basic 2008

[AnonymousKesha 11]

Hoje vou ensinar a como executar linhas do cmd no vb8 e mostrá-las no próprio form

 

1° Adicione os seguintes intens....

 

1-Botão( para executar)

1-textbox1 (multi-linhas)-(para exibir)

1-texbox2 (para colocar o comando)

 

Depois na no botão1 e cole o seguinte codigo :

 

Dim myProcess As Process = New Process

Dim s As String

myProcess.StartInfo.FileName = "c:\windows\system32\cmd.exe"

myProcess.StartInfo.UseShellExecute = False

myProcess.StartInfo.CreateNoWindow = True

myProcess.StartInfo.RedirectStandardInput = True

myProcess.StartInfo.RedirectStandardOutput = True

myProcess.StartInfo.RedirectStandardError = True

myProcess.Start()

 

Dim sIn As System.IO.StreamWriter = myProcess.StandardInput

Dim sOut As System.IO.StreamReader = myProcess.StandardOutput

Dim sErr As System.IO.StreamReader = myProcess.StandardError

 

sIn.AutoFlush = True

sIn.Write("textbox2.text & System.Environment.NewLine)

sIn.Write("exit" & System.Environment.NewLine)

s = sOut.ReadToEnd()

 

If Not myProcess.HasExited Then

myProcess.Kill()

End If

TextBox1.Text = s

TextBox1.Visible = True

sIn.Close()

sOut.Close()

sErr.Close()

myProcess.Close()

 

 

 

 

Depois é só aperta F-5 e ser feliz!

 

 

Meu cmd que fiz :

 

Baixar:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

Video:[video=youtube;iFUvLsispTk]

Scan:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

[-Biohazard-Imortal 0]

Bom trabalho manin, ficou 10