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

1 名前：デフォルトの名無しさん mailto:sage [04/08/28 09:50] The Indy Project www.indyproject.org/ 　　　　　./＼　　　　　　　 /＼ 　　　　 /:::::::ヽ＿＿＿＿/::::::::ヽ、 　　　 ／　::. ＿　　.:::::::::::::　 ＿::::ヽ_ 　　／　／　°ヽ_ヽｖ /:／　°ヽ::::::ヽ 　/　／.（￣（￣＿＿丶 ..（￣（＼　 ::::| 　　　　ぐぐってもわかんないよ〜 . |　.:::::::: ）　 ）/ / ｔｰｰｰ|ヽ） 　）　.::::: ::| . |　.::::...（　 （..|｜.　　　 |　（　 （　　　 ::| 　　　　だれかたすけて〜 . |　:::.　 ）　 ）| |⊂ニヽ .| !　） 　）　 　::::| 　|　:　 （　 （ | |　 |:::T::::.|　（　 （　　 　::| 　＼:　 ）　　）ﾄ--^^^^^┤　）　 ）　 　丿 　 ／ （　　（　　　　　　　 （　 .（　　　＼ ／　 .､.）　　）　　　　　　　/　　＼　　_ ＼ INDY TIPS monazilla.org/document/indytips.html DelWiki - Indy onigiri.s3.xrea.com:8080/delphi/index.php?Indy Indy　日本語ヘルプ www.borland.co.jp/delphi/del7docup.html 403 名前：デフォルトの名無しさん mailto:sage [2005/11/07(月) 23:34:49 ] >>402 お互いがんばりましょう。 そのブログは私も見ました。 ライブドア証券は多少認証が甘いのかもしれませんね。 ライブドア証券の口座が開設できたらソースを見て試してみるつもりです。 楽天も口座を持っているので、一緒にがんばりましょう。 404 名前：デフォルトの名無しさん mailto:sage [2005/11/07(月) 23:49:12 ] 同族はいるもんですねｗ ま、私はブロッキングが嫌でindyはやめましたけど。 405 名前：デフォルトの名無しさん mailto:sage [2005/11/07(月) 23:59:25 ] >>404 ブロッキングですか。 ま、私はブロッキングが何かも知りませんけど。 406 名前：デフォルトの名無しさん mailto:sage [2005/11/08(火) 00:00:37 ] Dmonkey についてる通信コンポもよいよ 407 名前：デフォルトの名無しさん mailto:sage [2005/11/08(火) 00:07:57 ] うーん Javaの知識がないのでよくわからないですね。 これを使えば、SSLとかも簡単に使えるんですかね？ 408 名前：デフォルトの名無しさん mailto:sage [2005/11/08(火) 07:33:09 ] つーかコンポはDelphiだよ。 409 名前：402 [2005/11/08(火) 07:52:52 ] VCだとCHttpConnectionクラスがSSLなどを気にしなくてもかってにやってくれる。 便利だと判っていても、VCを勉強するのﾏﾝﾄﾞｸｾ ログイン部だけでもいいからソース欲しい ずうずうしいと思われてもしゃないが、これ切実な気持ち。。。 410 名前：デフォルトの名無しさん mailto:sage [2005/11/08(火) 08:38:03 ] >>409 BCBにしたら、MFCをバキバキコンパイルできるぞ。 CDialogのポトペタは出来ないかもしれないが。 411 名前：デフォルトの名無しさん mailto:sage [2005/11/09(水) 04:05:26 ] 俺はBCBを発売当初から使い続けててプログラムも少しばかり自信があるつもりだったが>>376の int __fastcall Pos(const AnsiString& subStr) const; は知らなかったorz こんなのがあったとは…今まで自前で書いた関数使ってた。 こっちのが負荷が軽かったら書き換えるべきか。 412 名前：デフォルトの名無しさん mailto:sage [2005/11/12(土) 21:59:19 ] すいません、SSL通信を行いたいのですが、 以下のエラーがでてしまいます。 何がおかしいのでしょうか？ どなたか教えていただけませんか？ Error connectioning with SSL 413 名前：デフォルトの名無しさん mailto:sage [2005/11/12(土) 22:02:22 ] まずは412が何をしたのかを説明してくれ。 414 名前：デフォルトの名無しさん mailto:sage [2005/11/12(土) 22:07:24 ] >>412 Dmonkey についてる通信コンポ参考にしてください。 ユニット名はgsockethttp.pas　gsockethttps.pas などです。 415 名前：デフォルトの名無しさん mailto:sage [2005/11/12(土) 22:23:03 ] indyでこのスレの53なんかを参考にSSL保護されてるページとやりとりしたいと思うのですが、 うまく行くページといかないページがあるんですよね・・・ IENaviTrなんかで見るとたいしてやりとりしてるデータに違いがあるようには見えないのですが・・・ なにか注意することとかありますかね？ 416 名前：412 mailto:sage [2005/11/12(土) 22:24:12 ] すいません。 415は412です。 >>414 Dmonkeyというのは何でしょうか？ DmonkeyでSSL通信ができるのでしょうか？ 417 名前：デフォルトの名無しさん mailto:sage [2005/11/12(土) 23:16:53 ] SSLのバージョンが違うとか無い？ MLの過去ログであったような。 418 名前：412 mailto:sage [2005/11/13(日) 00:09:44 ] indy_openssl096kというのを使っています。 このバージョンのことですかね？ 419 名前：デフォルトの名無しさん mailto:sage [2005/11/13(日) 00:40:06 ] >>418 いやそれはindyのバーｚｙ(ry 420 名前：412 mailto:sage [2005/11/13(日) 01:06:45 ] できたー！ SSLOptionsのMethodですね。 できました。ありがとう！！ 421 名前：412 mailto:sage [2005/11/16(水) 01:31:32 ] すいません。 今度はCookieがうまくいきません。 サーバーからCookieが無効になっていますって怒られてしまいます。 どうすればいいでしょうか？ sonic64.com/2005-05-14.html この辺のページなんかを見てやってるんですが・・・ そもそも、IEがやりとりしてるCookieをそのままコピペしてるのがいけないのでしょうか？ 上記サイトのGet Cookieっていうのを試してみてもうまくとれません。 どうしたらいいでしょうか？ ヘルプミー！ 422 名前：デフォルトの名無しさん mailto:sage [2005/11/16(水) 20:01:12 ] >>421 個人的には TIdCookieManager 使った方が簡単だと思う。 > Cookie の有効期限やドメイン、path は一切無視しているので注意。 だし。 TIdCookieManager 使ってみ。 423 名前：デフォルトの名無しさん mailto:sage [2005/11/16(水) 21:31:57 ] TIdCookieManagerっていうコンポーネントを追加すればいいんですね？ ただ、CookieManagerっていうパラメータがTIdHTTPコンポーネントにあって、ヘルプを見ると自動でCookieの処理をしてくれるみたいなこと書いてあるんですよね… これはうまく働いてくれないみたいでよくわからんです。 とりあえずTIdCookieManager使ってみます。ありがとん 424 名前：デフォルトの名無しさん mailto:sage [2005/11/16(水) 21:47:19 ] >>423 貼り付けた TIdCookieManager を TIdHTTP.CookieManager に設定して TIdHTTP.AllowCookies を True にすると これを使って自動管理してくれるって事。 425 名前：デフォルトの名無しさん mailto:sage [2005/11/16(水) 22:35:54 ] あ、そうだったんすか・・・ アホですね、オレ。 やってみます。 426 名前：デフォルトの名無しさん mailto:sage [2005/11/16(水) 23:17:32 ] やっぱりcookieが無効になっているって怒られますね・・・ なんででしょ？ 427 名前：デフォルトの名無しさん mailto:sage [2005/11/16(水) 23:45:59 ] そもそも IdHTTP1.Request.ContentType := ('application/x-www-form-urlencoded'); とか設定してるにもかかわらず、 The Proxomitronというソフトを使ってサーバとのやりとりを見ると、 Content-Type: multipart/form-data; boundary=--------111605234305593 になっている・・・ うまく設定できてないってことですよね？ 428 名前：デフォルトの名無しさん mailto:sage [2005/11/16(水) 23:52:32 ] >>427 >>343- 429 名前：デフォルトの名無しさん mailto:sage [2005/11/17(木) 00:37:56 ] >>428 なるほど。 なんとなくわかりましたが、 TMemoryStreamがよくわかりません。 TIdMultiPartFormDataStreamだと IdMultiPartFormDataStream1.AddFormField('hoge','hogehoge'); TStringListだと StringList1.Add　:=('hoge=hogehoge'); でいけたんですが、 TMemoryStreamだとどうすりゃいいんでしょ？ Writeを使えばいいんでしょうか？ 430 名前：デフォルトの名無しさん mailto:sage [2005/11/17(木) 00:46:04 ] 関係ないがTIdCookieManager、知らないなあと思ったらBCBにはないようだ。 431 名前：デフォルトの名無しさん mailto:sage [2005/11/17(木) 08:34:48 ] ヒント：TMemoryStreamはストリームでありながら、かつ、メモリプール 432 名前：デフォルトの名無しさん mailto:sage [2005/11/17(木) 22:50:52 ] 以下のようにしたら一応入れられました。 Value:= TStringList.Create; PostData:= TMemoryStream.Create; Value.Add('hogehoge'); Value.SaveToStream(PostData); IdHTTP1.Post(URL, PostData, Res); ただ、IEとデータのエンコード方法が違うみたいなんですが・・・ どうすりゃいいんですかね？ ちなみにSSLが微妙に違って、 IE: SSL cipher SSLv3 RC4-MD5 (128 bits) 自作: SSL cipher SSLv3 DES-CBC3-SHA (168 bits) なんですが、これらはdelphiの設定でなんとかなるもんですかね？ 433 名前：デフォルトの名無しさん mailto:sage [2005/11/21(月) 19:50:44 ] procedure TForm1.Button1Click(Sender: TObject); const 　FILE_URL = 'www.indyproject.org/indy/downloads/Indy_9_00_17_src.zip'; 　FILE_PATH = 'Indy_9_00_17_src.zip'; var 　getsize: integer; 　filesize: integer; 　fs: TFileStream; begin 　fs := TFileStream.Create(FILE_PATH, fmCreate); 　try 　　IdHTTP1.Head(FILE_URL); 　　getsize := 0; 　　filesize := IdHTTP1.Response.ContentLength; 　　Caption := IntToStr(getsize) + '/' + IntToStr(filesize); 　　IdHTTP1.Get(FILE_URL, fs); 　finally 　fs.Free; 　end; end; こんな感じでCaptionに現在のダウンロード量を表示するにはどうすればいいですか？ 434 名前：デフォルトの名無しさん mailto:sage [2005/11/24(木) 09:56:11 ] Indy 10をC++Builder6にインストールする方法をどなたか教えて頂けないでしょうか？ 435 名前：デフォルトの名無しさん mailto:sage [2005/12/04(日) 17:26:33 ] C++Builder6でTIdHTTPをフォームに貼り付けないで、直接newして使おうと思ったら、includeに必要なヘッダファイルが分からない。 どっかにサンプルとか転がってないですかね？ 436 名前：デフォルトの名無しさん mailto:sage [2005/12/04(日) 17:34:58 ] 一遍Formに貼り付けてみるとかgrepするとか 437 名前：デフォルトの名無しさん mailto:sage [2005/12/04(日) 23:26:08 ] TIdHTTP.hppとかじゃね？ 438 名前：デフォルトの名無しさん [2005/12/22(木) 23:07:10 ] インディって何するものですか？ 439 名前：デフォルトの名無しさん mailto:sage [2005/12/26(月) 00:23:27 ] 額につけた赤丸です 440 名前：デフォルトの名無しさん mailto:sage [2005/12/31(土) 15:22:13 ] >>439 それはビンディー って　突っ込み遅ッ 441 名前：デフォルトの名無しさん mailto:sage [2005/12/31(土) 20:51:25 ] アレだろ、ほらアメリカの先住民族 442 名前：デフォルトの名無しさん mailto:sage [2006/01/02(月) 08:08:15 ] バイオニック・ジェミーの役者さん 443 名前：デフォルトの名無しさん mailto:sage [2006/01/02(月) 09:11:50 ] ハリソン・フォード主演の映画だろ 444 名前：デフォルトの名無しさん mailto:sage [2006/01/02(月) 10:48:17 ] あれだろ、ほら、M字開脚の 445 名前：デフォルトの名無しさん mailto:sage [2006/01/02(月) 23:07:02 ] ウーパルーパみたいな名前の… タイム・アフター・タイム とか歌ってた姉ちゃんだろ 446 名前：デフォルトの名無しさん mailto:sage [2006/01/03(火) 00:04:41 ] >>441 「インディアン」は最近言わないかも。 >>442 年が！年が！ >>443 「アナ」が付きます。本当は。 >>444 「イン」しか合ってねーッ！ >>445 「ンディ」しか合ってねーッ！ ※けっこう有用なスレなので、この辺にしませう！ 447 名前：デフォルトの名無しさん mailto:sage [2006/01/16(月) 10:59:52 ] > けっこう有用なスレなので 閑散としてるけど。ついにユーザいなくなった？ 448 名前：デフォルトの名無しさん mailto:sage [2006/01/16(月) 13:03:10 ] みんな2006は買ったか？ Indyも10が乗ってるらしいがBuilderからは使えないという… 449 名前：デフォルトの名無しさん mailto:sage [2006/01/16(月) 17:56:00 ] del7indy9で充分 450 名前：デフォルトの名無しさん mailto:sage [2006/01/17(火) 11:02:21 ] ProtocolVersionをpv1_1に変えてもスニッファで監視するとRequest Versionが1.0になっているのですが 1.1にするにはどうすれば良いでしょうか。 451 名前：デフォルトの名無しさん [2006/01/17(火) 11:40:23 ] >>439 ﾜﾛｽ 452 名前：デフォルトの名無しさん [2006/01/23(月) 23:57:55 ] TIdHTTPで取得したソースをスマートにTWebBrowserで表示させることはできますか？ ざっとTWebBrowserのプロパティをみてみたのですが、それらしきものがなかったので・・・ 現在はTIdHTTPでソース取得⇒ファイルに保存⇒保存したhtmlファイルをTWebBrowserで指定して表示しています。 453 名前：デフォルトの名無しさん mailto:sage [2006/01/24(火) 00:41:03 ] pc8.2ch.net/test/read.cgi/tech/1057329161/ 454 名前：デフォルトの名無しさん mailto:sage [2006/01/24(火) 13:28:17 ] >>452 ttp://forum.nifty.com/fdelphi/samples/01090.html をみて適当にやってみた。細かいところは調べてくれ uses MSHTML_TLB; procedure TForm1.Button1Click(Sender: TObject); var HtmlView: DispHTMLDocument; begin WebBrowser1.GoHome; HtmlView := WebBrowser1.Document as DispHTMLDocument; if HtmlView <> nil then HtmlView.body.innerHTML := IdHTTP1.Get('www.google.co.jp/'); end; 455 名前：デフォルトの名無しさん mailto:sage [2006/01/24(火) 21:37:30 ] Indyのソースライセンス何? 456 名前：デフォルトの名無しさん mailto:sage [2006/01/25(水) 02:36:11 ] >>455 ttp://www.indyproject.org/License/index.en.html Dual Licensed Indy is dual licensed. You can review which license better suits your needs, and use that license. You can even change your mind later if you have previously chosen one. Licenses Indy Modified BSD License - The Indy Modified BSD license is a very no nonsense license that allows you to do almost anything you want with Indy, provided you provide proper attribution. Indy MPL (Mozilla Public License) License - To make it easier and consistent for JEDI users, we also offer an MPL license v1.1. License Details. 457 名前：デフォルトの名無しさん mailto:sage [2006/01/25(水) 19:11:28 ] BSDなら楽だのぉ 458 名前：デフォルトの名無しさん mailto:sage [2006/01/25(水) 21:47:43 ] >>457 Indy BSD License はこれね ttp://www.indyproject.org/License/BSD.en.html 著作権表示と免責条項をいれておけばokなのかな 459 名前：デフォルトの名無しさん [2006/01/26(木) 13:06:07 ] ＞著作権表示と免責条項をいれておけばokなのかな 具体的な記述というかコピペするだけでIndy使えるライセンス文きぼん。 ここはそのためのスレだもんね。 460 名前：デフォルトの名無しさん mailto:sage [2006/01/26(木) 13:14:57 ] ギコ●ビとか、ライセンス書いて無いことない？ 461 名前：デフォルトの名無しさん mailto:sage [2006/01/26(木) 16:30:19 ] >>459 Portions of this software are Copyright (c) 1993 - 2003, Chad Z. Hower (Kudzu) and the Indy Pit Crew www.IndyProject.org/ 462 名前：デフォルトの名無しさん mailto:sage [2006/01/26(木) 16:33:16 ] >>459　（456の後半部分） Which license should I use? You need to investigate them and see which one fits your needs. The BSD license is simpler and allows much broader use, but requires attribution (See below). The MPL license is more restrictive, but does not require attribution. If in doubt, choose the BSD license and just provide proper attribution. Do I have to provide attribution in the about box? No. While we appreciate attribution in the about box, it is not a requirement. A mention in the documentation (or in multiple places), or any reasonable visible place to the users of the product is acceptable. There are also Indy graphics and logos you can use. どちらのライセンスを使うべきでしょうか？ どちらがあなたの目的に適切であるか、調査する必要があります。 BSDライセンスは、単純かつより広い使用を認めていますが、著作権帰属先の表示が必要です。 MPLライセンスは、より限定的ですが、帰属の表示は要求しません。 迷ったら、BSDライセンスを選択し、適切な著作権帰属先の表示をするだけです。 著作権帰属表示をAboutBoxで行わなければなりませんか？ いいえ。そうしていただけるとありがたいですが、要求ではありません。 ドキュメントに記載するか、もしくはユーザが見ることのできる妥当な場所で、かまいません。 Indyのロゴも使用できます。 463 名前：デフォルトの名無しさん mailto:sage [2006/01/26(木) 16:38:13 ] >>461 ライセンス本文と、免責条項は一緒に入れないとだめでない？ 464 名前：デフォルトの名無しさん mailto:sage [2006/01/26(木) 16:51:37 ] >>463 BSDライセンスなら著作権表示だけで他は、いらないしょ 465 名前：デフォルトの名無しさん mailto:sage [2006/01/30(月) 02:14:52 ] TIdHashMessageDigest5をC++Builderでの使用法を教えてください 以下のようなコードを書くと TIdHashMessageDigest5 *encoder = new TIdHashMessageDigest5(); T4x4LongWordRecord hash = encoder->HashValue(str); [C++ エラー] unit1.cpp(169): E2034 'unsigned int' 型は 'unsigned int[4]' 型に変換できない と言われコンパイルが通りません そこで以下のように変えました TIdHashMessageDigest5 *encoder = new TIdHashMessageDigest5(); unsigned int hash = encoder->HashValue(str); 変えて見たらコンパイルは通るのですが 実行時EAccessViolation で書き込み違反が起こります。 どう書いたらうまく良くのでしょう？ 実際にC++Builderで使用している人いますか？ 466 名前：デフォルトの名無しさん mailto:sage [2006/01/31(火) 07:22:22 ] >>465 ちょこっと試してみたが、そもそも TIdHashMessageDigest5 *encoder = new TIdHashMessageDigest5(); encoder->HashValue(str); の時点で通らない悪寒。 IdHash.pas　で T4x4LongWordRecord = array [0..3] of LongWord; TIdHash128 = class(TIdHash) public function HashValue(const ASrc: string): T4x4LongWordRecord; overload; end; IdHash.hpp　で class PASCALIMPLEMENTATION TIdHash128 : public TIdHash { public: unsigned __fastcall HashValue(const AnsiString ASrc)/* overload */; }; 返り値の宣言が実装と違うので Result := HashValue(LStream); が変なところに書きにいっていると思われ。 467 名前：デフォルトの名無しさん mailto:sage [2006/01/31(火) 10:25:03 ] >>465 C++Builder相談室 Part15 pc8.2ch.net/test/read.cgi/tech/1124614110/954 954 ：デフォルトの名無しさん [sage] ：2006/01/30(月) 11:12:13 >>947 TIdHashMessageDigest5利用したいなら、 IdHash.hppの typedef unsigned T4x4LongWordRecord[4]; をコメントアウトして、その下に struct T4x4LongWordRecord {unsigned Value[4];};　を追加。 後は IdHash.hpp と IdHashMessageDigest.hpp にあるいくつかのクラスの HashValue メソッドの戻り値が unsigned になってるので、全部 T4x4LongWordRecord に置き換える。 468 名前：デフォルトの名無しさん mailto:sage [2006/02/11(土) 00:08:05 ] IdHTTPでproxyを"インターネットオプションで接続する"にするのは、どうすればいい? 469 名前：デフォルトの名無しさん mailto:sage [2006/02/11(土) 00:14:39 ] レジストリからインターネットオプション設定を取ってくればいいかな。 470 名前：デフォルトの名無しさん mailto:sage [2006/02/12(日) 18:34:59 ] 質問があります cvs.sourceforge.jp/cgi-bin/viewcvs.cgi/openirvine/openirvine/readme_sourcecode.txt?rev=1.3 ここのIrvineのビルド説明で、 「Irvineのソースを [procedure Register]でgrepしてコンポに登録します」 ・・という部分は、どのような作業をすればよろしいんでしょうか・・？ procedure Registerでコンポーネントを登録したことはあるんですが、 「grepして」という部分がイマイチ分かりません・・ Irvineのソースの.pasのファイルを全て登録っ意味でしょうか？ 具体的にどのような作業が必要なのか知りたいんですが・・ ビルドされた方がいましたら、お願いします 471 名前：デフォルトの名無しさん mailto:sage [2006/02/13(月) 04:14:00 ] >>470 Irvineコンパイルしたことないけど、grepするというのは検索すると同義。 Irvineソースの中で、コンポーネントを定義してる部分があるから、 その部分を探し出して(=grepかけて) そのコンポーネントを登録汁ということではないか。 はずしてたらごめん。 で、多分スレ違い 472 名前：デフォルトの名無しさん [2006/02/13(月) 10:30:41 ] FreePascalでIndy使ってる人いまつか？ 473 名前：デフォルトの名無しさん mailto:sage [2006/02/13(月) 11:09:42 ] >>472 入れただけだけど。 TIdHTTPは動いたよ。(lazarus 0.9.10 & indy 10.1.1 for lazarus) 474 名前：473 mailto:sage [2006/02/13(月) 14:49:23 ] >>472 追加 lazarus 0.9.12(最新)ではパッケージインストールのときの本体再構築が通らない @Windows 向こうにも書いたけど idetranslations.pasかtranslations.pasのあたりの書き換えがうまくいってない予感 どこがどうダメなのかは追ってないけど 475 名前：デフォルトの名無しさん mailto:sage [2006/02/13(月) 17:13:06 ] TIdSNTP (クライアント) はあるのに TIdSNTPServer ってのは無いんですね SNTP Server のライブラリが見つからなくて 476 名前：470 mailto:sage [2006/02/13(月) 19:31:08 ] >>471 やはり定義してる部分で登録するのがやはり最善ですか。 分かりやすい解説、感謝します。 スレ違いもすみませんでした。 477 名前：デフォルトの名無しさん mailto:sage [2006/02/13(月) 19:52:00 ] >>475 NTPぐらいだったら、自分で実装できそうだが・・・ RFC読んだことないけど 478 名前：デフォルトの名無しさん mailto:sage [2006/02/14(火) 03:49:33 ] ∂�唐ﾌソース見るとぞっとする。きんもー。 479 名前：デフォルトの名無しさん mailto:sage [2006/02/17(金) 17:09:04 ] SSL認証についてです。 procedure TForm1.Button1Click(Sender: TObject); var 　SL: TStringList; begin 　SL := TStringList.Create; 　with IdHttp1 do begin 　try 　　Request.Clear; 　　Request.BasicAuthentication := true; 　　Request.Username := '〜'; 　　IdHttp1.Request.Password := '〜'; 　　SL.Text := IdHttp1.get('https://point.rakuten.co.jp/?page=history'); 　　Memo1.Text := SL.Text; 　finally 　　SL.free; 　end; end; のようにして、楽天市場からポイント情報を取得するようにしたいのですが、 クラスタ例外エラーが発生してしまいます。 WEBプログラミング初心者でおかしいところだらけだと思いますが、ご教示ください。 480 名前：479 mailto:sage [2006/02/17(金) 17:12:52 ] libeay32.dll とssleay32.dll をプロジェクトと同じフォルダに置くのを忘れていました。 お騒がせしました。 481 名前：479 mailto:sage [2006/02/17(金) 17:43:06 ] 何度もすみません。 やっぱりできませんでした…。 スレ違いかもしれませんが、楽天はBasic認証ではないのですか？ 482 名前：デフォルトの名無しさん mailto:sage [2006/02/17(金) 18:19:56 ] (･3･)ローカルプロ串でも噛ませて確認してみればー 483 名前：デフォルトの名無しさん mailto:sage [2006/02/17(金) 18:23:37 ] >>482 ありがとうございます！ 一回噛ませてやってみます。 484 名前：デフォルトの名無しさん mailto:sage [2006/02/17(金) 22:30:55 ] >>479 トップページにログインフォームあるから違うと思う。 セッションID、クッキーをキーワードにして調べてみましょう。 485 名前：479 mailto:sage [2006/02/17(金) 23:24:30 ] >>484 ﾚｽありがとうございます！ Basic認証じゃなくてクッキーみたいですね。 IdHttp1.Responseなんかが絡んでそうですね。 どうユーザーIDとパスワードを入れたクッキーにするのかが 難しいですね。 486 名前：デフォルトの名無しさん mailto:sage [2006/02/18(土) 01:21:06 ] Cookieで送るわけじゃないでしょ？＞IDとパス 487 名前：デフォルトの名無しさん mailto:sage [2006/02/18(土) 04:20:49 ] >>485 楽天の垢持ってないから確認はしてないが、 ログインの為の form から POST すると、Set-Cookie が返って来るんだと思う。 TIdHTTP なら TIdCookieManager くっつけて form の情報を POST すればいいんじゃね？ 488 名前：デフォルトの名無しさん mailto:sage [2006/02/18(土) 09:19:06 ] Indyとか関係ないし。 もっと勉強しなよ。 489 名前：479 mailto:sage [2006/02/18(土) 15:33:33 ] 度々失礼しています。 >>287 fromの情報というのはどのようにすれば得られるものですか？ Post('https://www.rakuten.co.jp/myrakuten/login.html', Value, Res); のようにすることにしました。 ValoueはTIdMultiPartFormDataStreamで、 Value.AddFormField('u, '〜'); Value.AddFormField('p', '〜'); のようにしているのですが、うまくいかないんです。 >>488さんがおっしゃっているように、Indyではなく、 楽天が何を求めているか、つまり、from情報というのがよく分からなくて…。 490 名前：479 mailto:sage [2006/02/18(土) 15:34:16 ] ×　>>287 ○　>>487 でした、すみません。 491 名前：デフォルトの名無しさん mailto:sage [2006/02/18(土) 15:51:20 ] Indy以前の問題だが･･･ 他に適切なスレも無いし、ここでやっていいんだろうか？ 492 名前：デフォルトの名無しさん mailto:sage [2006/02/18(土) 16:22:35 ] いいんじゃね どうせ過疎ってるんだし 493 名前：デフォルトの名無しさん mailto:sage [2006/02/18(土) 16:41:07 ] form タグの action へ method メソッドを用いて、type=hidden であるものを含めた全ての input の値を送信する。 例) <form method="post" action="hogehoge/"> <input type="hidden" name="foo1" value="bar1"> <input type="text" name="foo2"> </form> この場合なら、 Value.AddFormField('foo1', 'bar1'); Value.AddFormField('foo2', { foo2 に入力されるべき値 }); Post('hogehoge/', Value, Res); になる。 494 名前：479 mailto:sage [2006/02/18(土) 20:19:20 ] みなさんありがとうございます！ >>493さんのようにフォームで要求されている情報を添付して、 loginページ直下のページは取得することができるようにました。 スレ違いなことなのに、みなさんの親切さに感謝しています。 しかし、https://point.rakuten.co.jp/?page=historyのようなページはログインフォームがないのに ログイン状態が続いていないと、情報が取得できないように素人の目には見えます。 これはクッキーによってログイン状態が継続されているのでしょうか？ ソースを見ても、クッキーをいじっているらしきところが見当らなくて…。 クッキー情報を送るにも、またもやつまづいてしまいました。 495 名前：デフォルトの名無しさん mailto:sage [2006/02/19(日) 02:43:42 ] あーちょうど楽天鯖がメンテ中だ○|￣|＿ 496 名前：デフォルトの名無しさん mailto:sage [2006/02/19(日) 10:23:12 ] >>494 Cookie はスクリプトでやってる場合はともかく、ヘッダに付いて来てるのなら TIdCookieManager が Set-Cookie も Cookie 自動的に処理してくれるはずだけど？ 497 名前：デフォルトの名無しさん mailto:sage [2006/02/19(日) 14:20:54 ] 今更多重垢ポイント集めプログラムかよ 498 名前：479 mailto:sage [2006/02/19(日) 16:32:03 ] procedure TForm1.Button1Click(Sender: TObject); var 　Res: TStringStream; 　Value: TIdMultiPartFormDataStream; 　Cookie_String: String; begin 　Res := TStringStream.Create(''); 　Value := TIdMultiPartFormDataStream.Create; with IdHttp1 do begin 　Value.AddFormField('CCC', '愛'); 　Value.AddFormField('CCC', '愛'); 　Value.AddFormField('Command', 'disp'); 　Value.AddFormField('SubCommand', 'result'); 　Value.AddFormField('end_year', '2005'); 　Value.AddFormField('end_mon', '12'); 　Value.AddFormField('end_mday', '1'); 　Value.AddFormField('span', '1month'); 　Value.AddFormField('limit', '100'); 　Value.AddFormField('status', '2'); 　Value.AddFormField('type', '1'); 　AllowCookies := True; try 　Post('https://partner.afl.rakuten.co.jp/af/a_report.cgi', Value, Res); 　Memo1.Text := Res.DataString; finally 　Res.Free; 　Value.Free; end; 499 名前：デフォルトの名無しさん mailto:sage [2006/02/19(日) 16:35:33 ] としても、ユーザーIDやパスワードは送れていないみたいで、取得できないみたいです。 ソース見た感じ特に要求されていないみたいに見えるのですが…。 >>497 単垢しか持ってないですよ。 アフィリエイトのポイント管理しようと思って作ってます。 500 名前：デフォルトの名無しさん [2006/02/19(日) 17:03:03 ] >>497のようなアホはスルー汁 501 名前：デフォルトの名無しさん mailto:sage [2006/02/19(日) 18:35:27 ] Cookie は本来明示的に要求されるものではなく、ドメインが一致すれば勝手に送るもの。 ログインに対するレスポンスとして送られてきてるんじゃないの？ 502 名前：デフォルトの名無しさん [2006/02/22(水) 11:15:09 ] Indyのヘルプをダウンロードしてきました これをF1で反応してくれるようにするにはどうすればいいでしょうか？ Delphi6Personalです 503 名前：デフォルトの名無しさん mailto:sage [2006/02/22(水) 11:49:10 ] >>502 OpenHelpなんだから、ヘルプ→カスタマイズで、Indyのヘルプファイルを 参加させればいいじゃん。

---

---

[ 続きを読む ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef