It is better to use IDPOP3. Note The theme is to decode yourself, or will be garbled. Here is the decoding function of my brother invalid. Http://expert.9cbs.net/expert/faq/faq_index.asp?id=35151IDPOP3 is as follows.
IDPOP31-> Connect (30000); msg-> clear (); IDPOP31-> Retrieve (K, MSG);
MSG-> SaveTofile (INTSTR (K) ". MSG", FALSE);
For (int i = 0; i headers-> count; i ) MEMO1-> lines-> add (uncode (msg-> headers-> strings [i]));
IF (MSG-> ContentType.pos ("Multipart /")> 0) {for (INT i = 0; i messageparts-> count; i ) {if (Dynamic_cast (msg-> MessageParts) -> Items [i])) {// Accessories ANSISTRING FNAME = Uncode (Dynamic_cast (MSG-> MessageParts-> items [i]) -> filename); Memo1-> lines-> add (fname); IF (FileExists (FNAME); Dynamic_cast (msg-> messageparts-> items [i]) -> SaveTofile (FNAME);} else {if (Dynamic_Cast (msg-> MessageParts-> Items [i])) MEMO1-> LINES-> addstrings (Dynamic_cast (msg-> messageparts-> items [i]) -> body);}}} else {MEMO1-> LINES-> AddStrings (msg-> body);
