Description :
Ce script permet de se connecter à un serveur distant.
Ce script au format VBS peut être utilisé comme suit.
Script :
Dim CS As Long Dim sock As Long Dim RemoteServer As SOCK_ADDR
RemoteServer.sin_family = AF_INET RemoteServer.sin_port = htons(2000) RemoteServer.sin_addr.S_addr = inet_addr("XXX.XXX.XXX.XXX") RemoteServer.sin_zero(0) = 0 CS = connect(sock, RemoteServer, Len(RemoteServer))
Proposer un script
|
Notre avis :

Votre avis :

Réactions : 0
Votants : 19
Visites : 23857
|