Dr. Frank Solo Stuff

<% Dim varPath varPath = Request.ServerVariables("PATH_INFO") If varPath = "/solo.asp" Then Response.Write("Dr. Frank Solo Main ") Else Response.Write("Dr. Frank Solo Main ") End If If varPath = "/solo/album.asp" Then Response.Write("Album Info ") Else Response.Write("Album Info ") End If If varPath = "/solo/frankdisco.asp" Then Response.Write("Discography ") Else Response.Write("Discography ") End If If varPath = "/solo/solopictures.asp" Then Response.Write("Pictures ") Else Response.Write("Pictures ") End If If varPath = "/solo/frankshows.asp" Then Response.Write("Shows ") Else Response.Write("Shows ") End If If varPath = "/solo/articles.asp" Then Response.Write("Articles ") Else Response.Write("Articles ") End If If varPath = "/solo/solosounds.asp" Then Response.Write("Sounds ") Else Response.Write("Sounds ") End If If varPath = "/solo/solonews.asp" Then Response.Write("Old News ") Else Response.Write("Old News ") End If %>