<%
Dim host_url,url,filename
host_url=request.ServerVariables("HTTP_HOST")
if left(host_url,9)<>"localhost" Then

if left(request.ServerVariables("HTTP_HOST"),4)<>"www." or host_url<>"www.owon.cn" then
url = http://www.owon.cn

filename=request.ServerVariables("SCRIPT_NAME")
if right(filename,9)="index.asp" then
filename=left(filename,len(filename)-9)
end if

if Request.ServerVariables("QUERY_STRING") <> "" then
url = url & filename & "?" & Request.ServerVariables("QUERY_STRING")
else
url=url& filename
end if
Response.Status = "301 Moved Permanently"
Response.AddHeader "Location", url
end if
end if
%>