最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
asp 高级数据连接方法
时间：2022-07-02 23:11:51 编辑：袖梨 来源：一聚教程网
<%
Session.CodePage = 936
Response.Buffer = True
Response.ExpiresAbsolute = Now() - 1
Response.Expires = 0
Response.CacheControl = "no-cache"
Response.AddHeader "Pragma", "No-Cache"
Response.Charset = "gb2312"
Dim Conn
Dim Connstr
Dim DatabasePath : DatabasePath = Server.MapPath("/database/)%&!%^!#!(@&.mdb")
Set Conn = Server.CreateObject("ADODB.Connection")
Connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DatabasePath &";Persist Security Info=False"
Conn.Open Connstr
Sub CloseConn()
Conn.Close
Set conn = Nothing
End sub
%>
相关文章
- 怪物猎人荒野电锯流盾斧配装搭配分享 10-01
- 优美伤感句子摘抄大全短句 10-01
- 刺客信条影传奇锁镰鬼牙获取方法分享 10-01
- 刺客信条影传奇轻甲能剧大师装扮获取方法 10-01
- 刺客信条影传奇武士刀血影获取方法分享 10-01
- 刺客信条影私贩运营支线任务攻略分享 10-01