conn.asp

来自「本源代码为终点小说连载系统 v1.15 Build 0430 SQL清风修改版,」· ASP 代码 · 共 17 行

<%@ Language=VBScript CodePage=936%>
<%
dim conn
dim connstr
dim startime
startime=Timer * 1000
Set conn = Server.createobject("ADODB.Connection")
ConnStr="Provider=SQLOLEDB;pwd=1;User ID=sa;database=zd;Data Source=(local)"
'connstr = "Provider=Microsoft.jet.OLEDB.4.0;Data Source=" & Server.MapPath("../databas/#data#bas.mdb")
conn.Open connstr
%>
<%
sub connclose()
conn.close
set conn=nothing
end sub
%>