Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
*// Creat object for OutLook application (Start)
myOlApp = CreateObject("Outlook.Application")
myNameSpace = myOlApp.GetNameSpace("MAPI")
*// Creat object for OutLook application (End )
*// Locate your InBox folder as an object.(Start)
myFolder=myNameSpace.GetDefaultFolder(6)
*// Locate your InBox folder as an object.(End )
*// Locate a Specific message.(Start)
FOR I= 1 to Myfolder.Items.Count
* You have to set you own selection criteria, for example
* I am locating a message from me with a certain subject.
IF Myfolder.Items(I).SenderName="Walid Magd" AND ;
Myfolder.Items(I).Subject="TEST OUTLOOK"
OMyMessage=Myfolder.Items(I)
EXIT
ENDIF
ENDFOR
*// Locate a Specific message.(End )
*// Store the message body in variable(Start)
lcMessageBody = OMyMessage.Body
*// Store the message body in variable(End )
*// Do whatever you want with the returned string
? lcMessageBody
IF TYPE("OMyMessage")= "O"
*// Store the message body in variable(Start)
lcMessageBody = OMyMessage.Body
*// Store the message body in variable(End )
ENDIF