Ver Mensaje Individual
  #2 (permalink)  
Antiguo 05/11/2003, 06:05
nephsus
 
Fecha de Ingreso: octubre-2003
Mensajes: 41
Antigüedad: 20 años, 6 meses
Puntos: 0
Para hacer esto necesitas una api y tener instalado el access ok

la api se llama ShellExecute y ejecuta el archivo con el programa q tiene asociado
primero la declaras en un modulo.

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

declara tambien esta aunq creo q no te hace falta, pero asi qeda mas correcto.

Declare Function GetDesktopWindow& Lib "User32" ()

depues la llamas con

r = ShellExecute(GetDesktopWindow, "Open", ruta del fichero, vbNullString, vbNullString, 1)

y ya ta