T
truth_seeker
Unregistered / Unconfirmed
GUEST, unregistred user!
如何模拟post方法来登陆需要用户名和密码的网站？
比如：登陆www.chinahr.com
用indy 提供的httpclient demo无法登陆
比如：登陆www.chinahr.com
用indy 提供的httpclient demo无法登陆
您正在使用一款已经过时的浏览器！部分功能不能正常使用。
请尝试升级或使用 其他浏览器。
请尝试升级或使用 其他浏览器。
M
maming
Unregistered / Unconfirmed
GUEST, unregistred user!
如果不知道提交的数据格式和附加值是无法登陆的。
A
amsea
Unregistered / Unconfirmed
GUEST, unregistred user!
她没有post么？
nmhttp可是有post的。
直接post就可以了。
nmhttp可是有post的。
直接post就可以了。
A
alter
Unregistered / Unconfirmed
GUEST, unregistred user!
procedure SendUrl(Url,Data: string;
var ADataIn: TStringList);
var
Response : TStringStream;
tmpStr: TStringList;
tmpHTTP: TIdHTTP;
begin
tmpHTTP:= TIdHTTP.Create(self);
try
tmpHTTP.Request.ContentType := 'application/x-www-form-urlencoded';
Response := TStringStream.Create('');
tmpStr:= TStringList.Create;
tmpStr.Clear;
tmpStr.Add(Data);
tmpHTTP.Post(Url, tmpStr, Response);
ADataIn.Text:= Response.DataString;
Response.Free;
tmpStr.Free;
finally
tmpHTTP.Free;
end;
end;
肯定可以成功，我已经试过了。
其中，
url: http://my.chinahr.com/login.asp
data: action=http://my.chinahr.com/login.asp&txtname=你的用户名&UserName=&txtpwd=你的密码&PassWord=&txtwho=1
ADataIn: 返回页面,要先创建。
var ADataIn: TStringList);
var
Response : TStringStream;
tmpStr: TStringList;
tmpHTTP: TIdHTTP;
begin
tmpHTTP:= TIdHTTP.Create(self);
try
tmpHTTP.Request.ContentType := 'application/x-www-form-urlencoded';
Response := TStringStream.Create('');
tmpStr:= TStringList.Create;
tmpStr.Clear;
tmpStr.Add(Data);
tmpHTTP.Post(Url, tmpStr, Response);
ADataIn.Text:= Response.DataString;
Response.Free;
tmpStr.Free;
finally
tmpHTTP.Free;
end;
end;
肯定可以成功，我已经试过了。
其中，
url: http://my.chinahr.com/login.asp
data: action=http://my.chinahr.com/login.asp&txtname=你的用户名&UserName=&txtpwd=你的密码&PassWord=&txtwho=1
ADataIn: 返回页面,要先创建。
T
truth_seeker
Unregistered / Unconfirmed
GUEST, unregistred user!
多谢捧场，我先看看。。。
T
truth_seeker
Unregistered / Unconfirmed
GUEST, unregistred user!
to alert:
我试过了，chinahr.com没有问题，
但是下面的网站不行：http://www.bitaec.com/re_register.asp
你能帮我看看吗？用户名称：abcdef，密码：123456
我试过了，chinahr.com没有问题，
但是下面的网站不行：http://www.bitaec.com/re_register.asp
你能帮我看看吗？用户名称：abcdef，密码：123456
A
alter
Unregistered / Unconfirmed
GUEST, unregistred user!
不同网站提交登录的页面不同，页面里包括的字段也不同，你可以自己分析一下，参照我的例子很容易搞定。
T
truth_seeker
Unregistered / Unconfirmed
GUEST, unregistred user!
参照你的例子，我原来的没有加上content-type字段。加上之后可以登陆chinahr了，
但是我用同样的程序登陆http://www.bitaec.com/re_register.asp却不行。
请帮我分析一下，谢谢！
分数马上送到。。。
但是我用同样的程序登陆http://www.bitaec.com/re_register.asp却不行。
请帮我分析一下，谢谢！
分数马上送到。。。
T
truth_seeker
Unregistered / Unconfirmed
GUEST, unregistred user!
还有谁可以帮我啊？？？？
T
tseug
Unregistered / Unconfirmed
GUEST, unregistred user!
你找一个网络分析程序, 原来我一直用的是BO带的, 然后正常运行登陆, 你就知道
应该给他发什么东西了
应该给他发什么东西了
T
truth_seeker
Unregistered / Unconfirmed
GUEST, unregistred user!
还有谁可以帮我啊？？？？
T
truth_seeker
Unregistered / Unconfirmed
GUEST, unregistred user!
to alert:
可以帮我试验一下我说的网址吗？
可以帮我试验一下我说的网址吗？
A
alter
Unregistered / Unconfirmed
GUEST, unregistred user!
http://www.bitaec.com/re_register.asp?action=re_register.asp&FromWher=&T1=abcdef&T2=123456&B1=登 录
T
truth_seeker
Unregistered / Unconfirmed
GUEST, unregistred user!
to alert：
好象还不行，你用你的程序试验了吗？
如果解决了www.bitaec.com的问题，请也到<a href=http://www.delphibbs.com/delphibbs/dispq.asp?lid=1194151>这里</a>来回答，可以获得更多分数
好象还不行，你用你的程序试验了吗？
如果解决了www.bitaec.com的问题，请也到<a href=http://www.delphibbs.com/delphibbs/dispq.asp?lid=1194151>这里</a>来回答，可以获得更多分数
T
truth_seeker
Unregistered / Unconfirmed
GUEST, unregistred user!
到底有没有人帮我啊？
T
truth_seeker
Unregistered / Unconfirmed
GUEST, unregistred user!
解决问题了，原来是网页重定向后需要将cookie写回去。
A
alter
Unregistered / Unconfirmed
GUEST, unregistred user!
恭喜