Database Search

TechHome

• !!NEWSFLASH!!
• 500 Status Unable to Relay Discussion
• Adding HEADERS to Postie Emails
• Bulk Emailer
• CDO to Send SSL Email
• Change the DNS Name in Header
• Email Error Information
• Email Reader
• Email with Embedded Graphic
• Error 550 Relaying is prohibited using KSendText
• Extension on file is changed
• Extract the HTML message from Postie raw output
• Gmail File Attachment Issue
• Grabbing Individual Msgs from kGetMail
• Header Data in the Body of Email
• kGetMail and Pattern Matching
• kGetMail attachments
• kGetMail Converting File Endings
• kGetMail Get Embedded Images in Raw Email
• kGetMail saving HTML
• kGetMail with Delete Flag and Groupwise
• kSendMail Error 10060
• kSendText Error 10013
• kSendText Error 10061 when Crystal Reports is Installed
• kSendText failing - status - 503 5.0.0 Need RCPT
• kSendText Flags Explained
• kSendText not Sending Emails and Port Issues
• kSendText Simple Example
• kStatusInfo Return Codes
• Loop thru local email accounts and forward to SMTP server
• Postie and MailServer Probs
• Postie and MS Exchange
• Postie and POP3 Updates
• Postie and Return Receipts
• Postie Email via Hotmail
• Postie Error 10053
• Postie Error 501
• POSTIE Extender Error 10061
• Postie IMAP4 message deletion
• Postie Send Gmail
• Postie Speed
• Postie WIL Extender Load Error 1437
• Problem with Returned Email
• Read Email SSL
• Send Email with dialog
• Send Email With Image
• Send Text Formatted as a Table
• Simple Email Reader
• SMTP Session Authentication Failed
• Status 550 - Invalid Address and SMTP Mail Server Info
• Text Attachments and Conversion of CRLFs
• Use Postie for Mail Forwarding
• v10025 and Decode Headers with Some Charsets

Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.

Email Reader

;***************************************************************************
;**
;**  Email Reader (POP3)
;**
;**
;**  NOTICE: *********** IMPORTANT [ Use at your own risk ] ***********
;**
;**  This code grabs one email at a time, displays the content in a message
;**  and DELETES the email from the mail server.
;**
;**  Press 'No' when prompted if you DO NOT want to delete the message from
;**  the mail server.
;**
;***************************************************************************

AddExtender("WWPST44I.DLL")
host="mail.mailserver.com"
fromaddr=""
userid="{username}"
password="{password}"
port=""
mailbox=""
extractfile = "msg.txt"
flags=""
title = "Email Reader"

;Define directory to store email body & attachment files
emaildir = "C:\Temp\Email\"
If !DirExist(emaildir) Then DirMake(emaildir)
DirChange(emaildir)

;Initialize values to be used in kGetMail
kInit(host,fromaddr,userid,password,port)

;Get only one email at a time AND delete it
While @TRUE
   ;Initialize variables
   header = ""
   body = ""
   ;Get first email only
   ;   Returns header
   header = kGetMail( 1, emaildir : extractfile, "", mailbox, flags )
   ;Check Header
   ;   Break from loop when no more emails available on mail server
   If header == "There are 0 messages waiting (0 bytes)":@CRLF Then Break
   ;Grab the body contents of the email message from output file
   If FileExist( emaildir : extractfile )
      body = FileGet( emaildir : extractfile )
   EndIf
   Pause( title, "[HEADER]": @CRLF : header : @CRLF : "[BODY]" : @CRLF : body )

   ;Delete output file
   FileDelete( emaildir : extractfile )

   ;*********** DELETES EMAIL FROM MAIL SERVER [ Use at your own risk ] ***********
   ret = AskYesNo( title, "Do you want to delete this message?" )
   If ret Then kGetMail( 1, "", "", "", "d" )
EndWhile
Message( title, "Finished Getting Messages" )
Exit

Article ID:   W17373

File Created: 2008:04:10:15:08:40

Last Updated: 2008:04:10:15:08:40