IMAPThis is a discussion on IMAP within the Clipper forums in Programming Languages category; Hi, Can anyone give me an example of how to connect to an IMAP mail server and retrieve the mails from it? The code below successfully logs on but the check for messages returns zero, even though there are four messages on it. The server is using IMAP4 and I am using Geoffs classes. Thanks in advance. Kevin METHOD CheckMessages( ) CLASS MainDialog local oIMAP as CImap local nMails as dword local lSuccess as logic oIMAP := CImap{"imapserver","usaername", "pwd"} oIMAP:Timeout := 5000 lSuccess := oIMAP:LogOn("username", "pwd") if lSuccess oIMAP:GetStatus() nMails := oIMAP:MailCount self DCsleMessages:CurrentText := NTrim(nMails) //lSuccess := oIMAP:GetMail( 1 ... | ||||||||
| | ||||||||
| ||||||||
| Register | FAQ | Calendar | Search | Today's Posts | Mark Forums Read |
|
#1
08-22-2008, 12:09 PM
| |||
| |||
 IMAP Hi, Can anyone give me an example of how to connect to an IMAP mail server and retrieve the mails from it? The code below successfully logs on but the check for messages returns zero, even though there are four messages on it. The server is using IMAP4 and I am using Geoffs classes. Thanks in advance. Kevin METHOD CheckMessages( ) CLASS MainDialog local oIMAP as CImap local nMails as dword local lSuccess as logic oIMAP := CImap{"imapserver","usaername", "pwd"} oIMAP:Timeout := 5000 lSuccess := oIMAP:LogOn("username", "pwd") if lSuccess oIMAP:GetStatus() nMails := oIMAP:MailCount self  DCsleMessages:CurrentText := NTrim(nMails)//lSuccess := oIMAP:GetMail( 1 ) endif RETURN SELF --  |
 |
| Thread Tools | |
| Display Modes | |
Linear Mode
