How can i use .vbs script for peer to peer connection

[Taipai]

I would like to know that how do i use .vbs script to test the connection between 2 computers having a peer to peer connection. Does any body knows about it? Kindly provide me the correct logical solution for the above issue. Any kind of help on the above issue would be appreciated.

[Praetor]

Create a form and add 1 Button, 1 TextBox, and 1 Timer. Make the textbox big enough to type in. For the timer set the interval property in the properties box to 1 and the enabled property to True. Now let's take a look at those codes. Bring up the Code window for Form 1. We are going to need to import a few namespaces in the area before Public Class Form1.

Imports System.Net.Sockets
Imports System.Threading
Imports System.IO

Public Class Form1

The System.Net.Sockets namespace will allow us to make and listen to connections from and with other users.
The System.Threading namespace will allow us to do several things at the same time without interfering with one another
The System.IO namespace will allow us to send and receive information over our connection

Next we will need a few variables.

Dim Listener As New TcpListener(65535)
Dim Client As New TcpClient
Dim Message As String = ""

[Katty]

You can modify this script to do whatever you need. Notice that I've commented out some lines (') that give more information about the ping attempt, but you can leave the lines in if the information would be useful to you. Run the script by using the following command:

D:\projects\VBScripts>cscript v***ng.vbs savdalex01

which will give the following sample output:

Host savdalex01 contacted