Copiar ruta de datos adjuntos y visor del documento en un formulario
Publicado por pilar (2 intervenciones) el 02/10/2019 17:29:37
Buenas tardes,
estoy creando una base de datos en access para incluir facturas recibidas en formato pdf.
He conseguido que la ruta de acceso a los documentos me quede copiada en un campo nombrado "CarpetaLocal" y que éste quede como hipervínculo. Sin embargo por algún motivo cuando paso a un nuevo registro, la ruta continua apareciendo aunque el registro del resto de campos esté en blanco. A mi entender, supongo que estoy haciendo un error al llamar al campo "CarpetaLocal" pues todos los registros tienen el mismo campo con el mismo nombre ; pero no he sabido encontrar el modo de tener la ruta de acceso disponible para poder luego acceder al documento pdf:
El código que he utilizado es:
La idea que tengo es crear un registro para cada factura que me permita ver el documento asociado, pero ahora mismo, el documento es siempre el mismo. :-(
Aparte de eso, he querido abrir el mismo documento pdf seleccionando el hipervínculo pero no lo consigo, pues al seleccionarlo se me abre el explorador de archivos.
¿Me pueden dar alguna idea?
Muchas gracias de antemano.
Muchas gracias de antemano.
PIlar
estoy creando una base de datos en access para incluir facturas recibidas en formato pdf.
He conseguido que la ruta de acceso a los documentos me quede copiada en un campo nombrado "CarpetaLocal" y que éste quede como hipervínculo. Sin embargo por algún motivo cuando paso a un nuevo registro, la ruta continua apareciendo aunque el registro del resto de campos esté en blanco. A mi entender, supongo que estoy haciendo un error al llamar al campo "CarpetaLocal" pues todos los registros tienen el mismo campo con el mismo nombre ; pero no he sabido encontrar el modo de tener la ruta de acceso disponible para poder luego acceder al documento pdf:
El código que he utilizado es:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Private Sub CasellaBuscar_Click()
Dim fDialog As Office.FileDialog
Set fDialog = Application.FileDialog(msoFileDialogFilePicker)
With fDialog
.AllowMultiSelect = False
.ButtonName = "SELECCIONAR FACTURA"
.Title = "Seleccionar l'arxiu"
.InitialFileName = Application.CurrentProject.Path
.InitialView = msoFileDialogViewDetails
.Filters.Clear
.Filters.Add "All Files", "*.*"
If .Show = True Then
buscaArchivo = .SelectedItems(1)
End If
Me.CarpetaLocal = buscaArchivo
End With
End Sub
La idea que tengo es crear un registro para cada factura que me permita ver el documento asociado, pero ahora mismo, el documento es siempre el mismo. :-(
Aparte de eso, he querido abrir el mismo documento pdf seleccionando el hipervínculo pero no lo consigo, pues al seleccionarlo se me abre el explorador de archivos.
¿Me pueden dar alguna idea?
Muchas gracias de antemano.
Muchas gracias de antemano.
PIlar
Valora esta pregunta


0