Extraer nombre de la página de un URL vb.net / get page name from url


Muchas veces necesitamos extraer el nombre de una página de una dirección URL, normalmente obtenida por:

Dim sPagina = Request.RawUrl  ‘sPagina queda con http://192.168.0.1/cuentas/admin.aspx

Para extraer el nombre admin.aspx podemos usar una función:

sPagina = ObtenerNombrePagina(sPagina) ‘sPagina queda como admin.aspx

Y esta es la función:

Public Shared Function ObtenerNombrePagina(ByVal PageUrl As String) As String

Dim index As Integer, endindex As Integer

Dim NombrePagina As String = “”

index = PageUrl.LastIndexOf(“/”) ‘Encontrar el ultimo / para determinar donde inicia el nombre

index += 1

endindex = PageUrl.LastIndexOf(“?”)

If (endindex = -1) Then ‘No hay parametros se toma todo el tamaño de la cadena

endindex = PageUrl.Length

End If

NombrePagina = PageUrl.Substring(index, (endindex – index))

Return NombrePagina

End Function

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s