Cita:
|
Iniciado por rycardo2005
Necesito abrir desde mi programa un archivo PDF, y no se como hacerlo
shell abre archivos ejecutables, y no me sirve, gracias :shock:
|
dim datos as string
dim ejecuta as long
datos = "rundll32.exe url.dll,FileProtocolHandler "
datos = datos & "ruta del archivo"
ejecuta = Shell(datos, 1)
Esto vale para todo tipo de ficheros, te busca automaticamente la aplicacion con la q abrir el fichero de la ruta.