ciao a tutti,

ho un problema per un invio di un email...

ho un modulo id registrazione e dopo aver caricato i dati nel db invio un'email di conferma dati all'utente che si è registrato...

il problema è che facendo le prove con l'email del dominio funziona, ma se provo co un eamil di un'altro dominio non funziona piu

cioè se il dominio è www.prova.it e se nel modulo di registazione inserisco l'email pippo@prova.it funziona tutto, ma se metto pippo@tiscali.it mi da errore http500....

cosa devo fare?
ho dovuto spostare il dominio su register.it ma prima si trovava su flashnet e funzionava...



il codice è i lseguente:

codice:

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

	'* voce da modificare con il proprio indirizzo email
	


	'* 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 =  "pippo@prova.it"

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

nomeDominio = Request.ServerVariables("HTTP_HOST")
indirizzoIp = Request.ServerVariables("REMOTE_ADDR") 
modulo= Request.ServerVariables("HTTP_REFERER")
browserSistemaOperativo= Request.ServerVariables("HTTP_USER_AGENT")

	'*rilevo i campi del form

corpoMessaggio="CORPO MESSAGGIO"

'invioA=request.form("email_utente")

	

	'* 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) = "smtp.register.it" 
Flds(cdoSMTPServerPort) = 25
Flds(cdoSMTPAuthenticate) = cdoAnonymous ' 0
Flds.Update

With iMsg
   Set .Configuration = iConf
   .To = invioDa
   .From = invioDa
   .Sender = invioDa
   .Subject = "Registrazione bla bla bla"
   '.TextBody = corpoMessaggio
   .HTMLBody = corpoMessaggio
   .Send
End With
%>
non so piu cosa fare