PureBasic Forums - English

Posted: **Sun Sep 24, 2006 4:48 am**

Apologies for the old topic bump, but is there a way to use this with GMAIL? I followed GMAILS configuration instructions, i keep getting nothing from the server.

Thanks, ..::Origin::..

Posted: **Sun Sep 24, 2006 1:29 pm**

..::Origin::.. wrote:Apologies for the old topic bump, but is there a way to use this with GMAIL?

No.
Gmail does not use 'standard POP3', but SSL.

Posted: **Thu Dec 07, 2006 10:59 pm**

Hi gnozal.
Have some trouble with the POP lib. probably my fault, but anyways, you can probably help

I have 3 email messages on my pop account, but when I run this code:

Code: Select all

  Messages = PurePOP3_CountMessages()
  Debug "You have " + Str(Messages) + " messages(s)"
  
  If Messages
    For i=0 To Messages
      PurePOP3_RetrieveMessage(i, "E:\Email-"+Str(i)+".txt")
      Debug "Message info : " + PurePOP3_GetMessageInfo()
      *Message = PurePOP3_GetMessageTextInMemory()
      If *Message
        Debug "Message text : " + PeekS(*Message)
        FreeMemory(*Message)
      EndIf
      Debug "---------------------------------"
    Next i
  EndIf

it is supposed to save the email messages to files but that only happens for the two first files it seems. It counts all three messages with PurePOP3_CountMessages() and it displays the messages in the debug window, but it only saves Email-1.txt and Email-2.txt to disk, there is no Email-3.txt can you spot any errors I may have made here?

Posted: **Fri Dec 08, 2006 10:14 am**

Code: Select all

If Messages 
    For i=0 To Messages 
      PurePOP3_RetrieveMessage(i, "E:\Email-"+Str(i)+".txt")

Shouldn't that be '1 to Messages'.

Don't know if that works, but might help.

Posted: **Fri Dec 08, 2006 12:32 pm**

I can't test it now (no POP3 server) but IIRC I always used

Code: Select all

For i = 1 To Messages

where i is the message number (can't be 0 I think).

Posted: **Fri Dec 08, 2006 5:45 pm**

I have tried with both 0 and 1 and there doesn't seem to be any difference. I get the same result. And I don't get any error messages.

Posted: **Sat Dec 09, 2006 8:52 am**

GeoTrail wrote:I have tried with both 0 and 1 and there doesn't seem to be any difference. I get the same result. And I don't get any error messages.

Please :
- post a complete code snippet
- enable the trace mode [ PurePOP3_Trace(#True) ] and post the PurePOP3-DEBUG*.txt files [replace your password with XXX

]

Posted: **Sat Dec 09, 2006 2:10 pm**

The source is the source from the help file that I modified alittle

Code: Select all

PurePOP3_Trace(#True)
If PurePOP3_OpenPOP3Connection("pop.online.no", 110, "USER", "PASSWRD") = #PurePOP3_Ok
  Debug "Connected"
  Messages = PurePOP3_CountMessages()
  Debug "You have " + Str(Messages) + " messages(s)"
  
  If Messages
    For i=0 To Messages
      PurePOP3_RetrieveMessage(i, "E:\Email-"+Str(i)+".txt")
      Debug "Message info : " + PurePOP3_GetMessageInfo()
      *Message = PurePOP3_GetMessageTextInMemory()
      If *Message
        Debug "Message text : " + PeekS(*Message)
        FreeMemory(*Message)
      EndIf
      Debug "---------------------------------"
    Next i
  EndIf
  
  PurePOP3_ClosePOP3Connection()
Else
  Debug PurePOP3_GetLastServerMessage()
EndIf

It does seem to work now though. I had 5 email messages on the server and it now creates 5 email files. Could there be something wrong with the pop server?

Posted: **Sat Dec 09, 2006 4:34 pm**

GeoTrail wrote:It does seem to work now though. I had 5 email messages on the server and it now creates 5 email files.

Good

GeoTrail wrote: Could there be something wrong with the pop server?

Could be, that's why I asked for the log files. I have the impression that POP3 is a very non standard standard ! I had a lot of surprises with different servers.

Posted: **Thu Dec 28, 2006 3:56 pm**

@gnozal:

I tried to download your POP3 User Lib but I always get the following warning from our SonicWall appliance:

This request is blocked by the SonicWALL Gateway Anti-Virus Service. Name: Suspicious.2#upack (Worm)

Would you please be so kind and do a virus test on your PurePOP3 PB 4 zip archive http://freenet-homepage.de/gnozal/PurePOP3_.zip to make sure that it doesn't contain the above mentioned worm?
Or is this definitely a false positive warning?

Posted: **Thu Dec 28, 2006 4:02 pm**

Hi Shardik,

is definitely a F.P.

Best
jpd

Posted: **Thu Dec 28, 2006 4:13 pm**

Shardik wrote:Would you please be so kind and do a virus test on your PurePOP3 PB 4 zip archive http://freenet-homepage.de/gnozal/PurePOP3_.zip to make sure that it doesn't contain the above mentioned worm?
Or is this definitely a false positive warning?

It is a false positive. The SFX is packed with WinUpack, hence the virus warning.
Still, if you have any doubt, you can open PurePOP3-Installer.exe in your favorite packer (WinRAR, 7-ZIP, etc..) like a ZIP archive and manually extract the files without starting the exe itself.

Posted: **Thu Dec 28, 2006 4:28 pm**

@jpd and gnozal

Thank you for your fast replies!

gnozal wrote: Still, if you have any doubt, you can open PurePOP3-Installer.exe in your favorite packer (WinRAR, 7-ZIP, etc..) like a ZIP archive and manually extract the files without starting the exe itself.

My first try to download the file was successful. But when opening the archive, WinZip reported that the archive is not valid or corrupted. Therefore I retried the download several times and always received the above warning and SonicWALL refused to permit the download again. But I will retry the download when arriving at home in the evening because I don't have the administrative rights to disable the SonicWALL at work.

Posted: **Sun Dec 31, 2006 7:04 pm**

Update (Both versions)

- some internal changes in PurePOP3_RetrieveMessage()
- added POP3 server time out, to avoid infinite loops
- new function PurePOP3_SetTimeOut()

Posted: **Mon Jan 01, 2007 2:14 am**

Great work as usual gnozal. Thanks alot

PureBasic Forums - English

PurePOP3 library : POP3 functions