JuanBC
19 de Enero del 2005

Hola, Mi nombre es Juan, estoy realizando una aplicacion para gestionar proyectos realizados en excel o word, la aplicacion va a mostrar la ruta de los archivos, el formato, la fecha y la persona que lo ha hecho, necesito un boton que se llame "Abrir", que cuando lo pulse me ejecute el archivo que tenemos seleccionado.

Sabeis alguna funcion que ejecute un archivo con su correspondiente programa?

Gracias de antemano.

en?
19 de Enero del 2005

hola JuanBC,

existe la API de Windows ShellExecute, que puede abrir ficheros ejecutables, o documentos con su aplicaci贸n asociada.

Pega la declaraci贸n de la funci贸n como Private en el formulario donde se ejecutar谩, o como Public en un m贸dulo si puede ser llamada por m谩s de un formulario:

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


Y en tu bot贸n "Abrir"

Private Sub Command1_Click()
Dim hVal As Long

hVal = ShellExecute(Me.hwnd, "Open", "C:...RUTA...FICHERO.EXT", vbNullString, vbNullString, 1)
End Sub

Si la funci贸n devuelve un valor menor de 33, se ha producido un error, sin贸 hVal tendr谩 asignado el handle de la aplicaci贸n.