IIS su Win 7

[sov_pas]

Salve a tutti,
ho un problema con la lettura dei dati in un DB Access con file ASP, in localhost.
Eseguendo un semplice comando
<%
Response.write("PAGINA DI PROVA")
%>
tutto OK, mentre se eseguo questa pagina


<%

Dim sc, cn, os

sc = "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("/project_DbMain/db_main.mdb")
Set cn = Server.CreateObject("ADODB.Connection")
cn.Open sc

Set os = cn.OpenSchema(20)

While os.EOF = False
If Trim(os("TABLE_TYPE")) = "TABLE" Then
Response.Write os("TABLE_NAME") & "
"
End If
os.MoveNext
Wend

Set os = Nothing
cn.Close
Set cn = Nothingz
%>

mi segnala il seguente errore:

HTTP 500
Cause più probabili:
•Il sito Web è in manutenzione.
•Il sito Web contiene un errore di programmazione.

Possibili operazioni:
Aggiornare la pagina.

Torna alla pagina precedente.

Ulteriori informazioni

****************
potete aiutarmi???
grazie

[br1]

Ci sono due discussioni in rilievo sull'argomento

[cavicchiandrea]

Set os = cn.OpenSchema(20)// cos'è?

Set cn = Nothingz// errore anche nella pagina o solo qui sul forum?