Visual Basic - Reconocimiento de unidad

Life is soft - evento anual de software empresarial
   
Vista:

Reconocimiento de unidad

Publicado por carlos (125 intervenciones) el 11/01/2008 20:42:56
tengo un prigrama con este codigo

For i = 68 To 90 'de la D a la Z
Set d = fs.GetDrive(CStr(Chr(i)) & ":")
Respira 100
If d.drivetype = 1 Then '1 = removable
flag = True
Exit For
End If
Next

esto me agarra la unidad que este conectada, pero en maquinas que tiene particiones me agarra la unidad de la particion cuando la idea es que agarre el disco extraible si algo "d" la declaro asi

Dim d
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder