</BODY></HTML>
此处引用了复制在本地变量中的系统设置数据,通过这几处引用,可以体会到本系统将数据库中常用数据一次复制到本地变量中的好处。
登陆判定
当个人拥护进行例如发布简历、修改个人信息等操作时,程序需要验证用户是否已经登陆作为前提条件,如果用户没有登陆,则不应该访问这些页面,因此需要制作一个判断用户是否登陆并加以处理的模块。同样,企业用户在进行职位招聘信息的填写前也应首先登陆。在本系统中,以对个人用户是否登陆的判定例示讲解对于登陆的判定方法,对个人用户是否登陆的判断是通过在inc/person.inc文件中的代码实现的,如下所示:
inc/person.inc文件中用户登陆判定代码
<% if session("cuid")<>"" and session("puid")<>"" then
session.Abandon
response.write"<SCRIPT language=VBScript>alert('用户非法登录,正在返回首页,请重新登录!');"
response.write"this.location.href='../';</SCRIPT>"
end if
if session("puid")="" then
response.write"<SCRIPT language=VBScript>alert('操作超时,请重新登录!');"
response.write"this.location.href='../';</SCRIPT>"
end if
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../database/jy.mdb")
set rs=createobject("adodb.recordset")
sql="select * from system"
rs.open sql,Conn
if not rs.eof then
title=rs("title")
homename=rs("homename")
homeurl=rs("homeurl")
copyen=rs("copyen")
notice=rs("notice")
tel=rs("tel")
top=rs("top")
link1=rs("link1")
link11=rs("link11")
link2=rs("link2")
link22=rs("link22")
link3=rs("link3")
link33=rs("link33")
link4=rs("link4")
link44=rs("link44")
link5=rs("link5")
link55=rs("link55")
link6=rs("link6")
link66=rs("link66")
ymail=rs("ymail")
smail=rs("smail")
address=rs("address")
copycn=rs("copycn")
pics1=rs("pics1")
piclinks1=rs("piclinks1")
pics2=rs("pics2")
piclinks2=rs("piclinks2")
pics3=rs("pics3")
piclinks3=rs("piclinks3")
pics4=rs("pics4")
piclinks4=rs("piclinks4")
end if
rs.close
%>
<%
set rs=createobject("adodb.recordset")
sql="select * from link"
rs.open sql,Conn
if not rs.eof then
piclink0=rs("piclink0")
piclink00=rs("piclink00")
piclink1=rs("piclink1")
piclink11=rs("piclink11")
piclink2=rs("piclink2")
piclink22=rs("piclink22")
piclink3=rs("piclink3")
piclink33=rs("piclink33")
piclink4=rs("piclink4")
piclink44=rs("piclink44")
piclink5=rs("piclink5")
piclink55=rs("piclink55")
piclink6=rs("piclink6")
piclink66=rs("piclink66")
piclink7=rs("piclink7")
piclink77=rs("piclink77")
piclink8=rs("piclink8")
piclink88=rs("piclink88")
piclink9=rs("piclink9")
piclink99=rs("piclink99")
piclinka=rs("piclinka")
piclinkaa=rs("piclinkaa")
piclinkb=rs("piclinkb")
piclinkbb=rs("piclinkbb")
piclinkc=rs("piclinkc")
piclinkcc=rs("piclinkcc")
p0n=rs("p0n")
p1n=rs("p1n")
p2n=rs("p2n")
p3n=rs(