recuperare il link della pagina

[fabiusriders]

Ciao a tutti ho bisogno di un'aiutino, devo recuperare lindirizzo completo della pagina tipo quello di seguito:
www.###.it/leggi_news.asp?id=52

ho provato ad usare il seguente codice, splittando il link dopo / quindi in teoria doveva recuperare questa parte (leggi_news.asp?id=52) ma invece recupera solo (leggi_news.asp) saltando (?id=52) che poi alla fine è quello che mi serve, come posso fare per recuperare l'indirizzo completo??
Avete un codice da proporre?

<%
Dim strURL
Dim aryURL
Dim strPagina

' Assegna l'URL della pagina corrente
strURL = Request.ServerVariables("URL")

' Splitta il percorso ai valori /
aryURL = Split(strURL, "/")

' Prendi l'ultimo elemento dell'array
strPagina = aryURL(Ubound(aryURL))

' Stampa il valore

Commenti(strPagina)



%>

grazie mille per l'aiuto

[michele.santoro]

Originariamente inviato da fabiusriders
Ciao a tutti ho bisogno di un'aiutino, devo recuperare lindirizzo completo della pagina tipo quello di seguito:
www.###.it/leggi_news.asp?id=52

ho provato ad usare il seguente codice, splittando il link dopo / quindi in teoria doveva recuperare questa parte (leggi_news.asp?id=52) ma invece recupera solo (leggi_news.asp) saltando (?id=52) che poi alla fine è quello che mi serve, come posso fare per recuperare l'indirizzo completo??
Avete un codice da proporre?

<%
Dim strURL
Dim aryURL
Dim strPagina

' Assegna l'URL della pagina corrente
strURL = Request.ServerVariables("URL")

' Splitta il percorso ai valori /
aryURL = Split(strURL, "/")

' Prendi l'ultimo elemento dell'array
strPagina = aryURL(Ubound(aryURL))
' Stampa il valore
Commenti(strPagina)
%>
grazie mille per l'aiuto

Credo basti aggiungere (1) alla fine della riga e cioè:
aryURL = Split(strURL, "/")(1)
Esempio:

<%
Dim Link, percorso
percorso= ("www.###.it/leggi_news.asp?id=52")
Link=Split(percorso, "/")(1)
Response.Write Link
%>

[fabiusriders]

ciao ho fatto come mi hai detto ma nulla!!
allora nel mi codice ho inserito (1) alla fine della stringa e mi rilancia il seguente errore:

Microsoft VBScript runtime error '800a0009'

Subscript out of range: '[number: 1]'

/condvai23.asp, line 167

mentre ho provato il codice che mi hai scritto tu
<%
Dim Link, percorso
percorso= ("www.###.it/leggi_news.asp?id=52")
Link=Split(percorso, "/")(1)
commenti(Link)
%>

ma nel database la riga è vuota

[michele.santoro]

Originariamente inviato da fabiusriders
ciao ho fatto come mi hai detto ma nulla!!
allora nel mi codice ho inserito (1) alla fine della stringa e mi rilancia il seguente errore:

Microsoft VBScript runtime error '800a0009'

Subscript out of range: '[number: 1]'

/condvai23.asp, line 167

mentre ho provato il codice che mi hai scritto tu
<%
Dim Link, percorso
percorso= ("www.###.it/leggi_news.asp?id=52")
Link=Split(percorso, "/")(1)
commenti(Link)
%>

ma nel database la riga è vuota

Se con (1) ti da quell'errore, metti (0), e comunque se il percorso è quello che hai indicato tu: "percorso tipo www.###.it/leggi_news.asp?id=52" mi sembra strano che non funzioni. Nell'esempio che ti ho dato io (era solo un esempio) ho fatto riferimento all'Url passato da te, quindi prova a mettere al posto di 52 un numero di id valido.

[fabiusriders]

l'id è corretto!
il problema è che il campo è vuoto

ho provato con il seguente codice:
<%
pagina = Request.ServerVariables("http_referer")

Commenti(pagina)

%>

però succede una cosa mai vista da me, lo provo con www.###.it/leggi_news.asp?id=52
e funziona nel database viene riportato l'intera stringa www.###.it/leggi_news.asp?id=52

cambio id www.###.it/leggi_news.asp?id=53 e nel database non appare nulla.. vuoto

[optime]

Originariamente inviato da fabiusriders
cambio id www.###.it/leggi_news.asp?id=53 e nel database non appare nulla.. vuoto

cosa intendi con "cambio id"? vai nella barra degli indirizzi e lo cambi a mano?

[fabiusriders]

si lo cabio dalla barra degli indirizzi per verificare se funziona bene
ma riscontro il problema detto prima

[cavicchiandrea]

Ma se vuoi recuperare questo pezzo id=52 ti basta fare cosi <%=request.querystring%> ti recupererà tutto quello dopo ?

[optime]

Originariamente inviato da fabiusriders
si lo cabio dalla barra degli indirizzi per verificare se funziona bene
ma riscontro il problema detto prima

se scrivi nella barra degli indirizzi puoi dire all'http-refererr (i browser funzionano così...)

[fabiusriders]

grazie cavicchiandrea
il recupero dell'id funziona
ma per uniformare i tutto volevo recuperare l'intero link, come posso fare?
grazie