Visual Basic - Encontrar la unidad de Cd room automaticamente

Life is soft - evento anual de software empresarial
 
Vista:

Encontrar la unidad de Cd room automaticamente

Publicado por Sergio (1 intervención) el 29/04/2003 05:17:48
Cuando creas un vinculo con alguna aplicación ajena a visual y deseas jalar los archivos desde el cdroom, como le haces para que independientemente de la unidad que este asignada siempre te encuentre el cdroom, porque cuando los discos estan particionados no puede encontrar el archivo ya que se le asigna otra letra al cdroom
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

RE:Encontrar la unidad de Cd room automaticamente

Publicado por Marco Santis (265 intervenciones) el 29/04/2003 23:37:49
Amigo:
Escribe el siguiente código :

Dim fs, d, s, t, dc
Set fs = CreateObject("Scripting.FileSystemObject")
Set dc = fs.Drives
For Each d In dc
Select Case d.DriveType
Case 0: t = "Desconocido"
Case 1: t = "Separable"
Case 2: t = "Fijo"
Case 3: t = "Red"
Case 4: t = "CD-ROM"
Case 5: t = "Disco RAM"
End Select
s = "Unidad " & d.DriveLetter & ": - " & t
MsgBox s
Next

Si te das cuenta, con la propiedad DriveType puedes obtener el tipo de unidad (valor 4 para CD-ROM)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar