How to ping another computer in Vb 2005

[=?Utf-8?B?bWFydGluMQ==?=]

Hi, All,

I try to ping another PC using ping in vb 2005, can anyone provide a snippet
of code?

Thanks in advance,
Martin

[susiedba]

well you can do it via the command line and the SHELL command...
right?

you could pipe this into a text file; and then you wouldn't have any
external dependencies

this way you can also get multiple ping values; that's more important
than a single value

if that doesn't work i'd check out www.freevbcode.com


On Mar 7, 11:56 am, martin1 <mart...@discus sions.microsoft .comwrote:

Hi, All,

I try to ping another PC using ping in vb 2005, can anyone provide a snippet
of code?

Thanks in advance,
Martin

[rowe_newsgroups]

On Mar 7, 2:56 pm, martin1 <mart...@discus sions.microsoft .comwrote:

Hi, All,

I try to ping another PC using ping in vb 2005, can anyone provide a snippet
of code?

Thanks in advance,
Martin

Search for "ping" in the object browser - there are several methods to
do this.

Thanks,

Seth Rowe

[ShaneO]

martin1 wrote:

Hi, All,

I try to ping another PC using ping in vb 2005, can anyone provide a snippet
of code?

Thanks in advance,
Martin

OK, some very rough code (that works) -

Imports System.Net.Netw orkInformation

Dim Ping As New Ping
Dim PingOptions As New PingOptions
PingOptions.Ttl = 64
Dim PingReply As PingReply = Ping.Send("192. 168.1.1", 500)
If PingReply.Statu s = IPStatus.Succes s Then
'Do Something...
End If

Hope this is enough to get you started.

Also, look up PING in the on-line help.

ShaneO

There are 10 kinds of people - Those who understand Binary and those who
don't.

[=?Utf-8?B?S2VycnkgTW9vcm1hbg==?=]

Martin,

In addition to the other responses, VB 2005 offers My.Computer.Net work.Ping.

Kerry Moorman
"martin1" wrote:

Hi, All,

I try to ping another PC using ping in vb 2005, can anyone provide a snippet
of code?

Thanks in advance,
Martin

[Freddy Coal]

You know how I can make a Ipconfig for get my own IP, and the data of my
NetCard.

Thanks in advance.

Freddy Coal

"ShaneO" <sp****@optusne t.com.auwrote in message
news:45******** **************@ news.optusnet.c om.au...

martin1 wrote:

>Hi, All,

I try to ping another PC using ping in vb 2005, can anyone provide a
snippet of code?

Thanks in advance,
Martin

OK, some very rough code (that works) -

Imports System.Net.Netw orkInformation

Dim Ping As New Ping
Dim PingOptions As New PingOptions
PingOptions.Ttl = 64
Dim PingReply As PingReply = Ping.Send("192. 168.1.1", 500)
If PingReply.Statu s = IPStatus.Succes s Then
'Do Something...
End If

Hope this is enough to get you started.

Also, look up PING in the on-line help.

ShaneO

There are 10 kinds of people - Those who understand Binary and those who
don't.