Questa pagina riceve user e psw da una pagina precedente..il passaggio avviene perfettamente però da un'errore..


<%@ language= VBScript %>
<%option explicit%>
<% dim sql,conn,rs,x, User, Psw
User = request.Form ("User")
Psw = request.form ("Psw") %>
<html>
<head>
<title> Visulizzazione Assenze e ritardi </title>
</head>
<body>
<%
set conn=server.createobject("adodb.connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.open(server.mappath("prova.mdb"))
set rs=Server.CreateObject("ADODB.Recordset")
sql=" select* from Studenti"
rs.open sql,conn
if rs("User")=User and rs("psw")= psw then
sql="select* from Movimenti,Studenti where rs(User)=User and rs(psw)=psw"
rs.open sql,conn %>
<table border "3" width "100%">
<tr>
<% for each x in rs.fields
response.write("<th>"& x.name & "</th>")
next%>
</tr>
<% do until rs.EOF%>
<tr>
<%for each x in rs.fields %>
<td> <% response.write(x. value)%> </td>
<%next
rs.movenext%>
</tr>
<%loop
rs.close
conn.close
%>
</table>
else
<h4>User o password errati</h4>
<a href="http://10.0.6.100/lavori_5b0506/RegistroAssenze/richiestapsw.asp">
end if
</body>
</html>

Tipo di errore:
Errore di compilazione di Microsoft VBScript (0x800A03F6)
Previsto 'End'
/lavori_5b0506/RegistroAssenze/visual.asp, line 36


Riuscite a trovare cosa nn avrei chiuso??

Grazie