link nella email

[nataw]

salve a tutti, ho un problema: invio l'email con il codice che vi riporto ma non appare il termine risposta non appare come link nella email che vi riproduco:

la richiesta è di notti 1 per numero di persone 1 dal 31/12/1999al01/01/2006 tipo camera singolaulteriore commento:defdfdf < a href="http://www.easyplatz.com/risposta.asp?indenti=37"> per rispondere


il codice è:

<%@language=vbscript%>


<%

dim objconn, strconn
set objconn= server.createobject("adodb.connection")
strconn="Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& server.mappath("/mdb-database/pino.mdb")
objconn.open strconn
tex=request.form("testo")
ident=request.form("nascosto")
noche=request.form("notti")
numeropers=request.form("persone")
giora=request.form("gioar")
messa=request.form("mesar")
ana=request.form("anra")
gip=request.form("giopa")
messp=request.form("mespa")
annop=request.form("anpa")
came=request.form("camer")
identifi=request.form("nome")
surname=request.form("cognome")
address=request.form("indirizzo")
town=request.form("citta")
phone=request.form("telefono")
email=request.form("mail")
codice=request.form("cap")
merco= cint(messp)
ao= cint(annop)
gior=cint(gip)
completissimo=dateserial(ao,merco,gior)
mercif=cint(messa)
aloa= cint(anna)
gionatan=cint(giora)
completo=dateserial(aloa,mercif,ginatan)
strsql="select post from tblex where id like'%"&ident&"%'"
set rs= server.createobject("adodb.recordset")
rs.open strsql,objconn,3,3
maildest=rs("post")
strquer="INSERT INTO tabprenot (nome, cognome, indirizzo, citta, telefono, hotel, dataarr, datapart, richiesta, codec, camera, postae, night, numpers, codix) VALUES ('"& identifi &"', '"& surname &"','"& address &"','"&town&"','"& phone &"','"& maildest &"','"& completo &"','"& completissimo &"','"& tex &"','"& ident &"','"& came &"', '"& email &"','"& noche &"','"& numeropers &"','"&codice&"')"
objconn.execute(strquer)
rs.close
set rs= nothing
strsql="select max(id) as chiu from tabprenot"
set rss= server.createobject("adodb.recordset")
rss.open strsql,objconn,3,3
chiunque=rss("chiu")
'============Linkbruttocane su specifiche MSDN================
'* il corpo finale del messaggio contiene tutti i campi *
'* inseriti nella pagina html, in pratica puoi mettere *
'* tutti i campi che ti servono nel modulo di invio senza *
'* fare altre configurazioni aggiuntive. *
'================================================= ============



'* voce da modificare con il proprio indirizzo email

invioA = maildest

'* voce da modificare con un indirizzo email che funga da mittente:
'* in caso di errore riceverete notifica a questo indirizzo un MAILER-DAEMON
'* dato che cdosys supporta questa notifica

invioDa = "antoniomark@libero.it"

'------------fine modifiche necessarie------------------


'*rilevo i campi del form

FOR numeroCampi = 1 TO (Request.Form.Count() - 1)
IF NOT Request.Form(numeroCampi) = "" THEN
corpoMessaggio = corpoMessaggio & "
" & Request.Form.Key(numeroCampi) & " = " & Trim(Request.Form(numeroCampi))
END IF
NEXT

'* creo gli oggetti cdosys sul server e li gestisco

DIM iMsg, Flds, iConf, myurl
myurl="http://www.easyplatz.com/risposta.asp?indenti=" & chiunque

Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields

Flds(cdoSendUsingMethod) = cdoSendUsingPort
Flds(cdoSMTPServer) = "smtp.aruba.it"
Flds(cdoSMTPServerPort) = 25
Flds(cdoSMTPAuthenticate) = cdoAnonymous ' 0
Flds.Update

With iMsg
Set .Configuration = iConf
.To = invioA
.From = Request.Form("email")
.Sender = invioDa
.Subject = "Contatto da easyplatz "

.HTMLBody = "<font face=verdana size=2>la richiesta è di notti " & noche & " per numero di persone " & numeropers & " dal " & completo & "al" & completissimo & " tipo camera " & came & "ulteriore commento:" & tex & " < a href="""& myurl&"""> per rispondere</a>"

.Send
End With
set objmessage=nothing
rss.close
set rss= nothing
objconn.close
set objconn=nothing
%>
<script>
document.location.replace('grazie.asp');
</script>
</body>
</html>

per quale motivo? qualcuno può darmi una mano?

[Mems]

.HTMLBody = "<font face=verdana size=2>la richiesta è di notti " & noche & " per numero di persone " & numeropers & "  dal " & completo & "al" & completissimo & " tipo camera " & came & "ulteriore commento:" & tex & "  per rispondere"

C'era uno spazio nel tuo codice:
< a
dovrebbe essere:
<a

[nataw]

grazie giusto