idhttp post mail163的问题

[tnianshao]

idhttp post mail163的问题

procedure TForm1.Button1Click(Sender: TObject);
var
Response: TStringStream;
postList: TStrings;
begin
Edit1.Text := 'http://mail.163.com/';
Response := TStringStream.Create('');
postList := TStringList.Create;
try
postList.Add('username=我的用户名');
postList.Add('userpwd=我的密码');
IdHTTP1.Post(Edit1.Text, postList, Response);
finally
Memo1.Lines.Text := Response.DataString;
Response.Free;
postList.Free;
end;
end;



post以后 再memo中返回了 源码 如何判断依据登陆成功了呢 我返回的源代码 页没登陆时候的源码一样啊 ？？

求助

[wintergoes]

163你是登录不了的吧
他们有限制

[tnianshao]

就是个 比如


postList.Add('username=我的用户名');
postList.Add('userpwd=我的密码');
提交的参数 除了 用户名和密码以外
是不是应该还有个 提交的 参数？？

比如说 点击一类的

https://login.plaync.co.kr/login/login

上面这个网址 是我要 post的 地址
求高手 帮写下代码