conn.asp
来自「一个比较完整的企业erp系统」· ASP 代码 · 共 13 行
ASP
13 行
<%
'Option Explicit
Response.Buffer = True
Response.Expires = 0
function GetDataConnection()
dim oConn, strConn
Set oConn = Server.CreateObject("ADODB.Connection")
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("../Template.mdb")
oConn.Open strConn
set GetDataConnection = oConn
end function
%>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?