VB.netでFTP受信を行うには？ (ID:85672)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 お世話になっています。 最近、VB.netをはじめたばかりなのですが、FTPクライアントを作成しなければならず困っています。 目的はFTPにより指定したファイルをGet・Putすることなのですが、その前段階で詰まってしまいました。 いろいろな資料を参考にしながら下のようなサンプルを作ったのですが、接続確認のためにFTPサーバーのディレクトリ情報を取得しようとしたところ戻り値が「False」になってしまいます。 もちろん、ディレクトリ情報は取得できず、そのあとに行っているファイルの取得ではエラーは出ませんが、ローカルにファイルが取得できません。 あちこちのサンプルも参考にしながら考えたのですが、問題点を絞り込めません。 どこを直せばいいのか、ご教授願います。 乱文で、不明なところもあるかと思いますが、お願いいたします。 ＝＝ 以下コード ＝＝ bytDir = System.Text.Encoding.GetEncoding(932).GetBytes("/・・・/") ' WININETの初期化 hInternet = InternetOpen("Shigeru", _ INTERNET_OPEN_TYPE_DIRECT, vbNull, vbNull, 0) ' FTPセッションの確立 */ hFtpSession = InternetConnect(hInternet, _ "ftpserver.co.jp",INTERNET_DEFAULT_FTP_PORT, _ "userID", "userPass", INTERNET_SERVICE_FTP, 0, 0) 'FTP（サーバー）のディレクトリ変更 Call FtpSetCurrentDirectory(hFtpSession, bytDir(0)) 'FTP（サーバー）の現在のディレクトリを表示 MsgBox(FtpGetCurrentDirectory(hFtpSession, strDir, 1024)) MsgBox(strDir) ' リモートにあるファイルをローカルへ転送 MsgBox(FtpGetFile(hFtpSession, "index.htm",_ "C:\Ftp_Samp\getfile.htm", _ False, FILE_ATTRIBUTE_NORMAL, _ INTERNET_FLAG_RELOAD, 0) ) ' 後処理 InternetCloseHandle(hFtpSession) InternetCloseHandle(hInternet)