conn.asp

来自「功能强大的日记本实现管理写日记和真实的日记本一样带锁不会让别人看到你的隐私」· ASP 代码 · 共 25 行

<%
'程序演示地址：http://www.5i58.net/diary.htm
'● 程序名：flash日记本和flash留言本  v1.2
'● 语言：ASP & as
'● 运行环境：Win2000 IIS，ASP+Access。
'● 开发者: www.5i58.net 我爱我吧学习网
'● 联系方式（技术支持）：QQ:50810089    MSN: [e-mail](VIP技术支持)
'如果您想用作商业用途，请与我们联系，升级为 VIP 版本

'数据库链接字符串
On Error Resume Next
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("###！￥%diary.asp")
conn.open connstr
if err.number <> 0 then
	Response.Write("连接数据库出错！请与管理员联系")
	Response.end
end if

Function CloseDataConn
  conn.close
  set conn = Nothing
end Function
%>