From: Kyle Undefined
You can use APPA for that, IIRC, it uses cookies.
Nah. You can just do this.
function RegisterAccount :Boolean;
var
Client : integer;
Page : string;
begin
NName := Name + IntToStr(Random(100000))
eMail := NName + '@mailinator.com';
Client := InitializeHTTPClientWrap(True);
SetHTTPUserAgent(Client,'Mozilla/5.0 (Windows NT 6.1; rv:11.0) Gecko/20100101 Firefox/11.1');
AddPostVariable(Client, 'version', '6');
AddPostVariable(Client, 'onlyOneEmail', '1');
AddPostVariable(Client, 'version', '6');
AddPostVariable(Client, 'email1', eMail);
AddPostVariable(Client, 'password1', 'password');
AddPostVariable(Client, 'password2', 'password');
AddPostVariable(Client, 'age', IntToStr(RandomRange(19, 32)));
AddPostVariable(Client, 'agree_email', 'on');
AddPostVariable(Client, 'agree_pp_and_tac', '1');
AddPostVariable(Client, 'submit', 'Cr%E9er+un+compte');
Page := PostHTTPPageEx(Client, 'https://secure.runescape.com/m=account-creation/l=2/create_account_funnel.ws?version=6');
FreeHTTPClient(Client);
end;
~Home