------------
Microsoft JET Database Engine error '80040e10'
No value given for one or more required parameters.
/ValUser.asp, line 20
----------------------
lo que trae esta pag asp es esto
LA LINEA QUE ESTA EN ROJO ES LA LINEA 20, QUE PUEDO HACER? ME FALTARA ALGO ?
Código:
<% dim sUser dim SPwd dim sQuery dim cn dim rs dim DNS sUser = Request.Form("txtUsuario") sPwd = Request.Form("txtPassword") ' DNS= "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&server.mappath("\cgi-bin\userevm.mdb")&";Persist Security Info=False" set cn= server.createobject("ADODB.Connection") cn.Open ("Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&server.mappath("\cgi-bin\userevm.mdb")&";Persist Security Info=False") set rs= server.createobject("ADODB.Recordset") sQuery = "Select * From userevm where username = '" & sUser & "'" ' rs.Open sQuery set rs = cn.Execute(sQuery) If rs.BOF and rs.EOF then Application("ValidUser") = 1 Response.Redirect("login.asp") Else if trim(sPwd) = trim(rs.fields("pass").value) then Application("ValidUser") = 0 Session("User")=sUser Session("Pwd")=sPwd Response.Redirect("prueba.htm") else Application("ValidUser") = 1 Response.Redirect("login.asp") end if End If rs.Close Set rs = Nothing cn.close set cn = Nothing %>