Visual Basic 6.0

Απ: Πώς να λαμβάνω μηνύματα από την VB6 με χρήση του MAPI;

Xlomo_prosopo — Sun, 21 May 2006 04:58:05 GMT

Όντος δίκιο έχεις χρησημοποίησα το gmail με POP 3 και δούλεψε! σας ευχαρηστώ για τις απαντήσεις.

Απ: Πώς να λαμβάνω μηνύματα από την VB6 με χρήση του MAPI;

KelMan — Sat, 20 May 2006 21:53:29 GMT

Ναι, ο φάκελος του Hotmail χρησιμοποιεί το HTTPMail πρωτόκολλο. Στο link που σου έδωσα περιγράφει αυτό το πρωτόκολλο.

Απ: Πώς να λαμβάνω μηνύματα από την VB6 με χρήση του MAPI;

Xlomo_prosopo — Sat, 20 May 2006 21:16:00 GMT

Το ΟΕ είναι το default πρόγραμμα για αποστολή mail, αυτό δεν μου δείνει τη βεβαιότητα ότι χρησημοποιείται από τη VB ? μυνήματα παίρνει αλλά μόνο του τοπικού φάκελου.

Δυστυχώς χρειάζομαι VB και ο κώδικας της .ΝΕΤ δεν βοηθάει.

Απ: Πώς να λαμβάνω μηνύματα από την VB6 με χρήση του MAPI;

KelMan — Sat, 20 May 2006 09:00:17 GMT

Το Hotmail έχει κάποιες ιδιαιτερότητες... Στο παρακάτω link έχει αρκετές πληροφορίες, ωστόσο αναφέρεται σε VB.NET

http://www.vbdotnetheaven.com/UploadFile/kdukes/HTTPMail04162005075038AM/HTTPMail.aspx?ArticleID=13e72d3b-ec31-4b4a-9b5c-9e924b0134bf

Απ: Πώς να λαμβάνω μηνύματα από την VB6 με χρήση του MAPI;

George J. Capnias — Sat, 20 May 2006 07:54:55 GMT

Δεν είχα υπόψη μου ότι το MAPI δεν μπορεί να πάρει μηνύματα με το Outlook Express. Ημουν σχεδόν σίγουρος ότι χρησιμοποιεί τα Profile του Outlook και μόνο, εφόσον είναι εγκατεστημένο στο μηχάνημα.

Είσαι σίγουρος ότι βλέπει το Outlook Express και όχι το Outlook που πιθανώς είναι εγκατεστημένο στο ίδιο μηχάνημα;

George J.

Πώς να λαμβάνω μηνύματα από την VB6 με χρήση του MAPI;

Xlomo_prosopo — Sat, 20 May 2006 04:01:29 GMT

    Προσπαθώ να φτιάξω μία απλή εφαρμογή που να στέλνει και να λαμβάνει mails κάνοντας χρήση του MAPI αλλά έχω το εξίς πρόβλημα: Όταν κάνω Fetch για να πάρω όλα τα μηνύματα από το outlook express , η εφαρμογή μου μπαίνει στον τοπικό φάκελο των εισρχομένων και όχι στον φάκελο του hotmail λογαριασμού απ' όπου θέλω να πάρω τα mails.Το sign in στον λογαριασμο γίνεται κανονικά καθώς επίσης και η αποστολή mail από αυτόν τον λογαριασμό μέσω mapi.Ο κώδικας που χρησημοποιώ είναι ο ακόλουθος:

    MAPISession1.UserName = "myusername"
    MAPISession1.Password = "mypass"
    MAPISession1.SignOn

    MAPIMessages1.SessionID = MAPISession1.SessionID
    MAPIMessages1.Fetch

    If MAPIMessages1.MsgCount > 0 Then
            Label4.Caption = "Message " & _
            LTrim$(Str$(MAPIMessages1.MsgIndex + 1)) & "of " & _
            LTrim$(Str$(MAPIMessages1.MsgCount))

        txtDe.Text = MAPIMessages1.MsgOrigDisplayName

        txtFec.Text = MAPIMessages1.MsgDateReceived

        txtAsun.Text = MAPIMessages1.MsgSubject

        RichTextBox1.Text = MAPIMessages1.MsgNoteText

        tAdj.Text = MAPIMessages1.AttachmentCount


    End If

Αν μπορεί κάποιος να βοηθήσει θα ήμουν υπόχρεος.
Ευχαριστώ!