Access & VBA FAQ
| | | |
Indice de temas
Tablas
Consultas
Formularios
Informes
Macros
Módulos
Base de datos
Miscelánea
API
Utilidades
Problemas
Cadenas
Fechas
Todos los temas
Base de datos : CurrentProjectName
Autor/es:
Juan M Afán de Ribera
Pregunta : ¿Cómo puedo obtener a través de código el nombre de la base de datos actual? Sólo el nombre, no la ruta completa del archivo
Respuesta : Si utilizas Access 2000 o superior, puedes utilizar la propiedad Name del objeto CurrentProject. Por ejemplo:
nombre_de_la_base_de_datos = CurrentProject.Name
Respuesta : Si utilizas Access 97, puedes utilizar la siguiente función
'---------------------------------------------------------
'
' CurrentProjectName
'
' Código escrito originalmente por Juan M Afán de Ribera.
' Estás autorizado a utilizarlo dentro de una aplicación
' siempre que esta nota de autor permanezca inalterada.
' En el caso de querer publicarlo en una página Web,
' por favor, contactar con el autor en
'
'     accessvbafaq@ya.com
'
' Este código se brinda por cortesía de
' Juan M. Afán de Ribera
'
Function CurrentProjectName() As String
    CurrentProjectName = Dir(CurrentDb.Name)
End Function

Ejemplos:

 

Temas relacionados:

CurrentProjectPath

 

Última actualización: 18/12/2004