Ver Mensaje Individual
  #2 (permalink)  
Antiguo 20/06/2007, 07:43
DIDAKE
 
Fecha de Ingreso: octubre-2006
Mensajes: 139
Antigüedad: 18 años, 6 meses
Puntos: 1
Re: Buscar en PDF

Para realizar búsquedas en los pdf se me ocurre , solo se puede abrir el Adobe Acrobat y luego utilizar la función buscar:

Para abrir un archivo pdf puedes utilizar esto :

En general declaraciones deberías ingresar esto :

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


Luego deberías "tomar" el archivo que deseas abrir y colocarlo dentro de un caja de texto. Lo podrías hacer desde un CommonDialog

Text1.Text = CommonDialog1.FileName

Luego en en un command (el que abre el archivo ) en el evento click colocar esto :

Dim archi As String
archi = Text1.Text
On Error GoTo frind
Call ShellExecute(0&, vbNullString, (archi), vbNullString, vbNullString, vbNormalFocus)
frind : Exit sub

Espero te sirva : saludos