全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:2799
推到 Plurk!
推到 Facebook!

請問BCB與Delphi雙修的先進,Indy要如何POST?

答題得分者是:RaynorPao
zenjohn
一般會員


發表:5
回覆:16
積分:4
註冊:2002-12-10

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-01-10 09:25:35 IP:211.75.xxx.xxx 未訂閱
各位先進:    我使用Indy的IdHTTP元件想要模擬POST的動作, 我已經在本站的Delphi討論區找到相關的文章, 但是我搬到BCB應用(因為我只會BCB), 卻發生 了一些問題如下,請各位先進能夠指導一下:    Indy Post的宣告: procedure Post(URL: string; const Source: TStrings;  const AResponseContent: TStream); overload BCB程式: IdHTTP1->Post("http://ip/login.asp", "", aa); 其中aa說是要TStream類別,我用TMemoStream不行, 想用TStream new一個則是說Cannot create instance of abstract class 'TStream'! 請問各位先進,可不可以告訴我一個在BCB中能夠POST 的簡單的範例?要如何才能傳帳號、密碼之類的參數呢? 謝謝您的熱心。
RaynorPao
版主


發表:139
回覆:3622
積分:7025
註冊:2002-08-12

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-01-10 09:51:16 IP:203.73.xxx.xxx 未訂閱
引言: 我使用Indy的IdHTTP元件想要模擬POST的動作, 我已經在本站的Delphi討論區找到相關的文章, 但是我搬到BCB應用(因為我只會BCB), 卻發生 了一些問題如下,請各位先進能夠指導一下: Indy Post的宣告: procedure Post(URL: string; const Source: TStrings; const AResponseContent: TStream); overload BCB程式: IdHTTP1->Post("http://ip/login.asp", "", aa); 其中aa說是要TStream類別,我用TMemoStream不行, 想用TStream new一個則是說Cannot create instance of abstract class 'TStream'! 請問各位先進,可不可以告訴我一個在BCB中能夠POST 的簡單的範例?要如何才能傳帳號、密碼之類的參數呢? 謝謝您的熱心。
zenjohn 你好: 請參考以下的做法 < class="code"> void __fastcall TForm1::Button1Click(TObject *Sender) { TMemoryStream *ms=new TMemoryStream; TStringList *sl= new TStringList; sl->Add("field1=text1"); sl->Add("field2=text2"); sl->Add("field3=text3"); IdHTTP1->Post("http://ip/login.asp", sl, ms); Memo1->Lines->LoadFromStream(ms); delete sl; delete ms; } -- Enjoy Researching & Developing --
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
zenjohn
一般會員


發表:5
回覆:16
積分:4
註冊:2002-12-10

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-01-10 11:35:47 IP:211.75.xxx.xxx 未訂閱
謝謝版主 編譯真的可以過了,我在>>>ID='1'>"); // 帳號 sl->Add("PWD='1'"); // 密碼 IdHTTP1->Post("http://163.22.40.12/journal/login_check.asp", sl, ms); Memo1->Lines->LoadFromStream(ms); delete sl; delete ms; } 一般user進入到 http://163.22.40.12/journal/login.htm帳號=1,密碼=1,便可進入到下一網頁(http://163.22.40.12/journal/login_check.asp),可是為什麼程式執行完,Memo1裡面空無一物呢?那回應回來的資料放到那裡呢? 謝謝版主大人。
RaynorPao
版主


發表:139
回覆:3622
積分:7025
註冊:2002-08-12

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-01-10 11:39:28 IP:203.73.xxx.xxx 未訂閱
引言: 謝謝版主 編譯真的可以過了,我在>>>ID='1'>"); // 帳號 sl->Add("PWD='1'"); // 密碼 IdHTTP1->Post("http://163.22.40.12/journal/login_check.asp", sl, ms); Memo1->Lines->LoadFromStream(ms); delete sl; delete ms; } 一般user進入到 http://163.22.40.12/journal/login.htm帳號=1,密碼=1,便可進入到下一網頁(http://163.22.40.12/journal/login_check.asp),可是為什麼程式執行完,Memo1裡面空無一物呢?那回應回來的資料放到那裡呢? 謝謝版主大人。 < face="Verdana, Arial, Helvetica"> zenjohn 你好: 回應的資料應該是放在最後一個參數裡面 可是這部分牽涉到你的網頁設計(建議你 check 這部分) --
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
zenjohn
一般會員


發表:5
回覆:16
積分:4
註冊:2002-12-10

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-01-10 13:51:38 IP:211.75.xxx.xxx 未訂閱
版主您好:    可是如果像連到奇摩或雅虎那種設計好的網站, 那個網頁就不是我們設計的,這樣的話,好像就 不能直接修改網頁來解決了。    我從語法來看,應該是存入第三個參數沒錯, 雖然Memo應該只能存文字資料,不能存圖形, 可是網頁裡的都為HTML啊,怎麼會都沒顯示? 好奇怪,我再去找找資料,如果版主大人有新 的發現,也請您分享唷...< > 謝謝版主大人< >
RaynorPao
版主


發表:139
回覆:3622
積分:7025
註冊:2002-08-12

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-01-10 15:56:18 IP:203.73.xxx.xxx 未訂閱
引言: 版主您好: 可是如果像連到奇摩或雅虎那種設計好的網站, 那個網頁就不是我們設計的,這樣的話,好像就 不能直接修改網頁來解決了。 我從語法來看,應該是存入第三個參數沒錯, 雖然Memo應該只能存文字資料,不能存圖形, 可是網頁裡的都為HTML啊,怎麼會都沒顯示? 好奇怪,我再去找找資料,如果版主大人有新 的發現,也請您分享唷...< > 謝謝版主大人< >
zenjohn 你好: 試試看加上以下那一行 < class="code"> IdHTTP1->Post("http://163.22.40.12/journal/login_check.asp", sl, ms); ms->Position=0; Memo1->Lines->LoadFromStream(ms); -- Enjoy Researching & Developing --
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
zenjohn
一般會員


發表:5
回覆:16
積分:4
註冊:2002-12-10

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-01-10 17:28:14 IP:211.75.xxx.xxx 未訂閱
版主您好:    加上那一行果然可以看到了,原來還要把他指到最前面才可以, 謝謝版主,果然還是有經驗的您才有辦法... (拍馬屁中... ) 我在網頁那邊測試,有接收到字串參數了(>難道> 可是為什麼像 > <>謝謝版主大人的指導... < >
zenjohn
一般會員


發表:5
回覆:16
積分:4
註冊:2002-12-10

發送簡訊給我
#8 引用回覆 回覆 發表時間:2003-01-13 16:38:37 IP:211.75.xxx.xxx 未訂閱
試了許久,資料還是餵不進去, 希望有用BCB試成功的先進們, 可以公佈方法或範例,因為這個 對大家上網搜集資訊真的比較方便。    謝謝版主的指導,雖然我還沒試成功, 不過覺得離成功好像近了點... 
RaynorPao
版主


發表:139
回覆:3622
積分:7025
註冊:2002-08-12

發送簡訊給我
#9 引用回覆 回覆 發表時間:2003-01-13 16:47:25 IP:203.73.xxx.xxx 未訂閱
引言: 試了許久,資料還是餵不進去, 希望有用BCB試成功的先進們, 可以公佈方法或範例,因為這個 對大家上網搜集資訊真的比較方便。 謝謝版主的指導,雖然我還沒試成功, 不過覺得離成功好像近了點... < face="Verdana, Arial, Helvetica"> zenjohn 你好: 嗯?? 我以為~~你的問題已經解決了說 不好意思~~既然已經結案了~~能不能麻煩你 再另外開一個 > --
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
zenjohn
一般會員


發表:5
回覆:16
積分:4
註冊:2002-12-10

發送簡訊給我
#10 引用回覆 回覆 發表時間:2003-01-14 08:38:21 IP:211.75.xxx.xxx 未訂閱
謝謝版主大人,我以為您在忙,沒空指導, 所以結案了...  現在另開了一個延續的 >
系統時間:2024-04-26 6:09:57
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!