欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 高级功能研发区 → 经典文章复刻版-vbs调用c++的dll

   

欢迎使用金字塔普通技术服务论坛，您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴，普通区问题处理速度慢，请耐心等待。谢谢您对我们的支持与理解。    

  共有2557人关注过本帖树形打印复制链接

主题：经典文章复刻版-vbs调用c++的dll
帅哥哟，离线，有人找我吗？
netwalker
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：73 积分：30 威望：0 精华：0 注册：2013/3/7 22:50:14 		经典文章复刻版-vbs调用c++的dll  发帖心情 Post By：2020/11/22 17:23:43 [只看该作者]

按照帖子"利用金字塔的VBA与C++的混合编程来实现复杂的二次开发及交易功能"中用vs2010重新做一遍，因为vc6生成的dll在win10导入不成功，估计版本太老了。用vs2010生成的dll可以导入win10。
核心的步骤见附图。

图片点击可在新窗口打开查看此主题相关图片如下：5.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：7.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：8.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：9.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：10.jpg
图片点击可在新窗口打开查看

请问怎么解决？谢谢。
 回到顶部
帅哥哟，离线，有人找我吗？
netwalker
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：73 积分：30 威望：0 精华：0 注册：2013/3/7 22:50:14 		  发帖心情 Post By：2020/11/22 17:28:44 [只看该作者]

补充一下，金字塔是32位的，dll也是32位的。

 回到顶部
帅哥哟，离线，有人找我吗？
netwalker
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：73 积分：30 威望：0 精华：0 注册：2013/3/7 22:50:14 		  发帖心情 Post By：2020/11/22 17:32:12 [只看该作者]

补充几张图

图片点击可在新窗口打开查看此主题相关图片如下：2.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：4.jpg
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
netwalker
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：73 积分：30 威望：0 精华：0 注册：2013/3/7 22:50:14 		  发帖心情 Post By：2020/11/22 17:46:15 [只看该作者]

参考文章的url：http://www.weistock.com/bbs/dispbbs.asp?boardid=5&id=11505

 回到顶部
帅哥哟，离线，有人找我吗？
netwalker
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：73 积分：30 威望：0 精华：0 注册：2013/3/7 22:50:14 		  发帖心情 Post By：2020/11/22 18:33:32 [只看该作者]

试了一下，Set MyAddin = CreateObject("MyActiveXDemo.VBSAddin")这一句是执行成功的，MyAddin.MyTest(400)是失败的。

 回到顶部
帅哥哟，离线，有人找我吗？
netwalker
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：73 积分：30 威望：0 精华：0 注册：2013/3/7 22:50:14 		  发帖心情 Post By：2020/11/22 18:37:34 [只看该作者]

添加了dllexport，如图

图片点击可在新窗口打开查看此主题相关图片如下：11.jpg
图片点击可在新窗口打开查看

Set MyAddin = CreateObject("MyActiveXDemo.VBSAddin") --这一句是执行成功的
MyAddin.MyTest(10.0)  --这一句报错。

图片点击可在新窗口打开查看此主题相关图片如下：12.jpg
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
netwalker
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：73 积分：30 威望：0 精华：0 注册：2013/3/7 22:50:14 		  发帖心情 Post By：2020/11/22 22:35:09 [只看该作者]

全部代码见附件
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:myactivexdemo.zip

[此贴子已经被作者于2020/11/22 22:35:42编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
无为剑
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：2437 积分：0 威望：0 精华：0 注册：2016/3/5 22:53:41 		  发帖心情 Post By：2020/11/22 22:51:36 [只看该作者]

你添加的方法要以com的形式添加的，不是直接在类中添加成员。
我们提供的vc6的范例是肯定可以导入的，不能导入说明你的系统有问题
 回到顶部
帅哥哟，离线，有人找我吗？
netwalker
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：新手上路 帖子：73 积分：30 威望：0 精华：0 注册：2013/3/7 22:50:14 		  发帖心情 Post By：2020/11/26 22:48:25 [只看该作者]

谢谢提示，搞定了

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版    Powered By weistock 2012
页面执行时间 02.67188 秒, 6 次数据查询