right now I have this:
<%@ Page Language="vb" %>
<script runat="server">
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim strPage As String = ""
Dim semiPos As Integer
strPage = Request.Url.AbsoluteUri
semiPos = InStr(strPage, ";")
strPage = strPage.Substring(semiPos, strPage.Length - semiPos).Replace("http://", "")
strPage = strPage.Substring(InStr(strPage, "/"), strPage.Length - InStr(strPage, "/"))
If strPage.Contains("/") = False Then
Dim pagepath As String = String.Empty
Try
pagepath = MapPath("/redirect/" & strPage & ".html")
Catch ex As Exception
View Complete Post