Obtener nombre Base De Datos en la que estoy conectado

Ivan
19 de Agosto del 2004
Que tal, con una molestia actualmente le estoy dando mantenimiento a una aplicacion, per necesito obtener el nombre de la base de datos a la cual estoy conectado por medio de algun comando, para mostrarlo en el menu principal esto debe hacerce en tiempo de ejecucion Como realizo esto??

Luisen98
19 de Agosto del 2004
Funcion DBC(), extraida de la ayuda de VFP.
Devuelve el nombre y la ruta de acceso de la base de datos actual. DBC( ) devuelve la cadena vacía si no hay ninguna base de datos activa. Utilice SET DATABASE para especificar la base de datos actual.
CLOSE DATABASES
OPEN DATABASE (HOME(2) + 'datatestdata') && Abre la DBC.
CLEAR
? DBC( ) && Despliega la ruta y nombre de la BD.