出来るのだＡＳＰ Ｑ＆Ａ掲示板（過去ＬＯＧ） 　訪問数 52046 昨日 889 今日 776
     【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。
Topに戻る 掲示板に戻る 検索 削除 管理者
[1739] Re:VBなんですけど
投稿者：北岳さん 2002/02/26 9:55:14
VBでは確認していませんが、
2000proのデスクトップに次のWSHを置いて実行。
f:はDVDで、ディスクを入れない状態。
　
------------1.vbs-----------
strDriveName = "f:\"
'on error resume next
Set fs = CreateObject("Scripting.FileSystemObject")
Set d = fs.GetDrive(strDriveName) '行a
'msgbox(Err.description)
If Not d.isready Then
MSGBOX("ドライブの準備ができていません")
end if
msgbox("終了")
-----------------------------
　
このままでは、ハングにはなりませんでしたが行aで
「VBScript実行時エラー：このデバイスは使用できません。」
のメッセージとともに強制終了。
　
上の２つのコメントマークを外したら、3つのメッセージが連続表示されて無事終了。
「このデバイスは使用できません。」
「ドライブの準備ができていません」
「終了」
　
VBでも、resume nextで逃げられそうですが。
VBなんですけど 　 ザクレロさん [2002/02/25 18:41:51] [1738]
　 Re:VBなんですけど 　 北岳さん [2002/02/26 9:55:14] [1739]

TreeBBS For ASP V.0.1.3
Program By ＹａｓＮｅｔ