以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://www.weistock.com/bbs/index.asp)
--  高级功能研发区  (http://www.weistock.com/bbs/list.asp?boardid=5)
----  请问这段代码问题出在哪  (http://www.weistock.com/bbs/dispbbs.asp?boardid=5&id=87577)

--  作者:chendong
--  发布时间:2015/11/21 9:50:28
--  请问这段代码问题出在哪
公式支持VBS,所以我就想使用如下方式,调用vb中写的active dll中的函数,但如下所写的,报错:错误代码:424,
描述:缺少对象\'obj\'


<% Dim obj
   Set obj = CreateObject("PHPdll.test") %>
aa:<% aa = obj.SumUpV(0.68,0.33) %>;

--  作者:chendong
--  发布时间:2015/11/21 9:54:39
--  
<% Dim obj
   Set obj = CreateObject("PHPdll.test")
 aa = obj.SumUpV(0.68,0.33) %>;


这样写,倒是不报错,但,数据也取不出

我的目的是想在公式中把函数运算的结果取出来后赋值给一个变量

--  作者:王锋
--  发布时间:2015/11/21 10:18:35
--  

SumUpV 这个函数你返回的是序列数据还是单值数据?

结算结果你需要调用相应的转换函数才可以的。

 

用这句话将vbs中的aa变量传递回PEL的aa变量中去

ffl.vardata("aa")=aa

 

参考

http://www.weistock.com/bbs/dispbbs.asp?boardid=16&Id=55132 编写教程高级篇

第三章 VBS公式教程 14
3.1 嵌入式VBS、JS脚本 14

 


--  作者:chendong
--  发布时间:2015/11/24 11:05:49
--  
SumUpV 这个函数,返回的是单值数据
--  作者:chendong
--  发布时间:2015/11/24 11:18:26
--  
单值数据要传回到PEL公式中,也是用ffl.vardata("aa")=aa

对吧

--  作者:王锋
--  发布时间:2015/11/24 18:21:02
--  
是的
--  作者:chendong
--  发布时间:2015/11/24 22:01:03
--  
那反过来,VBS中的<% %>中的代码如何能读到PEL公式中的变量呢?
--  作者:chendong
--  发布时间:2015/11/24 22:02:55
--  
PEL中的变量,如何传到VBS中的<% %>呢,让VBS能读到
--  作者:王锋
--  发布时间:2015/11/24 22:08:40
--  

参考

http://www.weistock.com/bbs/dispbbs.asp?boardid=16&Id=55132 编写教程高级篇

第三章 VBS公式教程 14
3.1 嵌入式VBS、JS脚本 14

 

请认真看3楼给你的回复