Dall'archivio script > Classic ASP

Visualizzare le proprietà dei messaggi in coda nel servizio SMTP con CDO

di Daniele BochicchioDaniele Bochicchio, in Classic ASP, E-mail,

CDO per Windows 2000 ha alcuni oggetti supplementari, rispetto al CDO presente su Windows NT, che permettono di sfruttare meglio i meccanismi di messaging di questo oggetto COM.
In particolare tramite l'oggetto DropDirectory è possibile ricevere informazioni sui messaggi presenti in una particolare directory, ad esempio quella dei messaggi in uscita.
E' sufficiente specificare un path in cui andare a leggere i messaggi e fare un ciclo sulla collection restituita, come in questo esempio:

<%

Response.Write ("<table border=""2"" width=""100%"">")
Response.Write ("<tr><th>Destinatario</th><th>Mittente</th><th>Oggetto</th><th>Inviato</th></tr>")

' oggetto DropDirectory di CDO
set objDir = CreateObject("CDO.DropDirectory")

' msgslection dei messaggi ricavata tramite objDir
set msgs = objDir.GetMessages("C:\Inetpub\mailroot\Pickup")

' per ogni messaggio nella collezione
for each msg in msgs
  Response.Write ("<tr><td>" & Server.HTMLEncode(msg.to) & "</td>")
  Response.Write ("<td>" & Server.HTMLEncode(msg.from) & "</td>")
  Response.Write ("<td>" & Server.HTMLEncode(msg.subject) & "</td>")
  Response.Write ("<td>" & Server.HTMLEncode(msg.senton) & "</td></tr>")
next

Response.Write ("</table>")

' distruzione oggetti
set msgs = Nothing
set objDir = Nothing

%>

Come già detto, questo esempio andrà bene su IIS5, ma non su IIS6.

Commenti

Visualizza/aggiungi commenti

| Condividi su: Twitter, Facebook, LinkedIn
Aggiorna

Per inserire un commento, devi avere un account.

Fai il login e torna a questa pagina, oppure registrati alla nostra community.

Approfondimenti

Nessuna risorsa collegata

I più letti di oggi