IDHTTP实现登录QQ网站
http://my.qq.com这个网站,用IDHTTP实现登录
我是这样写的,可以返回的信息是系统繁忙,请稍候再试,请问是什么原因
procedure TForm1.BitBtn1Click(Sender: TObject);var params:tstrings;begin Params:=TStringList.Create; params.Add('fp='+'loginerroralert'); params.Add('u='+edit1.Text); params.Add('p='+edit2.Text); params.Add('verifycode='+edit3.Text); params.Add('u1='+'http://my.qq.com'); params.Add('aid='+'8000201'); memo1.Text:=idhttp1.Post('http://ptlogin2.qq.com/login',params); memo1.Text:=utf8toansi(memo1.Text);end;<form autocomplete="off" id="loginform" name="loginform" action="http://ptlogin2.qq.com/login" method="post" onsubmit="return ptui_onLogin(loginform)" onreset="return onFormReset(loginform)" target="_self" style="margin:0px;">
[解决办法]
楼主如果要在Delphi下实现md5的加密,可以下载别的前辈写好的一个md5函数。
请到如下地址下载:
http://www.delphifans.com/SoftView/SoftView_156.html
[解决办法]
http://www.2ccc.com/article.asp?articleid=4536
找了一下,在这里