Locked Property
If the message is returned by MailBee.POP3
object, the message will be locked (Locked=True). You cannot change
properties of the locked message. This guarantees that the message is exactly
the same as when it came from POP3 server. If you set Locked=False,
you can start changing message properties but original will be lost and the
message will be reformatted (i.e. Message.RawBody will be recreated).
If the message is created in other ways (not by MailBee.POP3 or MailBee.IMAP4
object), Locked=False already, so you can immediately set the
message's properties.
| Value Type: | Boolean | |
| Parameters: | None | |
Usage example:
'Forwarding with MailBee Dim objPOP3, objSMTP, Msg 'Using visual basic to create object Set objPOP3 = CreateObject("MailBee.POP3") Set objSMTP = CreateObject("MailBee.SMTP") 'Using ASP to create object 'Set objPOP3 = Server.CreateObject("MailBee.POP3") 'Set objSMTP = Server.CreateObject("MailBee.SMTP") 'In ASP use Response.Write instead of MsgBox objPOP3.LicenseKey = "put your POP3 license key here" objSMTP.LicenseKey = "put your SMTP license key here" objPOP3.Connect "mailserver.com", 110, "MyName", "MyPassword" If objPOP3.Connected Then If objPOP3.MessageCount > 0 Then Set Msg = objPOP3.RetrieveSingleMessage(1) If Not Msg Is Nothing Then Msg.Locked = False Msg.ToAddr = "bill@host.com" Msg.CCAddr = "" ' Do not send to original CC's Msg.Subject = "FW: " & Msg.Subject objSMTP.ServerName = "mail.server.com" If objSMTP.Connect Then Set objSMTP.Message = Msg objSMTP.Send objSMTP.Disconnect End If End If End If objPOP3.Disconnect End If
See Also:
Copyright 2002-2008, AfterLogic Corporation. All rights reserved.