Cdosys

[lelale]

ciao a tutti. vi scrivo perchè dopo aver letto tutti messaggi nel forum il vostro aiuto è la mia ultima spiaggia.
ho xp pro ed installato CDOSYS ( verificato con lo script di check). devo, come molti richiedono, mandare e-mail dal server IIS 5.1
installato sul mio pc.
ho provato tutti gli script che ho trovato ma nulla le e-mail non partono, le email rimangono sempre nella cartella di coda del server locale senza darmi errori.
il mi SMTP è configurato con la porta 25, ho provato a dargli ancheun indirizzo IP 127.0.0.1 ma niente. questo di seguito è lo script che ho usato. qualcuno mi può aiutare? grz a tutti:

----------------------------------------------
<%

' Dichiara l'oggetto email e la configurazione
Dim objMail, objConfig

' Dimensiona l'oggetto email
Set objMail = Server.createObject("CDO.Message")

' ====================================
'Dimensiona l'oggetto configurazione
Set objConfig = Server.createObject("CDO.Configuration")

' Imposta le configurazioni
With objConfig

' Server SMTP di uscita
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost"( ho provato anche il nome del server ma nulla )

' Porta SMTP
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25

' Porta CDO
.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2

' Timeout
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60

.Fields.update
End With

' Assegna le configurazioni
Set objMail.Configuration = objConfig

' ====================================

' Assegna all'oggetto le proprietà necessarie

' Mittente dell'email (indirizzo)
objMail.From = "mittente@dominio.com"

' Destinatario dell'email (indirizzo)
objMail.To = "destinatario@dominio.com"

' Cc e Bcc (opzionale)
objMail.Cc = "altroindirizzo@dominio.com; ancora@dominio.com"
objMail.Bcc = "altroindirizzo@dominio.com; ancora@dominio.com"

' Oggetto dell'email
objMail.Subject = "Oggetto della mail"

' Valore di priorità
objMail.Fields("urn:schemas:httpmail:importance"). Value = 2
objMail.Fields.update()

' Allegare un file
objMail.AddAttachment("d:\inetpub\webs\tuodominioc om\file.zip")

' Corpo del messaggio
objMail.TextBody = "Testo della mail" ' Formato Testo
objMail.HTMLBody = "Testo della mail" ' Formato HTML

' Invia l'email
objMail.Send()

' Distruggi l'oggetto
Set objMail = Nothing

%>

[Dirk Pitt]

Provalo sul server dove poi domani verrà ospitato il sito. Se funziona, significa che il tuo IIS in locale non è settato bene.
Ma l'importante è che funzioni in remoto no?

[lelale]

infatti sul server ARUBA funziona normalmente. deve essere proprio un problema di settaggio
dell'SMTP che non capisco. Vorrei però riuscire a farlo funzionare su locale per un aquestione di comodità, così lo testo anche quando non sono collegato....senza necessariamente caricare i file sul sito. ciao! grazie Pitt..se qualcun'altro ha idee grazie in anticipo!

[Dirk Pitt]

Hai settato l'smtp che normalmente usi per l'invio della tua posta con il client?

[lelale]

se intendi nello script ho fatto come segue:

.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "(qui ho provato sia con localhost che con l'smtp che uso con l'adsl di alice ma non partono lo stesso )"

[Dirk Pitt]

Forse il settaggio va fatto su IIS.
Ma qui purtroppo non ti so aiutare.
Prova a chiedere qui http://forum.html.it/forum/forumdisp...?s=&forumid=37

[lelale]

grazie lo stesso!ciao