No.2ベストアンサー
- 回答日時:
ちなみに先ほどのFTPサンプルは、BASP21をインストール後、サンプルのコードを新規モジュールに貼り付けて(たとえば以下をまるごと)実行すればAccessでもそのまま動きます。
sub file_download()
Dim ftp As Object, rc As Long, v As Variant, v2 As Variant
Dim ctr As Long
Set ftp = CreateObject("basp21.FTP")
ftp.OpenLog "c:\temp\log.txt"
rc = ftp.Connect("ftp.microsoft.com", "anonymous", "")
If rc = 0 Then
v = ftp.GetDir("bussys/winnt/winnt-public", 2) ' ディレクトリ一覧(詳細)
If IsArray(v) Then
For Each v2 In v
Debug.Print v2
Next
End If
v = ftp.GetDir("bussys/winnt/winnt-public") ' ディレクトリ一覧(ファイル名のみ)
If IsArray(v) Then
For Each v2 In v
Debug.Print v2
Next
End If
rc = ftp.GetFile("bussys/winnt/winnt-public/*", "c:\temp") 'ファイル受信
end sub
実行には20秒ほどかかります。
実行前にはCドライブにtempというフォルダを作っておいてください。
No.1
- 回答日時:
Access単体ではできないので、APIなどを使うのだと思います。
僕はAPIは面倒くさいので、BASP21というコンポーネント(Dllファイル)を使っています。
これはメールも送れるDLLなので重宝してます。
http://www.hi-ho.ne.jp/babaq/basp21.html
インストールはダウンロードしてWクリックするだけです。
FTPの方法
http://www.hi-ho.ne.jp/babaq/basp21f.html
下方の「●Visual Basic」サンプルをご参照ください。
参照設定はしなくてもコード中に「Set ftp = CreateObject("basp21.FTP")
」と1行書けば使えます。
>ファイル取得→Accessテーブルに取込
の部分は、BASP21ではなくAccessのテキストファイル操作か、カンマ区切りなら、テキストファイルのインポートで行います。いったん目的のファイルをダウンロード後、FTP接続を切ったあと、一番最後にやればいいでしょう。
参考URL:http://www.hi-ho.ne.jp/babaq/basp21.html
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- サーバー FTPサーバについて詳しい方(アクセス権のないディレクトリを非表示にする方法) 4 2022/08/22 22:33
- サーバー NASの利用経験多い方教えてください! 1 2022/03/24 19:21
- その他(パソコン・スマホ・電化製品) Google ドライブのようにXnBay ストレージ サーバのストレージスペースをコンピュータのエク 2 2023/04/28 19:09
- プロバイダー・ISP hpb22の接続方法の変更 1 2023/08/06 18:47
- サーバー Googleドライブなどを使わずにテザリングAndroidでWindowsとファイル共有 1 2023/02/19 13:14
- Windows 10 だいたいの能力はどのくらいでしょうか 3 2023/03/05 17:18
- サーバー ECサイトのFTPサーバーに使わないファイル20GBくらいがあるのですが、削除したら表示速度やページ 2 2022/12/20 08:45
- その他(インターネット接続・インフラ) 楽天ひかりでホームページアップロードが出来ない 1 2022/07/30 10:02
- ASP・SaaS サーバーログイン情報とFTP接続情報の見つけ方を教えてください。 3 2023/07/24 16:19
- ドメイン・サーバー・クラウドサービス FileZillaを使用してwpXサーバーに接続できない 2 2022/03/29 21:02
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
コマンドでのFTP転送が進まない。
-
DNSサーバを設定したのですがns...
-
同一のホスト名で何か問題があ...
-
リモートデスクトップ接続でパ...
-
Linuxでパスワード変更時に「it...
-
パスワード設定していないユー...
-
エクセルで#N/Aを含めた平均値...
-
AWSでSSH接続をしたいのですが...
-
”Tortoise SVN” と ”Subversio...
-
【DNS】ゾーン情報が上手く設定...
-
プロキシサーバとDNSサーバにつ...
-
BIND エラー not found: 3(NXD...
-
エラーメールで"too many hops"...
-
root権限によるFFFTPでの接続
-
Apacheでセッションタイムアウ...
-
iPadの受信メールが消える
-
MacでKCFErrorDomainCFNetwork ...
-
cronの実行結果をメールで受け...
-
nslookup IPアドレスの数
-
Windows11のファイル共有
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
コマンドでのFTP転送が進まない。
-
Access2000でFTPの使い方につい...
-
「Norton 360 2.0」のダウンロ...
-
FTPで・・・
-
パスワード設定していないユー...
-
リモートデスクトップ接続でパ...
-
DNSサーバを設定したのですがns...
-
同一のホスト名で何か問題があ...
-
エクセルで#N/Aを含めた平均値...
-
エラーメールで"too many hops"...
-
循環参照にならない方法があっ...
-
ワークグループ設定のPCの名前解決
-
”Tortoise SVN” と ”Subversio...
-
AWSでSSH接続をしたいのですが...
-
Mailの送信済みメールボックス...
-
「DNSサーバーを自動的に取得す...
-
同じ独自ドメインを2つのサーバ...
-
iPadの受信メールが消える
-
プロキシサーバとDNSサーバにつ...
-
サーバ空きスペースの活用方法
おすすめ情報