<%
if Request.ServerVariables("SERVER_NAME")<>"www.918x.cn" then
Response.Write "系统发生严重错误,请联系管理员。"
Response.End
else
db="/db/#mdb.mdb"
On Error Resume Next
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source= "&Server.MapPath(""&db&"")&" ;Persist Security Info=False;Jet OLEDB:Database Password=5656400_+zwhua "
On Error Resume Next
Set conn = Server.CreateObject("ADODB.Connection")
conn.open ConnStr
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "读取系统数据错误,请联系管理员。"
Response.End
End If
end if
page=Replace(Replace(request("page"),"'",""),Chr(39),"")
%>
仔细看下以上代码 表示如果该网站原文件不是在 www.918x.cn玉米下使用将会发生错误
我们来把
if Request.ServerVariables("SERVER_NAME")<>"www.918x.cn" then
修改为
if Request.ServerVariables("SERVER_NAME")<>"www.你的玉米.cn" then
或者:
<%
if Not (Request.ServerVariables("SERVER_NAME")="www.918x.cn" Or Request.ServerVariables("SERVER_NAME")="918x.cn") then
Response.Write "系统发生严重错误,请联系管理员。"
Response.End
else
db="db/#mdb.mdb" (绝对路径)
◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。