■ 現在のこのページの役立ち度:
表示されない場合こちらのリンクからもご覧になれます。
■ このページの役立ち度を評価する:
役立ち度を評価してください。
(1(左):あまり役立たない - 5(右):大変役立った):
■ ページの共有:
[ サイト内検索 ]
カスタム検索
#8428-0InetコントロールでFTPおかぽん2000-03-10(金) 14:06
     #8438-0RE#8428:InetコントロールでFTPてらぴー2000-03-10(金) 15:49
     #8443-0RE#8438:InetコントロールでFTPおかぽん2000-03-10(金) 18:13
     #8446-0RE#8443:InetコントロールでFTPてらぴー2000-03-10(金) 18:31
     #8454-0RE#8446:InetコントロールでFTPおかぽん2000-03-10(金) 20:06
#8428-0
InetコントロールでFTP
こんにちは。VB超初心者です。
InetでFTPサーバーに接続しようとしているのですが、
どうもうまくいきません。

With Inet1
   .URL = "ftp://xxx.xxx.xxx.xxx"
   .UserName = "user"
   .Password = "password"
   .Execute , "DIR"
   .Execute , "CLOSE"
End With

"リモートホストに接続できません"といわれます。
ここ3日くらい悩んでます。コマンドプロンプトで、"ftp xxx.xxx.xxx.xxx"は
問題なく接続できているので、どこが悪いのかわかりません。
すみませんが、ヒントでもいいので、、、。とても困っています。
よろしくお願い致します。

クライアント:Windows NT4.0 SP5+VB6.0 SP3
サーバー:Solaris 2.5.1
#8438-0
RE#8428:InetコントロールでFTP
こんにちは。

> "リモートホストに接続できません"といわれます。
> ここ3日くらい悩んでます。コマンドプロンプトで、"ftp xxx.xxx.xxx.xxx"は
> 問題なく接続できているので、どこが悪いのかわかりません。
> すみませんが、ヒントでもいいので、、、。とても困っています。
> よろしくお願い致します。
> 

Inet1コントロールのプロパティでAccessTypeやRemoteHostやProtocolの設定は
きちんとされているでしょうか。

Inet1コントロールには、StateChangedというイベントがあると思いますので
そこでどのステータスまで到達しているかチェックしてはどうでしょうか。
StateChangedとかでオンラインヘルプを探して見て下さい。
#8443-0
RE#8438:InetコントロールでFTP
てらぴーさん、ありがとうございます。

> Inet1コントロールのプロパティでAccessTypeやRemoteHostやProtocolの設定は
> きちんとされているでしょうか。

以下のように設定しました。
AccessType:0-icUseDefault
RemoteHost:xxx.xxx.xxx.xxx(クライアントのアドレス)
Protocol:2-icFTP

Private Sub Form_Click()
    With Inet1
        .URL = "ftp://xxx.xxx.xxx.xxx"   'サーバのアドレス
        .UserName = "user"
        .Password = "password"
        .Execute , "DIR"
        .Execute , "CLOSE"
    End With
End Sub

Private Sub Inet1_StateChanged(ByVal State As Integer)
    Debug.Print State
End Sub

以下デバッグの結果
 1
 2
 3
 4
 7
 8
 5
 6
 7
 8
 5
 6
 7
 8
 5
 6
 7
 8
 5
 6
 7
 8
 5
 6
 7
 8

最後の .Execute , "CLOSE" のところで"最後の要求が実行中です"と
止まってしまいました。

接続は、できているみたいですね。
もう少しで、できそうなんですが、、、

#何か根本的なことが、わかっていないのかしら?
#8446-0
RE#8443:InetコントロールでFTP
 
> Private Sub Inet1_StateChanged(ByVal State As Integer)
>     Debug.Print State
> End Sub
> 
> 最後の .Execute , "CLOSE" のところで"最後の要求が実行中です"と
> 止まってしまいました。
> 
> 接続は、できているみたいですね。
> もう少しで、できそうなんですが、、、
> 
> #何か根本的なことが、わかっていないのかしら?

DIRコマンドが完了しないうちにCLOSEが発行されているので
エラーになると思われます。

"EXECUTEメソッドの使用例"でヘルプをみると
        .Execute (引数1),(引数2)
と書くとの記述があります。
ここで引数1はURL、2は処理"DIR"などになるとのことです。
私も、いつのころからかこんな風に書いていました。
#8454-0
RE#8446:InetコントロールでFTP
お付き合いいただき、ありがとうございます。

> DIRコマンドが完了しないうちにCLOSEが発行されているので
> エラーになると思われます。

ん〜?。すみません具体的に、どのようにすればいいのでしょうか?
いったん処理を止める?

> "EXECUTEメソッドの使用例"でヘルプをみると
>         .Execute (引数1),(引数2)
> と書くとの記述があります。
> ここで引数1はURL、2は処理"DIR"などになるとのことです。

すると、今回の場合は、
          .Execute Inet1.URL , "DIR"
で、いいのですね。

今回、"CLOSE"をremすると、icResponseCompleted :12 で、終了するのを確認しました。
どうも、.Executeを連続で処理するといけないようです。
このページと関連する記事:
#1121-0Inetについて1999-08-30(月) 19:47
#1265-2ソケット通信2001-11-09(金) 02:11
#2237-1Inetの使い方2004-05-21(金) 08:58
#4936-0Inetコントロール:GetChunkメソッドから戻らなくなる2002-02-11(月) 23:23
#46113-0Inet を使ってファイルを FTP 転送したい2001-08-23(木) 17:12
#17022-0VBでFTP2000-12-11(月) 09:27
#45252-0ファイルをダウンロードするには?2001-07-23(月) 01:43
#15740-0RE#15696:『インターネットトランスファコントロール』の使い方について2000-02-08(火) 23:58
#43521-0サーバーとの時間の同期2001-05-30(水) 10:01
#1417-0ネットワークプログラムについて2005-02-15(火) 18:26
お探しの情報は見つかりましたか?お困りの問題は解決しましたか?
サイト内検索, 似た記事検索で見つからなくてもあきらめずに掲示板で質問してみましょう。
VB初心者友の会があなたのお役に立てれば幸いです。また、本ページの投稿者の方々にこの場を借りて感謝致します。
本ページは過去ログを集めて自動構成しています。よろしければこのページに関するフィードバックをお願いします。
(※ 構成の誤り、広告等の不適切な記事、リンク切れ、読めないページの報告など)