Log in

View Full Version : SCAR and Connecting to a website.



noidea
05-01-2009, 05:27 AM
Hello all.
I know there a rule about NOT getting your script to check IP's and stuff, but I need this for an auth system I'm writing.

mixster tells me that this code works for him, but it gives me Socket Error # 10061
Connection refused.
I am using SCAR 3.15b

program New;
var
ss: string;
begin
ss := GetPage('www.whatismyip.com/automation/n09230945.asp');
writeln(ss);
end.

Sandstorm
05-01-2009, 05:47 AM
Program New;
Var
SS : String;

Begin
SS := Trim(Between('<p align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="5" color="#0000FF"><b>', ' <br>', GetPage('http://www.ipchicken.com/')));
Delete(SS, 1, 3);
SS := Trim(SS);
WriteLn(SS);
End.

Try that.

~Sandstorm

noidea
05-01-2009, 05:51 AM
Program New;
Var
SS : String;

Begin
SS := Trim(Between('<p align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="5" color="#0000FF"><b>', ' <br>', GetPage('http://www.ipchicken.com/')));
Delete(SS, 1, 3);
SS := Trim(SS);
WriteLn(SS);
End.

Try that.

~Sandstorm

ENSEXIFYING! Repped, thx so mutch.