4 svar · 513 visningar · startad av andreas_lindh
Hur gör man för att plocka bort allt efter det sista /?
Dim url As String = Request.Url.AbsoluteUri.ToString
response.write(url)
Då får jag ut http://localhost/cup/test/test/Default.aspx och jag vill ha http://localhost/cup/test/test/
Dim url As String = Request.Url.AbsoluteUri.ToString
Set z = new Regexp
z.Pattern = "[^/]*$"
url = z.Replace(url, "")
Tack
Dim url As String = Request.Url.AbsoluteUri.ToString
Set z = new Regexp
z.Pattern = "[^\/]*(\?.*)?$"
url = z.Replace(url, "")
Uppdatering: Om man ska vara petig, så är det så att koden i mitt förra inlägg skulle matcha adresser med / i en querystring på annat sätt än du vill. T ex skulle http://www.foo.com/bar/foobar.php?path=/path1/path2 resultera i http://www.foo.com/bar/foobar.php?path=/path1/. Koden i detta inlägg löser, som du kanske har listat ut, detta problem.
Tack igen.
Så här blev koden
Dim url As String = Request.Url.AbsoluteUri.ToString
Dim z As RegularExpressions.Regex
url = z.Replace(uri, "[^\/]*(\?.*)?$", "")