错误' BinaryToArray'在CRM 2015中未定义

时间:2015-11-12 19:10:33

标签: javascript reporting-services vbscript dynamics-crm-2015

有一个工作solution从SSRS报告生成pdf并附加在CRM 2013版本的电子邮件中。但不幸的是,自CRM 2015版本以来,由于通过javascript函数调用vbscript函数,此解决方案已停止工作。

以下是抛出错误的示例代码。非常感谢帮助。



<script type="text/javascript">
function encodePdf(params) {
            bdy = new Array();
            bdyLen = 0;
            var retrieveEntityReq = new XMLHttpRequest();

            var pth = Xrm.Page.context.getServerUrl() + "/Reserved.ReportViewerWebControl.axd?ReportSession=" + params[0] + "&Culture=1033&CultureOverrides=True&UICulture=1033&UICultureOverrides=True&ReportStack=1&ControlID=" + params[1] + "&OpType=Export&FileName=Public&ContentDisposition=OnlyHtmlInline&Format=PDF";
            retrieveEntityReq.open("GET", pth, false);
            retrieveEntityReq.setRequestHeader("Accept", "*/*");

            retrieveEntityReq.send();
            **BinaryToArray(retrieveEntityReq.responseBody);**
            return encode64(bdy);
        }
</script>
<script type="text/vbscript">
Function BinaryToArray(Binary)
       Dim i
       ReDim byteArray(LenB(Binary))
       For i = 1 To LenB(Binary)
              byteArray(i-1) = AscB(MidB(Binary, i, 1))
              concat2Bdy(AscB(MidB(Binary, i, 1)))
       Next
       BinaryToArray = byteArray
End Function
</script>        
&#13;
&#13;
&#13;

0 个答案:

没有答案