但是我发现实现不了！请大家帮忙看看那里有问题
<%
sURL=replace(Request.ServerVariables("HTTP_HOST"),"www.","")
if InStr(sURL,"=")<>0 or InStr(sURL,"`")<>0 or InStr(sURL,"'")<>0 or InStr(sURL," ")<>0 or InStr(sURL," ")<>0 or InStr(sURL,"'")<>0 or InStr(sURL,chr(34))<>0 or InStr(sURL,"\")<>0 or InStr(sURL,",")<>0 or InStr(sURL,"<")<>0 or InStr(sURL,">")<>0 then
Response.Status= "404 no found"
Response.End
end if
first_name=split(sURL,".")
if ubound(first_name)>3 then
Response.Status= "404 no found"
Response.End
end if
if first_name(1)="globalec" then
sql="select url,[user] from corporation where [user]='"&first_name(0)&"' and flag=1"
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1
if rs.eof then
response.write getUrl(""&weburl&"company/no.asp")
else
response.write getUrl(""&weburl&""&replace(rs("url"),""&rs("user")&".html","home.asp?MemberId="&rs("user")&"")&"")
end if
rs.Close
set rs=nothing
conn.Close
set conn=nothing
else
response.write"<div align=center><br><br><br><font color=red>此用户已经被删除或未通过审核！</font></div>"
response.write"<div align=center><br><br><br><b><a href=javascript:history.go(-1)>返回</a></b></div>"
end if
%>
打开用户二级出现的是 “此用户已经被删除或未通过审核”