Login | Register   
Twitter
RSS Feed
Download our iPhone app
TODAY'S HEADLINES  |   ARTICLE ARCHIVE  |   FORUMS  |   TIP BANK
Browse DevX
Sign up for e-mail newsletters from DevX


Tip of the Day
Language: VB7
Expertise: Intermediate
Apr 21, 2003

IsDriveReady - Returns whether a drive is ready

' Returns a boolean indicating whether a given drive is ready
' Example: check if the floppy disk drive is ready
'   Debug.WriteLine(IsDriveReady("a"))

Function IsDriveReady(ByVal driveLetter As String) As Boolean
    If driveLetter.Length = 1 Then driveLetter &= ":\"
    Dim drive As New System.IO.DirectoryInfo(driveLetter)
    Try
        ' if the drive is not ready, the following line will throw an IO 
        ' exception
        drive.GetDirectories()
        Return True
    Catch e As Exception
        Return False
    End Try
End Function
Marco Bellinaso
 
Comment and Contribute

 

 

 

 

 


(Maximum characters: 1200). You have 1200 characters left.

 

 

Sitemap