掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
サーバー上のファイルを自動で自分のPCに落とすには? (ID:118323)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
はじめまして、VB初心者で現在アプリケーションを開発しているのですが、ちょっとつまずいてしまったので、教えてください。 当方が行いたいのは、サーバー上にあるファイル(MDBファイル)を自身のPCの指定のフォルダにダウンロードしたいのですが、以下のような構文ではダメでしょうか? If Dir$("C:\IVR\db") <> "" Then If Dir$("C:\IVR\db\xxxx.mdb") <> "" Then Kill "c:\IVR\db\xxxx.mdb" End If Else MkDir ("C:\IVR\db\") End If Me.Inet1.URL = "ftp://www.xxxxxxxx.jp" ' FTPアドレスを指定 Me.Inet1.UserName = "userxxxx" ' ユーザ名を指定 Me.Inet1.Password = "passxxxx" ' パスワードを指定 Me.Inet1.Protocol = icFTP ' 接続方法を指定 Me.Inet1.Execute , "CD /xxxx/" Do While Me.Inet1.StillExecuting DoEvents ' 前の処理が終わるまで待機 Loop get_file = "xxxx.mdb" Me.Inet1.Execute , "GET " & get_file & " c:\IVR\db\" & get_file 'ファイル取得 Do While Me.Inet1.StillExecuting DoEvents ' 前の処理が終わるまで待機 Loop Me.Inet1.Execute , "CLOSE" ' 接続切断 実行すると「実行時エラー"75" パス名が無効です」と表示されるのですが、単純にパスの指定がおかしいだけですかね?
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2020 Takeshi Okamoto All Rights Reserved.