Here is some code which reads data from Outlook (2007 was tested) into PowerBuilder. You basically need to create a window with a multiline edit and a button on it. Put this into the clicked event of the button.<\/p>\n
To run it, open Outlook, select something (email message, task, etc.) then click the button on your window. There are many, many more methods and properties you have access to from PB via OLE to Outlook. The MSDN reference online is a big help<\/p>\n
integer li_rc\nlong ll_itemcount, ll_i\noleobject lole_item, lole_outlook, lole_exp, lole_selecteditems\nstring ls_subject, ls_from, ls_to, ls_body, ls_msg\nlole_outlook = CREATE oleobject\nlole_exp = CREATE oleobject\nlole_selecteditems = CREATE oleobject\nli_rc = lole_outlook.ConnectToNewObject("outlook.application")\nlole_exp = lole_outlook.ActiveExplorer()\n\/\/ Outlook has to be running\nIf IsNull(lole_exp) THEN\n\tMessagebox('Outlook Error','Is Outlook currently running?')\n\tGOTO cleanup\nEND IF\nli_rc = lole_exp.class\n\/\/ caption is window name like "Inbox - Microsoft Outlook" or "Calendar - Microsoft Outlook"\nls_subject = lole_exp.caption\n\nlole_selecteditems = lole_exp.selection\nll_itemcount = lole_selecteditems.count\n\nFOR ll_i = 1 to ll_itemcount\n\tlole_item = CREATE oleobject\n\tlole_item = lole_exp.selection.item(ll_i)\n\tli_rc = lole_item.class\n\tCHOOSE CASE li_rc\n\t\tCASE 26 \/\/appointment\n\t\t\tls_body = lole_item.body\n\t\t\tls_msg += '~r~n Appointment No: ' + string(ll_i) + ' of ' + string(ll_itemcount) + '~r~n' + ls_body\n\t\t\t\/\/ lots of other stuff could be here\n\t\tCASE 40 \/\/ contact\n\t\t\tls_body = lole_item.body\n\t\t\tls_msg += '~r~n Contact No: ' + string(ll_i) + ' of ' + string(ll_itemcount) + '~r~n' + ls_body\n\t\t\t\n\t\tCASE 43 \/\/ mail\n\t\t\tls_subject = lole_item.subject\n\t\t\tls_from = lole_item.sendername\n\t\t\tls_to = lole_item.to\n\t\t\tls_body = lole_item.body\n\t\t\tls_msg = '~r~nSubject: ' + ls_subject + '~r~nFrom: ' + ls_from + '~r~nTo: ' + ls_to + '~r~nBody: ' + ls_body\n\t\t\tls_msg += '~r~n Email No: ' + string(ll_i) + ' of ' + string(ll_itemcount) + '~r~n' + ls_msg\n\t\t\t\n\t\tCASE 48 \/\/ task\n\t\t\tls_subject = lole_item.subject\n\t\t\tls_to = lole_item.owner\n\t\t\tls_body = lole_item.body\n\t\t\tls_msg = '~r~nSubject: ' + ls_subject + '~r~nOwner: ' + ls_to + '~r~nBody: ' + ls_body\n\t\t\tls_msg += '~r~n Task No: ' + string(ll_i) + ' of ' + string(ll_itemcount) + '~r~n' + ls_msg\n\t\t\t\n\tEND CHOOSE\n\tDESTROY lole_item\nNEXT\nIF Len(ls_msg) > 0 THEN\n\tmle_1.text = ls_msg\nELSE\n\tmle_1.text = 'No items processed.'\nEND IF\ncleanup:\nDESTROY lole_selecteditems\nDESTROY lole_exp\nDESTROY lole_outlook<\/pre>\n","protected":false},"excerpt":{"rendered":"Here is some code which reads data from Outlook (2007 was tested) into PowerBuilder. You basically need to create a window with a multiline edit and a button on it. Put this into the clicked event of the button. To run it, open Outlook, select something (email message, task, etc.) then click the button on…<\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":[],"categories":[3,10],"tags":[56,12,13,16],"_links":{"self":[{"href":"https:\/\/anvil-of-time.com\/wp-json\/wp\/v2\/posts\/855"}],"collection":[{"href":"https:\/\/anvil-of-time.com\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/anvil-of-time.com\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/anvil-of-time.com\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/anvil-of-time.com\/wp-json\/wp\/v2\/comments?post=855"}],"version-history":[{"count":5,"href":"https:\/\/anvil-of-time.com\/wp-json\/wp\/v2\/posts\/855\/revisions"}],"predecessor-version":[{"id":1974,"href":"https:\/\/anvil-of-time.com\/wp-json\/wp\/v2\/posts\/855\/revisions\/1974"}],"wp:attachment":[{"href":"https:\/\/anvil-of-time.com\/wp-json\/wp\/v2\/media?parent=855"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/anvil-of-time.com\/wp-json\/wp\/v2\/categories?post=855"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/anvil-of-time.com\/wp-json\/wp\/v2\/tags?post=855"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}