Toon posts:

[vb] ping probleem

Pagina: 1

Acties:

Acties:

Verwijderd

Topicstarter

Ik probeer een programma te schrijven in VB waarmee ik een ip adres kan pingen.
Ik heb dr dit van gemaakt:

code:

Private Sub Command1_Click()
Dim x As String

x = Shell("ping " & Text2.Text, vbHide)
Text1.Text = x
Timer1.Interval = 10000
Text1.Refresh


End Sub

hoe krijg ik de output van die shell terug?
in text1 komt nu alleen de task ID te staan

Acties:

wat je kunt doen is zoiets, maar dit is wel niet echt een nette oplossing :):

code:

1	Shell("ping " & Text2.Text & " > ping.txt", vbHide)

En dan het bestand ping.txt uitlezen in vb?

Acties:

Verwijderd

Je kan natuurlijk ook pingen via VB dan hoef je verder niets via shell uit te lezen.
Zie o.a. http://www.mvps.org/vbnet/code/internet/ping.htm

Reageer