conn.asp

千年免费电影系统 V3.1版 修正了V3.0版后台无法登陆的问题

<%'连数据库
dim conn,connstr
on error resume next
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("../data/#tk007#com#skyuc#com#2#6.asp")
set conn=server.createobject("adodb.connection")
if err then
  err.clear
else
	conn.open connstr
	if err then
	   err.clear
	end if
end if
%>