Visualizzare le proprietà dei messaggi in coda nel servizio SMTP con CDO
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
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
