He encontrado este código, que seguro que le vendrá útil a más de uno:
Código:
<%
Const adSchemaTables = 20
Set oConn=CreateObject("ADODB.Connection")
oConn.Open "Provider=SQLOLEDB; Data Source=(local); Initial Catalog=base de datos; User Id=sa; Password=****;"
strFiltro = Array(Empty,Empty,Empty,"TABLE")
set rstSchema = oConn.OpenSchema(adSchemaTables,strFiltro)
Do Until rstSchema.EOF
Response.Write "Table name: " & rstSchema("TABLE_NAME") &"<BR>"
rstSchema.MoveNext
Loop
rstSchema.close
oConn.close
%>
Me gustaría que alguien me explicara ese código por qué funciona así.
Es decir: ¿qué es eso de la constante adSchemaTables? ¿Por qué a 20? ¿Para qué sirve el OpenSchema? ¿Por qué un array de 4 elementos?
Saludos