problema

[kimbo89]

mirad, tengo un problema, voy a crear un exe con  el visual basic que haga de menu, es decir botones que digan abrir esta carpeta, por ejemplo. ABRIR LAPIZ, y q lo abra tengo todo el codigo bien, pero me falla una cosa, tengo que abrir la unidad de dnd esta el exe. como lo puedo acer.. gracias..

Private Sub Command2_Click()

copiar = MsgBox("Seguro que deseas abrir el DISCO DURO?", vbOKOnly, "Copiar")

If copiar = vbOK Then Shell "explorer.exe root = ", vbMaximizedFoc us

donde pone "explorer.exe root= (ahi que pongo) gracias..

[tragantras]

Código:

Private Sub Command2_Click()
Dim copiar As Integer
copiar = MsgBox("Seguro que deseas abrir el DISCO DURO?", vbOKOnly, "Copiar")
If copiar = vbOK Then
 Shell "explorer.exe root=D:\ ", vbMaximizedFocus
End If

End Sub

No se si te refieres a eso :S lo que hace es abrir la unidad D:\ con el explorer