Line 5: Dim filetxt As String = "", webrootPath As String, fpath As String
Line 6: Dim urlstr As String = Request.Url.OriginalString()
Line 7: Dim browserstr As String = Request.ServerVariables("HTTP_USER_AGENT").Substring(0, 50)
Line 8: ' ignore various strings
Line 9: Dim shorturlstr As String = RemoveString("http://www.oeffner.net:80", urlstr)
|