connplus.asp

银行+服务插件 for Dvbbs

<%
dim connPlus,connstrPlus,dbPlus
'更改数据库名字
dbPlus="data/#jy_plus.mdb"
Set connPlus = Server.CreateObject("ADODB.Connection")
connstrPlus="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(dbPlus)
'如果你的服务器采用较老版本Access驱动，请用下面连接方法
'connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db)
connPlus.Open connstrPlus

function CloseConnPlus
	on error resume next
	connPlus.close
	Set connPlus = Nothing
End Function
%>