idhttp的post問題？？ |
|
尚未結案
|
|
hanlg
一般會員   發表：26 回覆：28 積分：10 註冊：2004-02-01 發送簡訊給我 |
我用了如下代碼，不知道為什麼不行，希望大蝦指正，不勝感激！ DELPHI代碼： procedure TForm1.Button1Click(Sender: TObject);
var
Param: TStringList; begin Param := TStringList.Create;
Param.Text := '=&name=dddd&pwd=111';
IdHTTP1.Post('http://www.aaa.com/add.asp', Param);
Param.Free; end; asp頁面代碼： rs(name)=request.Form("name") 提交後可以添加空紀錄，傳上去的參數沒有內容。
------
永遠的DELPHI |
|
terrychen
尊榮會員   發表：90 回覆：794 積分：501 註冊：2003-05-01 發送簡訊給我 |
|
|
hanlg
一般會員 發表：26 回覆：28 積分：10 註冊：2004-02-01 發送簡訊給我 |
|
|
terrychen
尊榮會員 發表：90 回覆：794 積分：501 註冊：2003-05-01 發送簡訊給我 |
我想您沒看完該篇文章
其中有下列一段
var vid,vpass:string ;
xstr : tStringList;
resp : TstringList ; begin
if passform.showmodal=mrok then begin
xstr:=TStringList.Create;
resp:=TSTringList.create;
xstr.add('id=' Passform.edit1.text);
xstr.add('pass=' Passform.edit2.text);
resp.text:=(idHttp1.Post('http://10.10.1.8/cfnav/index.asp',xstr));
resp.SaveToFile('temp.xml'); ~~應無所住而生其心~~
|
|
hanlg
一般會員 發表：26 回覆：28 積分：10 註冊：2004-02-01 發送簡訊給我 |
|
|
terrychen
尊榮會員 發表：90 回覆：794 積分：501 註冊：2003-05-01 發送簡訊給我 |
|
|
hanlg
一般會員 發表：26 回覆：28 積分：10 註冊：2004-02-01 發送簡訊給我 |
|
|
hanlg
一般會員 發表：26 回覆：28 積分：10 註冊：2004-02-01 發送簡訊給我 |
|
|
hanlg
一般會員 發表：26 回覆：28 積分：10 註冊：2004-02-01 發送簡訊給我 |
|
|
hanlg
一般會員 發表：26 回覆：28 積分：10 註冊：2004-02-01 發送簡訊給我 |
|
|
hanlg
一般會員 發表：26 回覆：28 積分：10 註冊：2004-02-01 發送簡訊給我 |
|
|
qoo1234
版主 發表：256 回覆：1167 積分：659 註冊：2003-02-24 發送簡訊給我 |
indy9/10寫法：
uses IdMultipartFormData;
..... procedure TForm1.Button1Click(Sender: TObject);
var
data: TIdMultiPartFormDataStream;
begin
data := TIdMultiPartFormDataStream.Create;
try
{ add the used parameters for the script }
data.AddFormField('Name', 'abc');
data.AddFormField('Password', '3456');
{ Call the Post method of TIdHTTP and read the result into TMemo }
Memo1.Lines.Text := IdHTTP1.Post('http://forum.vclxx.org/default.asp', data);
finally
data.Free;
end;
end; end.  網海無涯，學無止境!
|
|
hanlg
一般會員 發表：26 回覆：28 積分：10 註冊：2004-02-01 發送簡訊給我 |
|
|
hanlg
一般會員 發表：26 回覆：28 積分：10 註冊：2004-02-01 發送簡訊給我 |
|
|
terrychen
尊榮會員 發表：90 回覆：794 積分：501 註冊：2003-05-01 發送簡訊給我 |
|
|
hanlg
一般會員 發表：26 回覆：28 積分：10 註冊：2004-02-01 發送簡訊給我 |
|
|
Ktop_Robot
站務副站長 發表：0 回覆：3511 積分：0 註冊：2007-04-17 發送簡訊給我 |
發表時間：2004-02-01 16:07:28
IP:61.55.xxx.xxx 未訂閱
系統時間：2024-11-05 5:54:07
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |