javascript - 如何从Javascript设置ActiveX组件的byte []属性?

标签 javascript activex outlook-vba typeconverter

我想设置RTF格式的日历条目,但不知道如何将byte []传递给ActiveX对象,即RTFBody属性。

以下代码在设置了某些内容之后读取了RTFBody属性-因此读取byte []是有效的,但是当我尝试将完全相同的内容(+尾随0)写回时,既不是U/Int8Array也不是< aa>有效。

也许可以解决某些Scripting.Directory问题,但是我不知道如何实例化那些Non-ActiveX组件。替代解决方案不需要编写格式脚本,例如“转到第2行并将其设为粗体”,即我喜欢通过模板生成rtf,然后仅将结果粘贴到日历对象中。

我知道这最终必须用Windows-1252编码,但是作为开始,我只是想看到相同的字节才能成功写入。该脚本在.NET objects上下文中执行-因此脚本安全性不是问题。

<html>
    <head>
        <hta:application id="foo" applicationname="foo" version="1" navigable="yes" sysMenu="yes"></hta>
    </head>
    <script language="JavaScript" type="text/javascript">
function doit2() {
    var rtfBody = 
        "{\\rtf1\\ansi\\ansicpg1252\\deff0\\nouicompat\\deflang1031{\\fonttbl{\\f0\\fswiss\\fcharset0 Calibri;}}\r\n"+
        "{\\*\\generator Riched20 14.0.7155.5000;}{\\*\\mmathPr\\mwrapIndent1440}\\viewkind4\\uc1\r\n"+
        "\\pard\\f0\\fs22 bla\\par\r\n"+
        "}\r\n";
    // https://github.com/mathiasbynens/windows-1252
    var rtfBody1252 = rtfBody; // windows1252.encode(rtfBody);

    var dict = new ActiveXObject("Scripting.Dictionary");

    for (var i = 0; i < rtfBody1252.length; i++) {
        dict.add(i, rtfBody1252.charCodeAt(i));
    }

    dict.add(rtfBody1252.length, 0);

    // Alternative setting via U/Int8Array also doesn't work ...
    // var buf = new ArrayBuffer(rtfBody1252.length+1);
    // var bufView = new Int8Array(buf);
    // for (var i=0, strLen=rtfBody1252.length; i<strLen; i++) {
    //  bufView[i] = rtfBody1252.charCodeAt(i);
    // }
    // bufView[rtfBody1252.length] = 0;

    var myOlApp = new ActiveXObject("Outlook.Application");
    var nameSpace = myOlApp.GetNameSpace("MAPI");
    var recipient = nameSpace.CreateRecipient("user@host.com");
    var cFolder = nameSpace.GetSharedDefaultFolder(recipient,9);

    var appointment = cFolder.Items.Add(1);
    appointment.Subject = "Subject";
    appointment.Location = "Location";
    appointment.Start = "22.02.2017 17:00";
    appointment.Duration = "120";
    appointment.Categories = "deleteme";
    appointment.Body = "bla";

    var va = new VBArray(appointment.RTFBody).toArray();
    var bla = String.fromCharCode.apply(null, va);
    document.forms[0].output.value = bla;
    // var bla2 = windows1252.decode(bla);

    appointment.RTFBody = dict.Items();
    appointment.ReminderSet = "true";
    appointment.Save();
    entryId = appointment.EntryId;
    appointment.Display();

    delete appointment;
    delete cFolder;
    delete recipient;
    delete nameSpace;
    delete myOlApp;
}
    </script>
    <body>
        <form>
            <input type="button" onclick="doit2()" value="doit"/>
            <textarea name="output" rows="5" cols="50"></textarea>
        </form>
    </body>
</html>

最佳答案

使用后期绑定设置MailItem.RtfBody属性存在一个已知问题(这就是JS使用的-IDispatch.GetIDsOfNames / Invoke)。尽早出价(通过v表调用)效果很好。

上次我听说此消息时,没有任何解决方法,至少在使用JS时没有。您可以尝试使用Redemption(在其Safe * Item对象和RDOMail对象上公开RtfBody属性),但是随后需要在运行脚本的每台计算机上安装它。

关于javascript - 如何从Javascript设置ActiveX组件的byte []属性?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/42442646/

相关文章:

flash - 使用javascript处理大文件下载

javascript - RFID阅读器与网页集成

c# - 获取Outlook中所有房间的列表

javascript - .wrap() 与调整大小函数一起使用时多次添加选择器

javascript - OrientDB 通过触发器自动记录变更日志

javascript - 使用 MooTools JavaScript 的幻灯片 - 如何定位幻灯片以在浏览器窗口中重新缩放

javascript - 如何停止此代码中的重复值

调用 GetObject ("WinNT://JohnDoe,User"时出现 VBScript 错误)