Pastetool #471
URL: , Paste another<SCRIPT language="vbscript">
set objPOP3 = CreateObject("EasyMail.POP3")
objPOP3.MailServer="mail.domain.com"
objPOP3.Account="account"
objPOP3.Password="password"
objPOP3.Connect
cnt = objPOP3.GetDownloadableCount()
MsgBox cnt & " messages available."
objPOP3.Disconnect
</SCRIPT>
Download code
This code was pasted on March 5, 2010
Protected with advance Anti-SPAM techniques :)
Coded and designed by Fedmich
