我想做一个用户登陆的页面,我是这么做的: <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% option explicit dim conn,db,sql,username,userpasswd,rs db="mdb/login.mdb" userpasswd=response.querystring("textpasswd") username=response.querystring("textname") if trim(username)="" then %> <style type="text/css"> <!-- .style1 { font-family: "宋体"; font-size: 10pt; } --> </style>
<p><span class="style1">对不起,请填写用户名!</span> <% response.end() end if %> <%Set conn = Server.CreateObject("ADODB.Connection") conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db) sql="select login,passwd from name where name='"&username&"' and passwd='"&userpasswd&"'" Set rs = Server.CreateObject("ADODB.RecordSet") rs.open sql,conn,1,1 if not rs.eof then if rs("login")=username and rs("passwd")=userpasswd then nextpage="loginok.asp" else nextpage="parry.asp" end if else %> </p> <p class="style1">对不起,没有找到此用户!</p> <%end if%> <%rs.close conn.close set conn=nothing response.redirect(nextpage) %> 可是他提示说对象不支持此属性或方法:'response.querystring 出错行是红字的行,能帮我看看么?谢谢!!!