Visual Basic - Buscar objeto en una Bd Access

Life is soft - evento anual de software empresarial
 
Vista:

Buscar objeto en una Bd Access

Publicado por Vanessa (2 intervenciones) el 22/01/2003 17:29:23
HOla chicos!
Si alguien podría ayudarme, que comando puedo utilizar en VB para saber si existe una tabla en una determinada Base de dAtos de Access.. o cualquier otro objecto.
Muchas gracias
Buen día
Vane
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Buscar objeto en una Bd Access

Publicado por Rodolfo del Peru (454 intervenciones) el 25/01/2003 03:25:32
Crea esta rutina sacada de www.ambsoftware.com:

Mediante este ejemplo comprobaremos la existencia de una tabla determinada en una base de datos de Microsoft Access.

Public Function TableExists(DatabaseName As String, TableName As String) As Boolean
'DataBaseName = Nombre de la base de datos
'TableName = Nombre de la tabla a buscar
Dim oDB As Database, td As TableDef
On Error GoTo errorhandler
Set oDB = Workspaces(0).OpenDatabase(DatabaseName)
On Error Resume Next
Set td = oDB.TableDefs(TableName)
TableExists = Err.Number = 0
oDB.Close
exit function
errorhandler:
Err.Raise Err.Number
Exit Function
End function

Saludos desde Lima
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Buscar objeto en una Bd Access

Publicado por Vanessa (2 intervenciones) el 28/01/2003 01:22:57
gracias Rodolfo ...por la ayuda... te respondi también a tu correo de hotmail.com

Gracias nuevamente
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar