conn.asp

传奇2万能变形特征码+极度流畅版,以前vip买回来的,现在已经过时了

<%  on error resume next
	dim conn
	dim dbpath
   	set conn=server.createobject("adodb.connection")
	DBPath = Server.MapPath("mirdat.asp")
	conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
	dim rs
    set rs = server.createobject("adodb.recordset")
%>