[silverlight]

أحد الأفكار إنك تحصل علي كل driver أولا الموجودة علي الكمبيوتر
و الكود سيكون شئ من هذا القبيل

PHP كود :

   Private Function GetLocalDrives() As List(Of IO.DriveInfo)
        Dim list As List(Of IO.DriveInfo) = New List(Of IO.DriveInfo)()
        Dim drives As IO.DriveInfo() = IO.DriveInfo.GetDrives()
        For i As Integer = 0 To drives.Length - 1
            Dim di As IO.DriveInfo = drives(i)
            If di.IsReady Then
                list.Add(di)
            End If
        Next
        Return New List(Of IO.DriveInfo)(list)
    End Function 


ثم تتأكد أنه جاهز للإستخدام بالكود التالي

PHP كود :

  Private Function IsReadyDrive(driveName As String) As Boolean
        Dim driveInfo As IO.DriveInfo = New IO.DriveInfo(driveName)
        Return driveInfo.IsReady
    End Function 


ثم تنقل الملف بناء علي ذلك