Necesito de su ayuda

[fatiga89]

Buen día a todos y desde ya agradezco su aporte. Mi problema es el siguiente, estoy haciendo un programa para el trabajo en el cual por medio de botones ejecute distintas aplicaciones, hasta ahí todo bien, el problema esta en que esto lo quiero poder grabar en un dvd o pasar pon pendrive para que se pueda utilizar en mi trabajo. Y como no todas las lectoras o pendrive se les asigna la misma unidad no se como hacer para identificarla y así poder llamar a las aplicaciones . Acá les dejo un ejemplo para que me entiendan.

Shell("Unidad(que ir variando):\programas\aplicacion.exe")

Desde ya gracias.

[XresH]

Holas,
Podes leerte este hilo, esa informacion podes aplicarla a tu software y no vas a tener inconvenientes.

Código [Seleccionar] Expandir


http://www.recursosvisualbasic.com.ar/htm/listado-api/api-29.htm

En el ejemplo fijate en este code:

Código (vb) [Seleccionar] Expandir

' Función Api GetDriveType para obtener el tipo y clase de unidad 
Private Declare Function GetDriveType _ 
    Lib "kernel32" _ 
    Alias "GetDriveTypeA" ( _ 
    ByVal nDrive As String) As Long 
 
Private Sub Command1_Click() 
' Llamamos a la función pasandole la unidad que queremos obtener la información 
Select Case GetDriveType(Trim(Text1)) 
        Case 2 
            ' Unidad de tipo removible, por ejemplo la unidad A: 
            MsgBox "Unidad removible" 
        Case 3 
            ' Por ejemplo un disco duro 
            MsgBox "Unidad Fija" 
        Case Is = 4 
            ' Una unidad de red 
            MsgBox "Unidad remota" 
        Case Is = 5 
            'Unidad de Cd - Dvd 
            MsgBox "Unidad de Cd-Rom" 
        Case Is = 6 
            ' Para una unidad de dsico Virtual 
            MsgBox "Unidad virtual" 
        Case Else 
            'Cuando es desconocida 
            MsgBox "Unidad no reconocida" 
    End Select 
End Sub

De seguro es el inidicado, pero ahi vos ves que te sirve mas usar.

Saludos.

[fatiga89]

Muchísimas gracias, ahora lo aplicare y veré como me sale