conn.asp

来自「一个用ASP和access做的简单的在线上传小系统」· ASP 代码 · 共 14 行

<%
dim conn
dim connstr
'on error resume next
connstr="DBQ="+server.mappath("shujuku.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
set rs=server.createobject("adodb.recordset")
sub CloseConn()
	conn.close
	set conn=nothing
end sub
%>