
20/06/2007, 07:43
|
| | 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 |