Created by Jerry Wang, last modified on Jun 16, 2014

在ui component里面創(chuàng)建一個空的view，copy paste如下的javascript代碼，

<%@page language="abap" %> <%@extension name="thtmlb" prefix="thtmlb" %> <%@extension name="chtmlb" prefix="chtmlb" %> <%@extension name="bsp" prefix="bsp" %> <div id = "main"><TABLE id="mtable" border=1><tbody id="mtbody"><TR id="mtr"><TD>SenderName</TD><TD>ReceivedTime</TD><TD>To</TD><TD>CC</TD><TD>Subject</TD><TD>Body</TD></TR></tbody></TABLE></div> <script language = "javascript">function init(){var body = document.getElementById("mtbody");var l_mails = getAllMails( );render(l_mails, body);}function getAllMails(){var oi_oApp = new ActiveXObject("Outlook.Application");var olFolderInbox = 6;var l_inboxFoder = oi_oApp.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox);var l_items = l_inboxFoder .Items.Restrict("[MessageClass] >= 'IPM.Note'");l_items.Sort("ReceivedTime",true);return l_items;}function render(p_Items, pUIElement){var tr = document.getElementById("mtr");for( var i =0; i < p_Items.count; i++ ) {var newTr = tr.cloneNode(true);var children = newTr.children;var mailItem = p_Items(i+1);for( var j = 0 ; j < children.length; j++) {var item = children.item(j);switch(j) {case 0:item.innerHTML = mailItem.SenderName;break;case 1:item.innerHTML = mailItem.ReceivedTime;break;case 2:item.innerHTML = mailItem.To;break;case 3:item.innerHTML = mailItem.CC;break;case 4:item.innerHTML = mailItem.Subject;break;case 5:item.innerHTML = mailItem.Body.substr(0,20);break;}}pUIElement.appendChild(newTr);}}init(); </script>

打開IE的activeX之后就能看到如下的outlook郵件列表.

總結(jié)

以上是生活随笔為你收集整理的在SAP BSP view里显示outlook inbox里的邮件的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。