Tabledefs

[donga]

Dae pessoal, tenho uma duvida...

existe como mostrar o nome das tabelas de um mdb em asp?

algo como tabledefs().name?

obrigado

[donga]

Galera consegui...

<%

db = Server.MapPath("banco.mdb")

dbtemp = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & db

set cat = CreateObject("ADOX.Catalog")

set conn = CreateObject("ADODB.Connection")

conn.open dbtemp

cat.activeConnection = conn

for i=0 to cat.tables.count-1

typ = cat.tables(i).type

nam = cat.tables(i).name

if typ = "TABLE" then

response.Write(nam & "<br>")

end if

Next

conn.close

set conn = nothing

set cat = nothing

%>