|
|
| Mostrar nombres de tablas de una base Access |
Este script lista las tablas que contiene un archivo de bases de datos Access (.mdb)
Espero les sirva. Suerte
<%
' String de conexión
StrConn = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.MapPath("./base.mdb")
' Filtro
strFiltro = Array(Empty,Empty,Empty,"TABLE")
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open StrConn
set rstSchema = oConn.OpenSchema(20,strFiltro)
Response.Write "<TABLE><TR><TH>Tabla</TH><TH>Tipo</TH></TR>"
Do Until rstSchema.EOF
Response.Write "<TR>"
Response.Write "<TD>"& rstSchema("TABLE_NAME") &"</TD>"
Response.Write "<TD>"& rstSchema("TABLE_TYPE") &"</TD>"
Response.Write "</TR>"
rstSchema.MoveNext
Loop
Response.Write "</TABLE>"
rstSchema.Close
set rstSchema = Nothing
oConn.Close
Set oConn = Nothing
%>
|
Autor: CoRSA |
| Fecha de envio: 30/3/2004 |
Si deseas colaborar enviando una nota como esta para mostrar en la web, ingresa aqui
|
|
|
