1、高校人事档案管理系统实现代码
登陆主界面的ASP实现代码:
<%@language="vbscript" codepage="936" %>
<%
'option explicit
'强制浏览器重新访问服务器下载页面,而不是从缓存读取页面
Response.Buffer = True
Response.Expires = -1
Response.ExpiresAbsolute = Now() - 1
Response.Expires = 0
Response.CacheControl = "no-cache"
'主要是使随机出现的图片数字随机
%>
<%
'------------------------------------------------------------------------
sql_syssetup="select * from admin_setup_sys where id is not null"
set rs_syssetup=server.CreateObject("adodb.recordset")
rs_syssetup.open sql_syssetup,conn,1,1
if not rs_syssetup.e
3、of then
session("sys_is_regself")=rs_syssetup("sys_is_regself")
session("sys_danwei")=rs_syssetup("sys_danwei")
sys_lianxiren=rs_syssetup("sys_lianxiren")
sys_tel=rs_syssetup("sys_tel")
sys_gonggao=rs_syssetup("sys_gonggao")
end if
rs_syssetup.close
set rs_syssetup=nothing
'------------