Verificar que existe una tabla en Mysql

[CalcU]

Buenas!, a ver como arreglo esto:
Cuando trabajaba bajo access usa el "openschema" y hacia un recorrido por
las tablas a ver si existia la que buscaba, pero con mysql esto no funciona
...
como puedo verificar que una tabla existe?

Gracias!
Calcu

[unknown]

Hola CalcU,

Esta funcion te devuelve true o false segun exista la tabla o no, yo la uso
para varias bases de datos y hasta ahora no tuve problemas:

Function ExisteTabla(Base As ADODB.Connection, Tabla As String) As Boolean
On Error GoTo ER
ExisteTabla = False
Dim TDS As ADODB.Recordset
Set TDS = Base.OpenSchema(adSchemaTables)
Do Until TDS.EOF
If ("" & TDS("TABLE_TYPE") = "TABLE" Or "" & TDS("TABLE_TYPE") =
"VIEW") And (UCase("" & TDS("TABLE_NAME")) = UCase(Tabla) Or UCase("" &
TDS("TABLE_NAME")) = UCase(Tabla) & Chr$(0)) Then
ExisteTabla = True
Exit Do
End If
TDS.MoveNext
Loop
TDS.Close
Sale:
On Error GoTo 0
Set TDS = Nothing
Exit Function
ER:
Resume Sale
End Function

--
Un saludo, Víctor Koch.

Post by CalcU
Cuando trabajaba bajo access usa el "openschema" y hacia un recorrido por
las tablas a ver si existia la que buscaba, pero con mysql esto no funciona
...
como puedo verificar que una tabla existe?
Gracias!
Calcu

[Rubén Vigón]

Hola CalcU,

Puedes consultar la tabla INFORMATION_SCHEMA.TABLES:
http://dev.mysql.com/doc/refman/5.0/en/tables-table.html

Un saludo!

Rubén Vigón
Microsoft MVP Visual Basic
http://vigon.mvps.org

[CalcU]

Gracias a los dos, la que usa Victor es la que yo usaba en Access, pero no
se por que no funcionó ..., la voy a verificar.

Gracias!