Da cdont a cdosys

[silvio trisorio]

ho fatto così ma non cambia nulla:
'################################################# ###########################
'# Conferma email #
'################################################# ###########################

Dim strMsgHeader,Mail,html, objMail

strMsgHeader = "Ciao " & Nome & " " & Cognome & vbCrLf & vbCrLf
strMsgHeader = strMsgHeader & "Benvenuto nella nuova Community : " & vbCrLf & vbCrLf
strMsgHeader = strMsgHeader & "Questo è il tuo indirizzo Web : " & vbCrLf
strMsgHeader = strMsgHeader & ServerURL & Repertorio & vbCrLf & vbCrLf
strMsgHeader = strMsgHeader & "Adesso corri a realizzare il tuo nuovo Web Site " & ServerURL & "ftp_online.asp" & vbCrLf & vbCrLf
strMsgHeader = strMsgHeader & "Ti ricordo il tuo Nickname e Password " & vbCrLf & vbCrLf
strMsgHeader = strMsgHeader & "Nickname: "& Nickname & vbCrLf
strMsgHeader = strMsgHeader & "Password: "& Passw & vbCrLf & vbCrLf& vbCrLf
strMsgHeader = strMsgHeader & "Buon divertimento con il tuo nuovo web site "& vbCrLf
strMsgHeader = strMsgHeader & "----------------------------------------------------" & vbcrlf
strMsgHeader = strMsgHeader & "Community Powered by "& Live_server & vbcrlf
strMsgHeader = strMsgHeader & "Nome e Cognome "

SET objMail = CreateObject("CDO.Message")
objMail.TextBody = (strMsgHeader) & vbCrLf & vbCrLf & "** Original-IP:" & Request.ServerVariables("REMOTE_ADDR")
objMail.from = webmaster_email
objMail.to = Email
objMail.Subject = Oggetto_Email
objMail.Body = (strMsgHeader) & vbCrLf & vbCrLf & "** Original-IP:" & Request.ServerVariables("REMOTE_ADDR")
objMail.Importance = 2
objMail.Send
SET objMail = Nothing

'################################################# ###########################
'# Email Anche al Webmaster #
'################################################# ###########################

strMsgHeader = "Ciao " & Nome & " " & Cognome & vbCrLf & vbCrLf
strMsgHeader = strMsgHeader & "Benvenuto nella nuova Community : " & vbCrLf & vbCrLf
strMsgHeader = strMsgHeader & "Questo è il tuo indirizzo Web : " & vbCrLf
strMsgHeader = strMsgHeader & ServerURL & Repertorio & vbCrLf & vbCrLf
strMsgHeader = strMsgHeader & "Adesso corri a realizzare il tuo nuovo Web Site " & ServerURL & "ftp_online.asp" & vbCrLf & vbCrLf
strMsgHeader = strMsgHeader & "Ti ricordo il tuo Nickname e Password " & vbCrLf & vbCrLf
strMsgHeader = strMsgHeader & "Nickname: "& Nickname & vbCrLf
strMsgHeader = strMsgHeader & "Password: "& Passw & vbCrLf & vbCrLf& vbCrLf
strMsgHeader = strMsgHeader & "Buon divertimento con il tuo nuovo web site "& vbCrLf
strMsgHeader = strMsgHeader & "----------------------------------------------------" & vbcrlf
strMsgHeader = strMsgHeader & "Community Powered by "& Live_server & vbcrlf
strMsgHeader = strMsgHeader & "Nome e Cognome "

SET objMail = CreateObject("CDO.Message")
objMail.TextBody = (strMsgHeader) & vbCrLf & vbCrLf & "** Original-IP:" & Request.ServerVariables("REMOTE_ADDR")
objMail.from = webmaster_email
objMail.to = webmaster_email
objMail.Subject = "Nuovo Utemte si è registratto alla Comunity"
objMail.Body = (strMsgHeader) & vbCrLf & vbCrLf & "** Original-IP:" & Request.ServerVariables("REMOTE_ADDR")
objMail.Importance = 2
objMail.Send
SET objMail = Nothing

[Roby_72]

Oddio....
Al posto di questa ovviamente...

objMail.Body = (strMsgHeader) & vbCrLf & vbCrLf & "** Original-IP:" & Request.ServerVariables("REMOTE_ADDR")


Roby

[silvio trisorio]

Non arrabbiarti ma non è cambiato nulla, ti posto tutta la pagina magari il problema è un altro(http://www.stampadacasa.com/public/membri/roby.txt)

[Roby_72]

Ma l'errore non lo sai leggere???
Queste le devi togliere:

objMail.Importance = 2

Roby

[Roby_72]

Il passaggio da CDONTS a CDOSYS non comporta solo il cambio dell'oggetto ma anche l'adattamento dei metodi, alcuni dei quali non ci sono più.

Roby

[silvio trisorio]

Io non vedo nessun errore! non trova la pagina e basta...

[Roby_72]

Certo che la trova... riceverai errore 500 non certo 404!
E poi l'errore prima te l'ho scritto.
Devi disabilitare i "messaggi di errore http brevi" dal menu strumenti, opzioni internet, avanzate di Internet Explorer.

Roby

[silvio trisorio]

Adesso funziona benissimo...sei un grande!
Scusa per la rottura di p...e....