Hi,

How can I move an email item in my inbox to the delete email folder ?

..

..

$INSERT MAPI_EQUATES

Declare Function MAPISaveMail

Declare Subroutine Msg, Get_Status

flags = MAPI_LOGON_UI$

id = ""

message = ""

message<POS_SUBJECT$> = "MAPI Demo" :

message<POS_FROM$ > = "Donald Duck"

message<POS_TO$ > = "Alice Smith"

message<POS_TEXT$ > = "This is a test of the emergency…"

message<POS_TYPE$ > = "IPM.Deletebox"

message<POS_FLAGS$ > = MAPI_RECEIPT_REQUESTED$

session = Get_Property('CHILD_DOC.SESSION','TEXT')

ACTIVECHILD = 'CHILD_DOC'

if MAPISaveMail(session, ACTIVECHILD, id, flags, message) then

Msg(@window, "Message successfully saved")

end else

Get_Status(display)

Msg(@window, display)

end

…

not working just leave an new email at my inbox.

/anders

View this thread on the Works forum...