Close
Close viene utilizzato per liberare l’oggetto socket assegnato in precedenza.
Sintassi
Close
Restituisce
Nessun dato restituito.
Esempio
Lo script visualizza il banner di un server ftp in esecuzione locale. Può funzionare con qualsiasi server ftp modificando il valore della variabile "ip":
Function Main
Dim SocketObject As Object
Dim ip As String
Dim port As String
Dim strResponse As String
Ip = "127.0.0.1"
Port = "21"
Socket.SetTimeout 5000,5000
Set SocketObject = Socket.OpenTcp(Ip,Port)
If Not SocketObject is Nothing Then
'controllo per vedere la restituzione completata di Object
strResponse = SocketObject.Recv(1024)
echo(strResponse)
SocketObject.Close
End If
End Function