Invio dati form dal sito

[freizer]

ragazzi ho un problema, sto cercando di sistemare un sito hostato sotto Netgruop )olmeno così credo visto che il mantainer è NETGROUP-MNT.
Devo impostrare un form con invio dati.

riesco a realizzare la pagina fel form che richiama la pagina di invio che è composta così:

<%
nome = Request("nome")
cognome = Request("cognome")
data = Request("data")
esami = Request("esami")
email = Request("email")
note = Request("note")


controllo = true
if nome = "" then controllo = false
if cognome = "" then controllo = false
if esami = "" then controllo = false
if controllo = false then
	%>
	<script>alert('Si è verificato un errore');</script>
	<script>location.href=('prenota_la_visita.asp');</script>	
	<%
end if

mittente = email

ServerSMTP = "smtp.sito.it"
destinatario = "xxxxx@xxxxxxx.xxx"

oggetto = "Richiesta informazioni dal Sito"


corpo_messaggio = "Gentile XXXXXXXX,"
corpo_messaggio = corpo_messaggio & vbCrLf
corpo_messaggio = corpo_messaggio & vbCrLf & "Il mio nome è: " & nome & " " & cognome


corpo_messaggio = corpo_messaggio & vbCrLf
corpo_messaggio = corpo_messaggio & vbCrLf & "desidero ricevere le seguenti informazioni:"
corpo_messaggio = corpo_messaggio & vbCrLf & note
corpo_messaggio = corpo_messaggio & vbCrLf
corpo_messaggio = corpo_messaggio & vbCrLf
corpo_messaggio = corpo_messaggio & vbCrLf & "la mia e-mail è:" 
corpo_messaggio = corpo_messaggio & vbCrLf & email
corpo_messaggio = corpo_messaggio & vbCrLf
corpo_messaggio = corpo_messaggio & vbCrLf & "Restando in attesa di Vs comunicazioni, porgo distinti saluti"


Set objMail = Server.CreateObject("CDO.Message") 
'objMail.host = ServerSMTP
objMail.From = mittente
objMail.To = destinatario
objMail.Subject = oggetto
objMail.TextBody = corpo_messaggio

On Error Resume Next
objMail.Send
Set objMail = Nothing
If Err <> 0 Then
	Response.Write "Messaggio non inviato, errore: " & Err.Description
else
	

End If
%>
   <script>alert('Modulo inviato. Sarete contattati appena possibile!');
   location.href=('prenota_la_visita.asp');
   </script>

ovviamente non funziona perchè il componente CDO.Message, così come il CDI e il Persist.mail non girano, qualcuno saprebbe indicarmi un metodo che possa funzionare?

(magari con esempio )

Grazie

[Roby_72]

Togli questa riga
On Error Resume Next

Poi chiedi direttamente a loro, al limite prova con CDONTS, ovviamente devi modificare lo script per adattarlo ai metodi di ogni componente di invio.

Roby

[freizer]

togliendo quella riga mi esce:

CDO.Message.1 error '80040220'

The "SendUsing" configuration value is invalid.

/sito/inviaprenotazione.asp, line 53

la linea 53 è:

objMail.Send

[Roby_72]

Vuol dire che si aspetta i parametri di configurazione:
http://www.weppos.com/asp/script/scr....asp?script=15

Roby

[freizer]

ore se nel server smtp setto mail.miodominio.it esce:

error '8004020e'

/sito/inviaprenotazione.asp, line 62


se invece setto smtp.miodominio.it esce

CDO.Message.1 error '80040213'

The transport failed to connect to the server.

/sito/inviaprenotazione.asp, line 62

in sostanza non invia


sto letteralmente impazzendo

[Roby_72]

Non devi buttare a caso.
Devi chiederi all'hoster cosa usare e come usarlo.

Roby

[freizer]

Mi hanno risposto dicendo che hanno istallato sia CDO che Persist.Mailsender

ho riprovato ad usare il secondo e il risultato è:

Messaggio non inviato errore: Host not found

mi hanno dato le impostazioni del loro smtp e la porta da utilizzare ma in Persist.Mailsender non si setta la porta ma solo l'smtp ma il risultato cmq non va,

ora provo con CDO e poi vedremo