CodeS-SourceS est hébergé par Frontier.fr

Cliquez ici pour mettre ce site au démarrage de votre navigateur

AccueilCodesTutorielsForumsEmploiLivresConnexion

begin process at 2008 12 03 04:59:25

ADOBE MAX à MILAN => JOUR -1 par pegase31

SQL SERVER : LE FUTUR DES MOTEURS DE RECHERCHE CHEZ MICROSOFT par christian

TOFINO : LE PLUGIN FLEX POUR VISUAL STUDIO par Nix

FLEX INTéGRé DANS VISUAL STUDIO ! par Nix

SQL SERVER 2008 : ENFIN UN DOCUMENT COMPLET SUR LES MISES à JOUR DE SQL SERVER par christian

RE : TUTORIEL ASPX par olibara

RE : TUTORIEL ASPX par nhervagault

RE : TUTORIEL ASPX par olibara

RE : TUTORIEL ASPX par nhervagault

RE : TUTORIEL ASPX par olibara

+ de logiciels à télécharger

1 302 080 membres
41 nouveaux aujourd'hui
14 554 membres club

Trouver une ressource

Trouvez une ressource parmi 39 074 codes, 1 208 444 messages d'aide etc...

Recherche: dans [ Dernières recherches ]

Filtre:Tous les codes.NET uniquementExclure .NET

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

RECUPERER CES MAILS FACILEMENT

Information sur la source

Catégorie :Administration Niveau : Débutant Date de création : 29/05/2002 Date de mise à jour : 29/05/2002 18:03:08 Vu : 4 269

Auteur : manioc

Ecrire un message privé

Note :
Aucune note

Commentaire sur cette source (3)

Ajouter un commentaire et/ou une note

Description

Source

<%
Set MailObj = Server.CreateObject("CDONTS.Session")
MailObj.LogonSMTP "Your password" , "YourEmail@Address.com"
Set InBoxCont = MailObj.Inbox
Set MessageStrings = InBoxCont.Messages
MessageID = Trim(Request.QueryString("MsgId"))
If ("" = MessageID Or Not IsNumeric (MessageID)) Then
For Each MessageString in MessageStrings
counter = counter + 1
%><a href="<%=Request.ServerVariables("SCRIPT_NAME")%>?MsgId=<%=counter%>"> <%=MessageString.Subject%></a> from : <%=MessageString.Author%> <%
Next
Else
Set MessageString = MessageStrings(MessageID)
%>
Email Subject : <%=MessageString.Subject%>
From Address : <%=MessageString.Sender%> <hr>
Email Body : <%= MessageString.Text%><hr>
<%
End If
MailObj.LogOff
%>

<%
Set MailObj = Server.CreateObject("CDONTS.Session")
MailObj.LogonSMTP "Your password" , "YourEmail@Address.com"
Set InBoxCont = MailObj.Inbox


Set MessageStrings = InBoxCont.Messages
MessageID = Trim(Request.QueryString("MsgId"))
If ("" = MessageID Or Not IsNumeric (MessageID)) Then


      For Each MessageString in MessageStrings
        counter = counter + 1
       %><a href="<%=Request.ServerVariables("SCRIPT_NAME")%>?MsgId=<%=counter%>">        <%=MessageString.Subject%></a> from : <%=MessageString.Author%><br><%
     Next


Else
     Set MessageString = MessageStrings(MessageID)
      %>
     Email Subject : <b><i><%=MessageString.Subject%></b></I><br>
     From Address : <%=MessageString.Sender%><br><hr>
     Email Body : <%= MessageString.Text%><hr>
     <%
End If
MailObj.LogOff 
%>