Domanda Codice Prompt dei Comandi

[IcxDi]

Ciao a tutti,
vorrei sapere come far effettuare al mio programma creato in visual basic, i comandi in cmd.exe
Esempio:

Il programma dovrebbe scrivere in cmd.exe
ping "nome sito"
e riportarlo nel programma (quello che vedete nell'imagine l'ho creato 2 secondi fa solo per inserirlo qui)

 

[killer001]

Ciao a tutti,
vorrei sapere come far effettuare al mio programma creato in visual basic, i comandi in cmd.exe
Esempio:

Il programma dovrebbe scrivere in cmd.exe
ping "nome sito"
e riportarlo nel programma (quello che vedete nell'imagine l'ho creato 2 secondi fa solo per inserirlo qui)

Da quello che ho capito ti interessa la compilazione. Prima di aprire topic cerca... Comunque da delle cose che avevo a casa ho trovato questo :

Dentro il button metti :

Dim Pinger As New Ping
Dim PingerReply As PingReply
PingerReply = Pinger.Send(TextBox1.Text)
TextBox2.Text = PingerReply.Address.ToString
Try
Catch ex As Exception
End Try

Dopo importa

Imports System.Net.NetworkInformation

Naturalmente tutto con 1 button e 2 textbox :

 

[IcxDi]

puoi spiegarmi passo passo?
mi da questi errori:

P.S. Ho VB 2008 Express Edition

EDIT: Ho importato e va.. solo che mi da questo errore:

 

[killer001]

Nel primo screen è perché non hai importato Imports System.Net.NetworkInformation

A me quel source funziona bene... Se non ti funziona prova ad usare un comando in shell quindi questo :

Dim cmd As String
cmd = "ping " + TextBox1.Text
Shell("cmd.exe /k" & cmd, AppWinStyle.NormalFocus)

Nella text metti il sito e quando premi il button ti si apre una pagina del cmd con scritto l'ip + pacchetti.

 

[IcxDi]

e questo lo inserisco sempre su Button1?
--------------- AGGIUNTA AL POST ---------------
Edit: Ora niente errori ma mi da un problema:

Non compare ip nel TextBox2

 

[killer001]

Lo sò perché ti apre una finestra del cmd.... E' un comando in shell :soso:

 

[IcxDi]

giusto
ci deve essere pure un modo :\

 

[Qwerty96]

scusate potreste postare in forum il codice perfavore. Grazie ;)

 

[killer001]

scusate potreste postare in forum il codice perfavore. Grazie ;)

Ha utilizzato un comando in shell quindi questo :

Dim cmd As String
cmd = "ping " + TextBox1.Text
Shell("cmd.exe /k" & cmd, AppWinStyle.NormalFocus)

La prossima volta leggi i commenti precedenti perché abbiamo utilizzato due metodi.