Aqui el codigo, ( registra un usuario en el formulario web http://ip.globalpatrol.net/rds/ ):
Código: Seleccionar todo
Dim $UserName = @ComputerName & @UserName & @SEC ; Falta filtrar espacios y caracteres raros (no alfanumericos).
Dim $host = "http://ip.globalpatrol.net"
Dim $page = "/rds/register.php"
$vars = "username=" & $UserName & "&password1=xxxx&password2=xxxx&fullname=ElcodigoDaVinci&[email protected]"
$url = $page & "?" & _HTTPEncodeString($vars)
$socket = _HTTPConnect($host)
$get = _HTTPGet($host, $url, $socket) ; OR _HTTPPOST
_HTTPClose($socket)