need help for ADOX

[sbind77]

Hi all

Below is my code
all I need is to fetch the name ofthe table and display it in the browser.

The code below doesn't give any error, but when I execute my asp page the page freezed and doesn't give any result

I don't know what's the problem

It will be great if any one help me to getout of my problem.

<!--#include file=&quot;adovbs.inc&quot;-->
<%
' LISTS ALL TABLES AND COLUMN NAMES

Dim objADOXDatabase
Set objADOXDatabase = Server.CreateObject(&quot;ADOX.Catalog&quot

objADOXDatabase.ActiveConnection &quot;Provider=Microsoft.Jet.OLEDB.4.0;&quot; & _
&quot;Data Source=e:/inetpub/test/test.mdb&quot;

Dim objTable, objColumn
For Each objTable in objADOXDatabase.Tables
If objTable.Type = &quot;TABLE&quot; then
Response.Write objTable.Name & &quot;<br>&quot;

For Each objColumn in objTable.Columns
Response.Write &quot; &quot; & objColumn.Name & &quot;<br>&quot;
Next
Response.Write &quot;<p>&quot;
End If
Next

Set objADOXDatabase = Nothing
%>


Thanks
Balachandar Thank You
sbind77