- 289 名前：281 mailto:sage [2008/12/02(火) 00:08:28 ID:UnhUIZAX0]
- strDrive = "Z:"
Set objFSO = WScript.CreateObject("Scripting.FileSystemObject")
If Err.Number = 0 Then
nFlag = False
For nCount = 1 To 180 ' 180秒まで待ってみる
nFlag = objFSO.DriveExists(strDrive)
If nFlag = False Then
WScript.Sleep(1000) ' １秒待ってみる
End If
Next
