【Delphi】 Indyコンポーネント【C++Builder】

【Delphi】 Indyコンポーネント【C++Builder】 at TECH

376:デフォルトの名無しさん
05/11/06 00:52:34
>>375
はい。
だいたいそのへんのことは予想していた通りなんですが、
それで370のようにやってもうまくいかないんですよね・・・
そもそもPOSTとかそのへんがよくわかってないからなんでしょうか・・・
ちなみに以下のようにやってます。

Res:= TStringStream.Create('');
Value:= TIdMultiPartFormDataStream.Create;
with IdHttp1 do begin
S := Get('URLﾘﾝｸ(grv2.03trade.com)');
end;
Label1.Caption := S;

position1 := Pos('action',S);
position2 := Pos('method',S);
Label2.Caption := IntToStr(position1);
Label3.Caption := IntToStr(position2);
S := Copy(S, position1 + 8, position2 - position1 - 11);
　Label1.Caption := S;

Value.AddFormField('bid', '**');
Value.AddFormField('aid', '*******');
Value.AddFormField('pwd', '****');

URL:= 'S'+'1';
//　ここで/marusan/sm;_SID_=DrswJMpzjotVqk2n96u2fBr0HhCw26ELbt1RIeOcYDxl1p2c9EPP!1170569019!-*********?mid=M01 を設定
IdHTTP1.Post(URL, Value, Res);

次ページ

続きを表示

1を表示