<%
  dim conn,rs,sqlstr,namesj,passsj,num
  namesj=request.Form("namesj")
  passsj=request.Form("passsj")
  set conn=server.CreateObject("adodb.connection")
  conn.open "dsn=asptest;Uid=sa;pwd="
  sqlstr="select name,password,qx from login where name='" & namesj &"' and  password='" & "passsj'"
  conn.execute sqlstr,num
  if num<=0 then
      response.write "<p>用户名或密码错误，请返回重试!</p>"
  else
      response.write "<p>用户名是:" & namesj
   response.write "<p>密码是:" & passsj
  end if
  conn.close
%>  

不管我输入的用户名或密码是否正确都提示错误,请问怎么回事?如何才能通过SQL进行用户的难呢?我的那句SQL语句对不对呀,谢谢

  namesj=request.Form("namesj")
  passsj=request.Form("passsj")
这个应该是要求输入的用户名和密码的变量吧？

<% dim conn,rs,sqlstr,namesj,passsj,num namesj=request.Form("namesj") passsj=request.Form("passsj") set conn=server.CreateObject("adodb.connection") conn.open "dsn=asptest;Uid=sa;pwd=" sqlstr="select name,password,qx from login where name='" & namesj &"' and password='" & passsj&"'" chk=conn.execute(sqlstr) if chk.eof then response.write "<p>用户名或密码错误，请返回重试!</p>" else response.write "<p>用户名是:" & namesj response.write "<p>密码是:" & passsj end if %>

多谢楼上的兄弟,但是我按你的方法做了,可故障依旧呀,你的那一名Chk=conn.execute(sqlstr)是不是应该写成SET chk=conn.execute(sqlstr)呀?可还是不对呀

首先SET chk=conn.execute(sqlstr) 是不对的~ 其次,你说的故障有可能是值没有传过来~ 在sqlstr="select name,password,qx from login where name='" & namesj &"' and password='" & passsj&"'" 后面加上一句: response.write sqlstr response.end 然后看看值有没有传过来,如果没有的话再检查原因,多数错误是因为变量名称不正确

但是如果不加SET的话,那么CHK是个什么类型的变量呢?它会有Eof这个方法吗?

多谢regedit兄弟的指教,问题基本搞定,不过我还是加了前面的那个SET的,有什么区别吗?请指教

还想请教你一个问题,就是我如何才能将用户名和密码以及用户权限保存下来呢?以便后面的网页调用呢

if chk.eof then response.write "<p>用户名或密码错误，请返回重试!</p>" else session("name")=rs("name") 加上这一句 　　 response.write "<p>用户名是:" & namesj response.write "<p>密码是:" & passsj end if 然后在别的页中加入 if session("name")="" then response.wirte("你还没有登录！") else response.write("成功登录！") end if

[此贴子已经被作者于2005-2-2 16:47:05编辑过]