Aviso al no existir origen de tablas vinculadas |
Responder |
Autor | |
Ezel
Nuevo Unido: 14/Agosto/2020 Localización: Cuba Estado: Sin conexión Puntos: 35 |
Tema: Aviso al no existir origen de tablas vinculadas Enviado: 18/Octubre/2020 a las 01:25 |
Hola mis colegas. Estoy enfrascado en automatizar un procedimiento de importación desde otro fichero de Access, para el que he concebido una tabla vinculada a la otra base de datos (origen) y funciona mediante la ejecución de una consulta de datos anexados.
EL PROBLEMA: Quiero señalar en un cuadro de texto cuando no está presente el fichero origen de la tabla vinculada (por haber sido movido o borrado accidentalmente) con algo así como "No se reconoce el origen de los datos a importar", pero con las funciones que he probado solo obtengo #Error, incluso he probado con funciones de tratamiento de errores, sin resultados. Agradecería su ayuda en esta cuestión que me urge. Abrazos |
|
hipromark
Habitual Unido: 18/Julio/2016 Localización: Caracas Estado: Sin conexión Puntos: 71 |
Enviado: 18/Octubre/2020 a las 06:05 |
Según entiendo estas obteniendo los datos de una tabla vinculada, entonces, tal vez te funcione este pequeño truco:
Crea una consulta con la tabla origen (la tabla vinculada) y otra tabla cualquiera en tu base de datos destino. En VBA, crea un procedimiento que lea esa consulta que has creado, y lo asigne a una variable, por ejemplo: la variable rst la seteas a = db.OpenRecordset("tu consulta") (Donde rst ha sido previamente declarado como DAO.recordset, claro) Y aquí viene el truco: if rst.EOF then Aquí pones tu MsBox anunciando que no se econtró la tabla Else Ejecuta tu query de datos anexados End if Déjame saber si te funcionó.
|
|
rokoko
Colaborador Unido: 16/Febrero/2008 Localización: Pamplona Estado: Sin conexión Puntos: 3062 |
Enviado: 18/Octubre/2020 a las 12:58 |
Este es un ejemplo de Buho de 2004, creo que es exactamente lo que buscas. Adaptalo como tu quieras.
Lo que hace es verificar una tabla, si esta vinculada bien sigue el prodecimiento, si no te sale un formulario para revincular las tablas. https://www.dropbox.com/s/crwz6dqo6l57k3t/revincula2004.rar?dl=0 Busca en google vincular o revincular tablas access, te saldra mucha informacion.....
Editado por rokoko - 18/Octubre/2020 a las 12:59 |
|
Ezel
Nuevo Unido: 14/Agosto/2020 Localización: Cuba Estado: Sin conexión Puntos: 35 |
Enviado: 18/Octubre/2020 a las 13:02 |
Muchas Gracias amigo!!!!
Lo probaré aunque te confieso que mis conocimientos en VBA son aun limitados y tal vez vuelva a necesitar ayuda. Un abrazo |
|
xavi
Ver perfil usuario
Enviar mensaje privado
Ver los mensajes del usuario
Visite la página de los usuarios
Añadir a la lista de amigos
Administrador Terrassa-BCN Unido: 10/Mayo/2005 Localización: Catalunya |||| Estado: Sin conexión Puntos: 14720 |
Enviado: 18/Octubre/2020 a las 22:42 |
Abrir un recordset sobre una tabla vinculada que no está dónde se espera produce un error por lo que nunca podrás evaluar el EOF.
La manera que utilizo yo es parecida: abrir el recordset y controlar los errores 3024 (no se puedo encontrar el archivo) y 3044 (No es una ruta de acceso válida) No lo recuerdo bien pero apostaría a que el ejemplo del Búho va en esa línea. Un saludo
|
|
Ezel
Nuevo Unido: 14/Agosto/2020 Localización: Cuba Estado: Sin conexión Puntos: 35 |
Enviado: 09/Abril/2021 a las 04:06 |
Gracias amigos. Doy por cerrado el tema
|
|
xavi
Ver perfil usuario
Enviar mensaje privado
Ver los mensajes del usuario
Visite la página de los usuarios
Añadir a la lista de amigos
Administrador Terrassa-BCN Unido: 10/Mayo/2005 Localización: Catalunya |||| Estado: Sin conexión Puntos: 14720 |
Enviado: 09/Abril/2021 a las 08:03 |
¿Y la solución es?
|
|
Ezel
Nuevo Unido: 14/Agosto/2020 Localización: Cuba Estado: Sin conexión Puntos: 35 |
Enviado: 09/Abril/2021 a las 17:09 |
Al no existir el objeto origen del vínculo, se muestra por defecto un msj de error. Incluí un texto explicativo al resoecto y listo
|
|
Responder | |
Tweet
|
Ir al foro | Permisos de foro Usted No puede publicar nuevos temas en este foro Usted No puede responder a temas en este foro Usted No puede borrar sus mensajes en este foro Usted No puede editar sus mensajes en este foro Usted No puede crear encuestas en este foro Usted No puede votar en encuestas en este foro |