怎么传递 id 问题 没学过asp....
我只是想 一个会员登陆后 连接 到 index.asp 后面加id 号那种 但这样运行老说密码错误 就是这段程序 我没学过asp 最好能帮忙改一下Set rs1=Server.CreateObject("Adodb.RecordSet")
conn = "DBQ=" + server.mappath("database/text.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
sql="Select * From 教师姓名密码 Where id="&clng(Request.QueryString("id"))
rs1.Open sql,conn,3,3
id = rs1("id")
response.Redirect("index.asp?id="&id&"")
在 checklogin.asp 里 我是这样写的 不知道哪里错了
<%@ Language=VBScript %>
<%
Set rs1=Server.CreateObject("Adodb.RecordSet")
conn = "DBQ=" + server.mappath("database/text.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
sql="Select * From 教师姓名密码 Where id="&clng(Request.QueryString("id"))
rs1.Open sql,conn,3,3
dim name,password
dim sql
dim rs
name=request("txt1")
password=request("txt2")
set rs=server.createobject("adodb.recordset")
conn = "DBQ=" + server.mappath("database/text.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
sql="select * from 教师姓名密码 where 教师姓名='"&name&"'and 教师密码='"&password&"'"
rs.Open sql,conn,1,1
if not rs.EOF then
session("name")=name
id1 = rs1("id")
response.Redirect("index.asp?id1="&id&"")
else
response.write "<script language=JavaScript>" & chr(13) & "alert('用户或密码不正确！用户登录失败！');" & "history.back()" & "</script>"
end if
%>
[[it] 本帖最后由 kindman4 于 2008-5-12 10:56 编辑 [/it]]
