哪位好心人帮我看看

来源:百度知道 编辑:UC知道 时间:2024/05/11 01:12:42
有哪位好心人帮我解释一下下面的程序好吗?
<%
Set conn=Server.CreateObject("ADODB.Connection")
conn.Open="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="+server.mappath("../09/BBS.mdb")

%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>用户登录</title>
</head>

<body bgcolor="#FFCCFF">
<p>
<%
if Request("UID")<>"" AND Request("PWD")<>"" Then
sql="SELECT * FROM currentuser WHERE UID='"&Request("UID")&"'"
set currentuserRs=conn.Execute(sql)
if currentuserRs.Bof or currentuserRs.Eof then
LogTime=Now()
SerialNum=Cstr(Hour(logTime))&Cstr(Minute(LogTime))&Cstr(Second(LogTime))&Cstr(Int(Rnd*10000))
sql="INSERT INTO currenteuser(UID,E

<%
Set conn=Server.CreateObject("ADODB.Connection") //以下为数据库连接参数
conn.Open="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="+server.mappath("../09/BBS.mdb")

%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>用户登录</title>
</head>

<body bgcolor="#FFCCFF">
<p>
<%
/*用户名,密码非空,执行查询*/
if Request("UID")<>"" AND Request("PWD")<>"" Then
sql="SELECT * FROM currentuser WHERE UID='"&Request("UID")&"'"
/*记录登陆时间*/
set currentuserRs=conn.Execute(sql)
if currentuserRs.Bof or currentuserRs.Eof then
LogTime=Now()
/*将时间转换成字符并加随机5位数结尾组成序号*/
SerialNum=Cstr(Hour(logTime))&Cstr(Minute(LogTime))&Cstr(Second(LogTime))&Cstr(Int(Rnd*10000))