Instrucción para ver existencia de tabla en BD?

[ciberpato]

Hola a todos, necesito que me refresquen la memoria. Necesito saber cual instrucción debo usar para consultar la existencia de una tabla en una BD.

Gracias

[ciberpato]

Bueno ya lo encontré y se los dejo por si alguien lo necesita:

Function ReportFileStatus(filespec)
Dim fso, msg
Set fso = CreateObject("Scripting.FileSystemObject")
If (fso.FileExists(filespec)) Then
msg = filespec & " exists."
Else
msg = filespec & " doesn't exist."
End If
ReportFileStatus = msg
End Function

[moNTeZIon]

Eso te comprueba la existencia de una tabla en una BD ???

Cual es el nombre de la tabla? En qué BD los estás buscando?

Lo único que veo es que mira la existencia de un archivo en el sistema de archivos y devuelve un mensaje si existe o si no existe...

... No entiendo ...

De todas formas, aquí hay un ejemplo para comprobar la existencia de una tabla en una BD:

http://www.mvp-access.com/softjaen/b...sjspado011.htm

Saludos.

[ciberpato]

Disculpa estaba pensando en otra cosa al hacer la pregunta y la verdad es que quería
ver la existencia de un archivo en una ruta especificada por filespec. De todas maneras te agradezco tu observación. Y gracias tambien por la dirección indicada para para ver la existencia de tablas (ahora si....jeje) en una BD.... HAsta la próxima

[ciberpato]

moNTeZIon, tengo entendido que la información existente en la dirección dada es solo para ado y no ado.net.

[ciberpato]

Bien ...ya que entramos a este tema, de ver la existencia de una tabla en una base de datos sqlserver. Les cuento, lo hago mediante una consulta con el sysobjects table es decir:
select count(*) from sysobjects where name="Nombre Tabla"

Si devuelve un cero la tabla no existe de lo contrario existe......

sigamos con este tema, yo creo que da para mucho e invito a todos a dar otras soluciones.

[Mickel]

Yo haria un select top 1 del primer campo de la tabla y luego

function TablaExists(byval ds as DataSet) as boolean
return not (ds is nothing orelse ds.tables.count=0)