OKWAVEのAI「あい」が美容・健康の悩みに最適な回答をご提案!
-PR-
解決
済み

アクセスで

  • 困ってます
  • 質問No.224705
  • 閲覧数39
  • ありがとう数1
  • 気になる数0
  • 回答数1
  • コメント数0

お礼率 63% (41/65)

access2000を使用しています。
フロッピーのデータをアクセスにインポートする処理を作っているのですが、インポート処理をする前にフロッピードライブにフロッピーが入っているかどうかのチェックを行いたいです。
よろしくお願いします。
通報する
  • 回答数1
  • 気になる
    質問をブックマークします。
    マイページでまとめて確認できます。

質問者が選んだベストアンサー

  • 回答No.1
レベル14

ベストアンサー率 51% (1179/2272)

こんにちは。maruru01です。
とりあえずの方法ですが、エラー番号を拾うというやり方です。
フロッピードライブがAドライブだとすると、

Dim Ret As String

On Error Resume Next
Ret = Dir("A:\", vbDirectory)
If Err.Number = 52 Then
  MsgBox "フロッピーディスクが準備されていません。", vbCritical
  Err.Number = 0
Else
  MsgBox "フロッピーディスクは準備されています。", vbInformation
  Err.Number = 0
End If

要は、Dir関数のところで発生するエラーを拾うということです。
これは、CD-ROMやMOなどの他のリムーバブルドライブでも同様なので、転用出来ます。
一応エラーナンバー(52かどうか)を確認して下さい。
では。
お礼コメント
koichi_

お礼率 63% (41/65)

ありがとうございます。
大変勉強になりました。
投稿日時 - 2002-02-26 09:37:50
-PR-
-PR-
このQ&Aで解決しましたか?
関連するQ&A
-PR-
-PR-
このやり方知ってる!同じこと困ったことある。経験を教えて!
このQ&Aにはまだコメントがありません。
あなたの思ったこと、知っていることをここにコメントしてみましょう。

その他の関連するQ&A、テーマをキーワードで探す

キーワードでQ&A、テーマを検索する
-PR-
-PR-
-PR-

特集


いま みんなが気になるQ&A

関連するQ&A

-PR-

ピックアップ

-PR-
ページ先頭へ