loop af gemte forespørgsler???

Eks:

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& server.mappath("DATABASENAVN.mdb")
Set rs = Conn.openschema(20)
Do until rs.eof
  If rs("TABLE_TYPE") <> "TABLE" Then
    Response.Write rs("TABLE_NAME") & "<BR>"
  End if
  rs.movenext
Loop
Set rs = nothing
Conn.Close
Set Conn = nothing

UPS rettelse koden skal se sådan ud.. Der er en fejl i if sætnigen i det forrige svar:


Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& server.mappath("DATABASENAVN.mdb")
Set rs = Conn.openschema(20)
Do until rs.eof
  If rs("TABLE_TYPE") = "VIEW" Then
    Response.Write rs("TABLE_NAME") & "<BR>"
  End if
  rs.movenext
Loop
Set rs = nothing
Conn.Close
Set Conn = nothing