conn.asp

来自「一个FLASH投票源代码,支持多种定义,并附有后台管理」· ASP 代码 · 共 18 行

<%
dim conn   
dim connstr
on error resume next
connstr="PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE='"&server.mappath("dbase/vote.mdb")&"'"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr

sub closedb()
 conn.close
 set conn=nothing
end sub

sub closers()
 rs.close
 set rs=nothing
end sub
%>