Salve, da poco ho ripreso a smanettare html e asp e dovrei fare un form per un amico

ho la pagina

prenotazione.htm

inviodati.asp

grazie.asp

in pratica l'invio avviene, ma solo nella casella di posta in cui inserisco nel form

vi posto il codice del form :



<body>

<form method="POST" name="modulo" action="inviodati.asp">


Nome <input type="text" name="nome" size="20"> Cognome
<input type="text" name="cognome" size="20"></p>


Città <input type="text" name="citta" size="20">
Prov <input type="text" name="prov" size="20"></p>


Cap <input type="text" name="cap" size="20">
Via <input type="text" name="via" size="20"></p>


Email <input type="text" name="email" size="20"></p>


</p>


Info Prenotazioni </p>


DAL <input type="text" name="dal" size="8"> AL
<input type="text" name="al" size="10"></p>


</p>


Camera <select size="1" name="camera">
<option>Doppia uso singola</option>
<option selected>Doppia</option>
</select> </p>


Totale n° Persone
<input type="text" name="persone" size="5"></p>


<input type="submit" value="Invia" name="B1"><input type="reset" value="Reimposta" name="B2"></p>
</form>

</body>

</html>

ed ecco il codice asp:



<%
'============ 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. *
'================================================= ==============

DIM corpoMessaggio, numeroCampi, invioA, invioDa, nomeDominio, indirizzoIp, modulo, browserSistemaOperativo, cartella, fileAllegato

'* voce da modificare con il proprio indirizzo email

invioA = "info@dominio.it"

'* 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 = "prenotazioni@dominio.it"

'* indicare il nome del file da allegare, il file deve
'* risiedere in questa stessa cartella, come il file allegato a titolo di esempio

fileAllegato = "coupon.zip"

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

nomeDominio = Request.ServerVariables("HTTP_HOST")
indirizzoIp = Request.ServerVariables("REMOTE_ADDR")
modulo = Request.ServerVariables("HTTP_REFERER")
browserSistemaOperativo = Request.ServerVariables("HTTP_USER_AGENT")
cartella = Server.MapPath("./")

'*rilevo i campi del form

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

'* creo gli oggetti cdosys sul server e li gestisco

DIM iMsg, Flds, iConf

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

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

With iMsg
Set .Configuration = iConf
.To = Request.Form("email")
.From = invioA
.Sender = invioDa
.Subject = "Contatto dal dominio " & nomeDominio
.TextBody = "Questi i dati inseriti nel modulo presente alla pagina " & modulo & " da utente con indirizzo IP " & indirizzoIp & " browser e sistema operativo " & browserSistemaOperativo & vbCrLf & corpoMessaggio & ""
.AddAttachment (cartella & "\" & fileAllegato)
.Send
End With
%>
<script>
document.location.replace('grazie.asp');
</script>


Sono su server aruba

Grazie in anticipo
P.S. c'è nessuno che gioca a wow?