|
|
是较早时搞的,河北现在已经打好了补丁。数据库密码应该也改了,还是将它MASK 。
今天看到一张关于河北检索的帖子,IP不同,检索的出的东西也不一样,就想到了几个月前的这几行代码:
呵呵,发这个东西无非是想捞几个积分,灌水的速度太慢了。:)
<%
dim connstr,myconn,myconn1,url1,tsg
connstr=\"driver={sql server};server=WEB-KVWLLY80A86;uid=xxxxxxxx;pwd=xxxxxxxxxx;datebase=xxxxxxx\"
set myconn=server.createobject(\"ADODB.CONNECTION\")
myconn.open connstr
remoteip=request.servervariables(\"remote_addr\")
if left(remoteip,10)=\"202.206.24\" or left(remoteip,10)=\"202.206.25\" or left(remoteip,9)=\"211.81.25\" or left(remoteip,9)=\"211.81.24\" then
url1=\"202.206.242.25\"
else
url1=\"218.11.76.25\"
end if
tsg=\"河北省高等学校数字图书馆\"
%> |
|