abrir hipervinculos desde formulario a ruta

16/05/2010 - 01:24 por anabcn | Informe spam
Hola a todos!
Ante todo deciros que no se casi nada de programacion.

Me estoy haciendo una base de datos de mis libros electronicos, ya he
conseguido abrir las imagenes de las portadas

Dim PathImagenes, FicheroImagen

PathImagenes = DLookup("imagen", "imagenes")

FicheroImagen = [Numero] & ".jpg"

nombreImagen.Picture = PathImagenes & FicheroImagen
almacenado en el evento current del formulario

y ahora lo que quiero es abrir directamente el libro, el sistema seria
el mismo, crear una tabla con un unico registro en el que guardo la
ruta en la que se encuentran los libros de manera que desde el campo
link (que he definido como hipervinculo) me lleve al libro, es decir
que abra la ruta del libro.
Lo que he hecho ha sido copiar más o menos lo que me habia funcionado
en la imagen

Dim PathLibro, FicheroLibro

PathLibro = DLookup("libro", "libros")

FicheroLibro = [Numero] & ".fb2"


Link = Application.FollowHiperLink(PathLibro & FicheroLibro)

Pero no me funciona, Numero es el campo que une el registro del
formulario con el nombre del libro.
Me podeis ayudar?
Mil gracias

Ana
 

Leer las respuestas

#1 Emilio
16/05/2010 - 08:02 | Informe spam
¡Importante!: Colabora con el grupo. Contesta a este mensaje
y dinos si te sirvió o no la respuesta dada. Muchas gracias
Hola!
En primer lugar ejecuta el proceso paso a paso y verifica en cada momento el
contenido de las variables para saber si el contenido es correcto.
En segundo lugar FollowHiperLink(PathLibro & FicheroLibro), siempre que
PathLibro & FicheroLibro construya una ruta correcta, debería ser
suficiente, asignarlo a una variable (Link) no me parece que sea correcto.

Saludos a todos
Emilio [MS-MVP Access 2006/10]
miliuco56 ALGARROBA hotmail.com
http://www.mvp-access.com/foro
http://www.mvp-access.es/emilio


"anabcn" escribió en el mensaje de
noticias:
Hola a todos!
Ante todo deciros que no se casi nada de programacion.

Me estoy haciendo una base de datos de mis libros electronicos, ya he
conseguido abrir las imagenes de las portadas

Dim PathImagenes, FicheroImagen

PathImagenes = DLookup("imagen", "imagenes")

FicheroImagen = [Numero] & ".jpg"

nombreImagen.Picture = PathImagenes & FicheroImagen
almacenado en el evento current del formulario

y ahora lo que quiero es abrir directamente el libro, el sistema seria
el mismo, crear una tabla con un unico registro en el que guardo la
ruta en la que se encuentran los libros de manera que desde el campo
link (que he definido como hipervinculo) me lleve al libro, es decir
que abra la ruta del libro.
Lo que he hecho ha sido copiar más o menos lo que me habia funcionado
en la imagen

Dim PathLibro, FicheroLibro

PathLibro = DLookup("libro", "libros")

FicheroLibro = [Numero] & ".fb2"


Link = Application.FollowHiperLink(PathLibro & FicheroLibro)

Pero no me funciona, Numero es el campo que une el registro del
formulario con el nombre del libro.
Me podeis ayudar?
Mil gracias

Ana

__________ Information from ESET Smart Security, version of virus
signature database 5117 (20100515) __________

The message was checked by ESET Smart Security.

http://www.eset.com






__________ Information from ESET Smart Security, version of virus signature database 5117 (20100515) __________

The message was checked by ESET Smart Security.

http://www.eset.com

Preguntas similares