
哪位大神能把下面的asp代码翻译成中文
<%dima,ba=request.form("n")b=request.form("password1")setcn=server.CreateObject("adod...
<% dima,b
a=request.form("n")
b=request.form("password1")
set cn=server.CreateObject("adodb.connection")
set re=server.CreateObject("adodb.recordset")
cn.open="Driver={Microsoft Access Driver(*.mdb)};Dbq="&server.MapPath("sjk.mdb")
re.open"select*form khb where name="'&a&'"",cn,3,3
if re.eof and re.bofthen
Response.Write(<script>alert('对不起,请先注册!’);location.href='biaodan.asp';</script>")
response.end()
else
if b=re("password1")then
session("id")=re("customerid") session("n")=re("name") session("xb")=re("sex")
Response.Write("<script>location.href='shouye.asp';</script>")
else
Response.Write("<script>alert('密码错误!');location.href='kehu.asp';</script>")
response.end()
end if end if%> 展开
a=request.form("n")
b=request.form("password1")
set cn=server.CreateObject("adodb.connection")
set re=server.CreateObject("adodb.recordset")
cn.open="Driver={Microsoft Access Driver(*.mdb)};Dbq="&server.MapPath("sjk.mdb")
re.open"select*form khb where name="'&a&'"",cn,3,3
if re.eof and re.bofthen
Response.Write(<script>alert('对不起,请先注册!’);location.href='biaodan.asp';</script>")
response.end()
else
if b=re("password1")then
session("id")=re("customerid") session("n")=re("name") session("xb")=re("sex")
Response.Write("<script>location.href='shouye.asp';</script>")
else
Response.Write("<script>alert('密码错误!');location.href='kehu.asp';</script>")
response.end()
end if end if%> 展开
1个回答
展开全部
1定义变量a,b 2-3从表单获取值 4建立数据库连接对象cn 5建立记录集对象re
6连接Access数据库文件sjk.mdb 7执行查询语句结果在re中
8-10查询无果,未注册用户跳转到biaodan.asp
11-14注册用户且密码值为真,则定义三个session变量后跳转到shouye.asp
15-注册用户但密码为假,则提示错误,跳转到kehu.asp
6连接Access数据库文件sjk.mdb 7执行查询语句结果在re中
8-10查询无果,未注册用户跳转到biaodan.asp
11-14注册用户且密码值为真,则定义三个session变量后跳转到shouye.asp
15-注册用户但密码为假,则提示错误,跳转到kehu.asp
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询