Programación General > Visual Basic 6.0 e inferiores

 Una Facil

(1/1)

Jamaicol:
Supongo que sera una chorrada pero me he creado una ventana de dialogo para meterla dentro de el autorun de un cd y cuando le doy al boton de aceptar querria que me abriese el contenido del cd en una ventana en plan explorar el cd, pero me estoy volviendo loco para encontrar la orden.
Se que se ha de utilizar el app.path para abrir el path o sea la raiz del cd pero no logro abrir una ventana nueva. A lo mas que he llegado a sido a
Shell (app.Path)
que me da un precioso error de ejecucion la mar de mono.
Seguro que es una chorradita pero no logro averiguarla por mi cuenta, a ver si lo sabeis.

shakka:
prueba esto; abre el subdirectorio de window$  :)


--- Código: Text ---Option Explicit Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _  ( _    ByVal hwnd As Long, _    ByVal lpOperation As String, _    ByVal lpFile As String, _    ByVal lpParameters As String, _    ByVal lpDirectory As String, _    ByVal nShowCmd As Long _  ) _As Long Private Declare Function GetDesktopWindow Lib "user32" () As Long Private Sub CommandButton1_Click()  Dim lRtn As Long  Dim hDC As Long    hDC = GetDesktopWindow()  lRtn = ShellExecute(hDC, "Open", "C:\WINDOWS", "", "", 1)End Sub 
tendira que cambiar la path

avisa si no funciona  :(

Jamaicol:
Gracias, funciona de lujo, te debo unas cervezas

Navegación

[0] Índice de Mensajes