公共部分

来源:互联网 发布:公司海关出口数据查询 编辑:程序博客网 时间:2024/04/27 11:39

 1、Access数据库连接代码
方法一:
db="mydata.mdb" ‘如果放在目录中,就要写明"database/mydata.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
conn.Open connstr

方法二:
'如果你的服务器采用较老版本Access驱动,请用下面连接方法
db="mydata.mdb" ‘如果放在目录中,就要写明"database/mydata.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db)
conn.Open connstr

 

 

session
<%
if not session("name")=" " then
response.redirect "login.asp"
%>

 

<Link href="Css.css" rel=stylesheet>
</head>
<!--#include file="Conn.asp"-->
<!--#include file="Function.asp"--> 
<body>

原创粉丝点击