pronti...
Definizione di CDONTS
CDONTS è un componente COM che espone le interfacce oggetto seguente:
* L'oggetto NewMail
* L'oggetto Session
L'oggetto NewMail è l'oggetto utilizzato più di frequente.
CDONTS viene utilizzato principalmente dagli sviluppatori Web come thin client per indirizzi Web Form. La DLL per CDONTS, noto anche come cdonts.dll, viene installata con Microsoft Windows NT Option Pack 4. Inoltre è necessario installare il servizio SMTP. Windows NT Option Pack 4 viene installato con compatibilità per Microsoft Windows 2000. Tuttavia, si consiglia di CDO per Windows 2000 (CDOSYS) per il sistema operativo Windows 2000.
Funzionamento di CDONTS
Per dimostrare il funzionamento di CDONTS, utilizzare il seguente codice di esempio di ASP:
Codice:
Dim objMail
Set objMail = CreateObject("CDONTS.NewMail")
ObjMail.Send "yourmail@somewhere.com", "someone@somewhere.com", "Subject", "This is the body."
Set objMail = Nothing
di seguito è una descrizione sequenza di ciò che si verifica in questo esempio di codice:
1. Viene creato l'oggetto variabile objMail .
2. Viene creato l'oggetto CDONTS.NewMail , e quindi l'oggetto CDONTS.NewMail viene assegnato all'oggetto objMail variabile.
3. Il metodo Invia dell'oggetto NewMail è di esecuzione e di quindi passato all'indirizzo di posta elettronica da, all'indirizzo di posta elettronica A, per l'oggetto e per il corpo.
4. L'oggetto di variabile objMail viene eliminato tramite l'impostazione l'oggetto su Nothing .
Nota Quando viene individuato un problema di CDONTS, accertarsi che che il codice di esempio precedente funziona da una pagina ASP o da un file vbs. Se il codice non funziona, il problema non è un problema di codice. Il problema è probabilmente un problema di installazione del servizio SMTP.
Creazione di un oggetto NewMail
Quando si crea un oggetto NewMail , il processo Cerca nel Registro di sistema e quindi si trova il percorso del file cdonts.dll. Il percorso del file cdonts.dll viene recuperato dalla chiave InProcServer32 . L'oggetto NewMail creato e quindi inserire nella memoria.
Chiamare il metodo di invio
Quando si chiama il metodo Send , l'oggetto NewMail consente di accedere al metabase per determinare dove inserire il file di posta elettronica (con estensione eml). L'oggetto NewMail crea un messaggio di posta elettronica è basato sui campi impostati nell'oggetto NewMail e quindi l'oggetto NewMail scrive il file con estensione eml il percorso specificato nella metabase.
CDONTS è ora completata. La parte restante del processo viene completata dal servizio SMTP.
Il componente
CDOSYS per l'invio delle e-mail, già presente sui sistemi operativi Microsoft Windows Server 2000 (anche se non esclusivo vista la contemporanea presenza del componente CDONTS), sul recente sistema operativo Microsoft Windows Server 2003 è l'unico componente preinstallato.
È essenziale pertanto imparare ad usarlo correttamente.
Codice:
<%
Dim iMsg, iConf, Flds
'Crea l'oggetto email
Set iMsg = CreateObject("CDO.Message")
'Crea l'oggetto configurazione
Set iConf = CreateObject("CDO.Configuration")
'Impostazione delle configurazioni per l'invio remoto
Set Flds = iConf.Fields
Flds("http://schemas.microsoft.com/cdo/configuration/urlgetlatestversion") = True
'Spedizione: mittente, destinatario, oggetto, messaggio
mittente = "mittente@tuodominio.xx"
destinatario = "mittente@suodominio.zz"
oggetto = "Prova email"
messaggio = "Invio con CDOSYS"
With iMsg
'Assegnazione delle configurazioni
Set .Configuration = iConf
.From = mittente
.To = destinatario
.Subject = oggetto
'Formato HTML
.HTMLBody = messaggio
'Formato testo (scegliere)
.TextBody = messaggio
'Invio di una pagina web
.CreateMHTMLBody "http://www.novacomitalia.com/home/"
'Invio con allegato
.AddAttachment server.mappath("/public/test.txt")
'Invia l'email
.Send()
end with
set Flds = Nothing
set iConf = Nothing
set iMsg = Nothing
%>
Poi ci sono esempi fatti anche "
in casa"
Io sono ignorante in materia!!
