problema con variabile

[Giro12]

Salve a tutti ho il seguente codice che mi crea alcuni problemi
non riesco a recupera la variabile che qui ho chiamato url(il percorso di dove si trova la pagina che voglio inviare)

<%
' Reperisco i valori del dominio e del percorso corrente
' per memorizzarli di seguito nel link verso il modulo di segnalazione
dom = Request.ServerVariables("HTTP_HOST")
per = Request.ServerVariables("SCRIPT_NAME")
%>
Segnala questa pagina|

Questo codice è incluso in tutte le pagine e mi permette di segnalare le pagine del mio sito
La pagina default

<%
' La variabile azione mi serve per recuperare il primo parametro dalle QueryString
' passata nel link di segnalazione, per far si che venga mostrato a video il modulo
azione = Request.form("azione")
' La variabile url, invece, recupera dalla QueryString l'indirizzo della pagina da segnalare
url = Request.form("url")
%>


<center>
<fieldset><LEGEND>&gt; Segnala ad un amico</LEGEND>
<form method="POST" action="segnala.asp">
<input type="hidden" name="url" value="<%=url%>">
<table border="0" cellpadding="0" cellspacing="0" >
<tr>
<td >Tua E-mail:</td>
<td ><input type="text" name="mittente" size="25"></td>
</tr>
<tr>
<td >E-mail amico:</td>
<td ><input type="text" name="destinatario" size="25"></td>
</tr>
<tr>
<td >Testo:</td>
<td ><textarea rows="4" name="testo" cols="27"><%=url%>
</textarea></td>
</tr>
<tr>
<td colspan="2" >


<input type="submit" value="Segnala www.danilgorio.net" name="B1"></td>
</tr>
</table>
</form>

</center>
</fildset>

Pagina per inviare l'email

<%


' CONTROLLA PRIMA SE TUTTI I CAMPI SONO STATI COMPILATI CORRETTAMENTE

IF Instr(Request.Form("mittente"), "@") = 0 or Instr(Request.Form("mittente"), ".") = 0 or Instr(Request.Form("destinatario"), "@") = 0 or Instr(Request.Form("destinatario"), "@") = 0 then

' NON TUTTI I CAMPI SONO STATI COMPILATI
%>
<hr>
<p align="center"><font face="Verdana" size="4">Compila tutti i campi!</font></p>
<hr>
<%
' ALTRIMENTI
ELSE

' SI IMPOSTA PER INVIARE L'EMAIL DI SEGNALAZIONE:

' UN OGGETTO PER L'EMAIL DI SEGNALAZIONE
oggetto = "Segnalazione sito"


'invio con cdosys


Set Email = Server.CreateObject("CDO.Message")

' MITTENTE
Email.From = Request.Form("mittente")
' DESTINATARIO
Email.To = Request.Form("destinatario")
' OGGETTO
Email.Subject = oggetto

' TESTO EMAIL

'invio con cdosys modificato in Email.textBody
Email.TextBody = Request.Form("url")
Email.Send

Set Email = Nothing
%>
<hr>
<p align="center"><font face="Verdana" size="4">Grazie per averci segnalato ai tuoi amici!</font></p>
<hr>
<%
END IF
%>

Sapete a dirmi perche non mi passa la variabile url e non la salva in Email.TextBody ?
grazie

[F10ry_ke_deve_imp]

prova a scrivere solo
url = Request("url")
anzichè
url = Request.form("url")
fiorella

[Giro12]

graz funziona