Bueno pues aqui dejo un code para redirigir la salida de un comando MS-DOS a un RichTextBox la aplicacion requiere 3 controles
1 RichtextBox con nombre RichTextBox1
2 Boton con nombre Button1
3 TextBox con nombre TextBox1
-------------Codigo-----------
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Command As New Process 'Creamos la instancia Process
Command.StartInfo.FileName = "cmd.exe" 'El proceso en si es el CMD
Command.StartInfo.Arguments = "/c " & TextBox1.Text
'Aqui le damos los parametros /c y el nombre del archivo a ejecutar
Command.StartInfo.RedirectStandardError = True 'Redirigimos los errores
Command.StartInfo.RedirectStandardOutput = True 'Redirigimos la salida
Command.StartInfo.UseShellExecute = False
'Para redirigir la salida de este proceso esta propiedad debe ser false
Command.StartInfo.CreateNoWindow = True
'Para que no abra la ventana del CMD
Try
Command.Start()
Dim Output As String = Command.StandardOutput.ReadToEnd() _
& vbCrLf & Command.StandardError.ReadToEnd() 'Guardamos las salidas en un string
RichTextBox1.Text = Output 'Desplegamos la salida en nuestro RichTextBox
Catch ex As Exception
MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
'En caso de cualquier error de ejecucion
End Try
End Sub
-------------Codigo-----------
En caso de tener errores agregen la referencia de System.Diagnostics para hacer uso de la clase Process
Con este ejemplo al escribir un comando de MS-DOS en el textbox y hacer click en el boton se ejecutaria el comando y nos mostraria la salida en el RichtextBox
Descargar este ejemplo
Para ver este fichero necesitas Winrar
Este ejemplo esta probado en Visual Studio 2008
Harrah's Philadelphia Casino & Racetrack - Mapyro
ResponderEliminarFind 광주광역 출장마사지 your 여주 출장샵 way around the casino, find where everything is located with 화성 출장샵 these 경상남도 출장안마 helpful guides. · Nearby Nearby: Harrah's Philadelphia Casino and Racetrack · Incline 광양 출장샵 Village