creo q es fácil

[mamon]

hola.. miren, solo quiero saber esto:

xviene = Request.ServerVariables("HTTP_REFERER")

y supongamos q ahora el valor de xviene = "http://www.mipagina.com/index.asp?valor=1"

lo que quiero hacer es q enviar no sea todo eso, solo:

"http://www.mipagina.com/index.asp"

espero me puedan ayudar
Gracias de antemno

[puyehue]

para eso la forma mas facil de hacerlo es haciendo un SPLIT() a tu variable, te adjunto un ejemplo...

Split(expresión[, delimitador[, cuenta[, comparación]]])

Dim MiCadena, MiMatriz
MiCadena = Split("VBScriptXisXfun!", "x", -1, 1)
' MiCadena(0) contiene "VBScript".
' MiCadena(1) contiene "es".
' MiCadena(2) contiene "divertido".

para tu caso, tu delimitador es un "?", y el -1 y 1, debes colocarlo igual. Tu exprecion sera la variable que contiene la URL, asi que esto lo que hara es separarte en 2 la cadena que esta contenida en tu variable. Para obtener la parte que tu quieres, estara contenida por ejemplo en MiCadena(0), eso contendra la primera parte de tu estring que seria...

MiCadena(0)="http://www.mipagina.com/index.asp"

y en MiCadena(1)="valor=1"

espero te sirva de algo....

suerte

[mamon]

la vdd es q no entendí mucho=S sorry.. x si acaso es un ejemplo la url, a podido ser

"http://www.mipagina.com/index.asp?var=usu&medio=ahi_pes&oe=holas"

osea puede ser cualquier cosa.. no sé si me puedas dar el código resuelto para al final solo tener el valor "http://www.mipagina.com/index.asp"

Gracias de Antemano

[Alexis_m20]

Hola:

Mira de la siguiente manera te podria servir;

xviene = Request.ServerVariables("HTTP_REFERER") ' esto es lo que pusiste

'Aca creamos otra variable

Arreglo = Split(xviene, "?") 'Con Esto separamos las constantes

'y ahora lo visualizamos

Response.write Arreglo(0)

Y eso seria