更换域名自动跳转的404代码

网络整理 - 09-03
原问:
假设以前有个域名为:
现在要更换一个新的:

怎样才能让自动跳转到
我说的跳转是在带有参数的时候,比如
 自动跳转到 

如果定义一个404错误,这个代码怎么写。

404.asp

<%
dim url
Private Function GetUrl()
Dim ScriptAddress, M_ItemUrl, M_item
ScriptAddress = CStr(Request.ServerVariables("SCRIPT_NAME")) '取得当前地址
M_ItemUrl = ""
If (Request.QueryString <> "") Then
ScriptAddress = ScriptAddress & "?"
For Each M_item In Request.QueryString
If InStr(page,M_Item)=0 Then
M_ItemUrl = M_ItemUrl & M_Item &"="& Server.URLEncode(Request.QueryString(""&M_Item&"")) & 

"&"
End If
Next
end if
GetUrl = ScriptAddress & M_ItemUrl
End Function

Response.Redirect ""&Url&""%>