procedure TForm1.btn1Click(Sender: TObject);
var
Param:TStringList;
RStream:TStringStream;
begin
Param:=TStringList.Create;
RStream:=TStringStream.Create('');
Param.Add('username=showlee000');
Param.Add('normModPsp=********');
Param.Add('mem_pass=true');
IdHTTP1.Post('http://passport.baidu.com/?login&tpl=mn',
Param,RStream); mmo1.Text:=RStream.DataString;
end;--------------------下面是登陆界面核心代码--------------------
<tr>
<td width="50" class="f14">用户名:</td>
<td width="156"><input type="text" name="username" id="username" value="showlee000" onChange="chechUserOld('username')" class="ip"/></td>
</tr>
<tr id="trPassNorm" style="display:none;">
<td width="50" class="f14" valign="top">密 码:</td>
<td width="156"><input type="password" id="normModPsp" value="" class="ip"/></td>
</tr>为什么登陆不成功?
Param.Add('normModPsp=********');改成
Param.Add('password=********');就能成功这是为什么
var
Param:TStringList;
RStream:TStringStream;
begin
Param:=TStringList.Create;
RStream:=TStringStream.Create('');
Param.Add('username=showlee000');
Param.Add('normModPsp=********');
Param.Add('mem_pass=true');
IdHTTP1.Post('http://passport.baidu.com/?login&tpl=mn',
Param,RStream); mmo1.Text:=RStream.DataString;
end;--------------------下面是登陆界面核心代码--------------------
<tr>
<td width="50" class="f14">用户名:</td>
<td width="156"><input type="text" name="username" id="username" value="showlee000" onChange="chechUserOld('username')" class="ip"/></td>
</tr>
<tr id="trPassNorm" style="display:none;">
<td width="50" class="f14" valign="top">密 码:</td>
<td width="156"><input type="password" id="normModPsp" value="" class="ip"/></td>
</tr>为什么登陆不成功?
Param.Add('normModPsp=********');改成
Param.Add('password=********');就能成功这是为什么
Param.Add('password=********');
类似的网页,我应该怎么去判断该用哪个?
Accept: */*
Referer: http://my.baidu.com/index.html?my=1&tn=baidu_myps_pg
Accept-Language: zh-cn
Accept-Encoding: gzip, deflate
User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)
Host: my.baidu.com
Connection: Keep-Alive
Cookie: run=1261369308640; NEWINFO_KEY=200912131; BAIDUID=C547FCC4CDEEBCEFA1D32E4BDF45F598:FG=1; USERID=8789c54b5a77954e76ca08f54bad; J_MY=1; OPENPLATFORM_SP=602373686f776c65653030305200_1261369596; BDUSS=lreFprWE4zazBOZmh6ZXNKTW9LTzVHZFdCTWFPT1poejZUMFpVTy1IZzZoMVpMQUFBQUFBJCQAAAAAAAAAAApBEw9gI1IAc2hvd2xlZTAwMAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAO8RrAAAAAAAAAAAAAAAAsRZCAAAAAAAxMC42NS4yNDr6Lks6-i5LND这是抓出来的包
看看那部份代码
http://my.baidu.com/images/loadin.gif
那有没有什么比较好的抓包工具,WSockExpert似乎没有抓到重要的包啊