Cerrar
Close se utiliza para liberar un objeto de socket asignado previamente.
Sintaxis
Cerrar
Devolución
No se devuelven datos.
Ejemplo
Este script muestra el rótulo de un servidor FTPProtocolo que se utiliza para transferir archivos entre equipos de redes. que funciona a nivel local. Puede funcionar con cualquier servidor FTP cambiando el valor de la variable “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,Puerto)
If Not SocketObject is Nothing Then
'verificar que el objeto se haya devuelto con éxito
strResponse = SocketObject.Recv(1024)
echo(strResponse)
SocketObject.Close
End If
End Function