asp 经典数据库连接文件 支持access,mssql server
Dim Conn,ConnString
Sub OpenConn()
If DB_Type = "Access" Then
ConnString = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(AccPath)
ElseIf DB_Type = "Sql" Then
ConnString = "Provider = Sqloledb; User ID = " & SqlUsername & "; Password = " & SqlPassword & "; Initial Catalog = " & SqlDatabaseName & "; Data Source = " & SqlSource & ";"
Else
Response.Write "系统数据库类型错误,请检查 Inc/Const.asp 中的数据库类型是否设置正确。"
Response.End
End If
'On Error Resume Next
Set Conn = Server.CreateObject(ConnObj)
Conn.Open ConnString
If Err Then
Err.Clear
Conn.Close : Set Conn = Nothing
Response.Write "系统数据库连接错误,请检查 Inc/Const.asp 中的数据库连接部分是否设置正确。"
Response.End
End If
End Sub
Sub CloseConn()
On Error Resume Next
If IsObject(Conn) Then
Conn.Close : Set Conn = Nothing
End If
End Sub
敢达决战官方正版 安卓版v6.7.9
下载敢达决战 安卓版v6.7.9
下载像素火影骨架佐助 (Perseverance Fire Shadow)手机版v1.16
下载要塞英雄 安卓版v33.20.0-39082670-Android
下载梦想城镇vivo最新版本 安卓版v12.0.1
梦想城镇vivo版是这款卡通风模拟经营类手游的渠道服版本,玩
怦然心动的瞬间 安卓版v1.0
怦然心动的瞬间是一款真人向的恋爱互动游戏,在游戏中玩家将扮演
曼尼汉堡店游戏 安卓版v1.0.3
曼尼汉堡店是一款非常好玩的精品恐怖类型冒险游戏,在这款游戏中
现代总统模拟器去广告版 安卓版v1.0.46
现代总统模拟器是一款休闲养成类游戏,可能对于不少的玩家来说都
现代总统模拟器付费完整版 安卓版v1.0.46
现代总统模拟器高级版在商店是需要付费的,相对于普通版本,高级