Access - Cómo saber si existe una tabla

 
Vista:

Cómo saber si existe una tabla

Publicado por joanignasi (21 intervenciones) el 26/03/2001 14:49:34
Necesito saber el código que me devuelva verdadero o falso cuando una tabla concreta exista en la colección de tablas. Pero no me sale.

Una ayuda?
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:Cómo saber si existe una tabla

Publicado por JuanManuel (68 intervenciones) el 26/03/2001 15:24:00
Espero que te sirva el siguiente codigo

Para ver si existe un fichero
-----------------------------
' Lo unico que debes hacer es enviar el parametro cArchivo, ejemplo ExisteaArchivo("A:\DATOS.MDB")

Function ExisteArchivo(cArchivo As String) As Boolean
ExisteArchivo = IIf(Dir$(cArchivo) = "", False, True)
End Function

Para ver si existe una tabla
----------------------------
Function fExistTable(strTableName As String) As Integer
Dim db As Database
Dim i As Integer
Set db = DBEngine.Workspaces(0).Databases(0)
fExistTable = False
db.TableDefs.Refresh
For i = 0 To db.TableDefs.Count - 1
If strTableName = db.TableDefs(i).Name Then
'Estamos de suerte, la tabla existe
fExistTable = True
Exit For
End If
Next i
Set db = Nothing
End Function

Un saludo ... ;-)

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