conn.asp

来自「该成绩管理系统面向学校、教师、学生」· ASP 代码 · 共 16 行

<%
  dim conn,user25175,pat25175,master25175,admin25175,site_name,site_logo,table_com
  user25175=session("user25175")     '学生
  pat25175=session("pat25175")       '家长
  master25175=session("master25175") '教师
  admin25175=session("admin25175")   '管理  
  Set conn = Server.CreateObject("ADODB.Connection")
  'conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("data/school.mdb") '新版本连接数据库
  conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("data/school.mdb")  '老版本连接数据库
  
  set rs=conn.execute("select sitename,sitelogo,tablecom from siteinfo where sid=1")
  site_name=rs("sitename")       '网站名称
  site_logo=rs("sitelogo")       '网站LOGO
  table_com=rs("tablecom")       '表格属性
  set rs=nothing
%>