PrivateSub Page_Load()Sub Page_Load(ByVal sender AsObject, ByVal e As System.EventArgs) HandlesMyBase.Load Dim stemp AsString= Server.UrlDecode(Request.QueryString.ToString()) If (stemp.Chars(stemp.Length -1) ="/"c) Then Server.Transfer("/") Else stemp = stemp.Substring(stemp.IndexOf(";") +1) Response.Redirect(stemp &"/") EndIf End Sub