10-25-2009, 06:55 AM
1. If System folder is read-only: right click System folder, click Folder Properties, uncheck read-only, OK.
2. Find and delete member function EMAILACCOUNT.Get.
3. Optionally make System folder read-only.
4. Import the attached file. It contains modified EMAILACCOUNT.Get. Place it anywhere.
To use non encrypted password with email functions, prepend ! to the password.
In the future, after upgrading QM, delete the imported function.
Function Gmail_DownLoad
2. Find and delete member function EMAILACCOUNT.Get.
3. Optionally make System folder read-only.
4. Import the attached file. It contains modified EMAILACCOUNT.Get. Place it anywhere.
To use non encrypted password with email functions, prepend ! to the password.
In the future, after upgrading QM, delete the imported function.
Function Gmail_DownLoad
function str'EMAIL_ACCOUNT str'PASSWORD [str'DownLoadFolder]
;EXAMPLE:
;Gmail_DownLoad "User@gmail.com" "Password" "$desktop$/Emails"
str EMAIL=
;pop_server pop.gmail.com
;pop_port 995
;pop_user EMAIL_ACCOUNT
;pop_password !PASSWORD
;pop_auth 0
;pop_secure 1
;pop_timeout 60
EMAIL.findreplace("EMAIL_ACCOUNT" EMAIL_ACCOUNT)
EMAIL.findreplace("PASSWORD" PASSWORD)
ARRAY(str) a
ReceiveMail(EMAIL 0x100 DownLoadFolder a)