I wanted to get the page name of the current *.aspx page that I was in. This is what I did (not rocket science, admittedly)
' *****************************************************************************
' purpose - return the aspx page name
Public Shared Function GetCurrentPageName() As String
Dim strRet As String = ""
'Return System.Web.HttpContext.Current.Request.Url.ToString
Dim sBasePath As String = System.Web.HttpContext.Current.Server.MapPath("")
Dim sFullPath As String = System.Web.HttpContext.Current.Request.ServerVariables("PATH_TRANSLATED")
sBasePath = sBasePath.ToLower() + "\"
sFullPath = sFullPath.ToLower()
strRet = sFullPath.Replace(sBasePath, "")
Return strRet
End Function
