400-1100-266

9:00-24:00（工作日）
主页 > 知识库 > 使用SAFEARRAY返回的代码

使用SAFEARRAY返回的代码
热门标签：智能手机 检查注册表项 美图手机 呼叫中心市场需求 铁路电话系统 服务器配置 网站文章发布 银行业务
前天碰到有人问SAFEARRAY的问题，我正好对VB SCRIPT里面如何得到COM组件返回的数组感兴趣，就试验了一下。

IDE用的是VC7.1

开始都差不多，建立工程，建立COM对象，建立方法：

接口定义：

[id(2), helpstring("method GetArray")] HRESULT GetArray1([out,retval] VARIANT* v);

方法实现：
STDMETHODIMP CATL3::GetArray1(VARIANT * pvaVariant)
{
    std::vector float> vct;
    vct.push_back(   11.4 );
    vct.push_back(   12.4 );
    vct.push_back(   14.4 );
    CComSafeArrayVARIANT> saMatrix;
    for ( int i = 0 ; i  vct.size(); ++i )
    {
        saMatrix.Add( CComVariant(vct[i]));
    }
    VariantInit(pvaVariant);
    CComVariant var( saMatrix );
    var.Detach( pvaVariant );
    return S_OK;
}

注意的一点就是：VBS或其它脚本环境中要得到返回数组参数，数组中的类型是VARIANT类型。

VBS测试脚本
Dim v4

Cnxn4.Add 1, 2 

v4 = Cnxn4.GetArray1()

Dim x

For x = Lbound(v4) To Ubound( v4 )
 MsgBox v4(x)
Next

标签：河南 红河 上海 长治 新疆 乐山 沈阳 沧州

巨人网络通讯声明：本文标题《使用SAFEARRAY返回的代码》，本文关键词  ；如发现本文内容存在版权问题，烦请提供相关信息告之我们，我们将及时沟通与处理。本站内容系统采集于网络，涉及言论、版权与本站无关。
  • 相关文章
  • 推荐文章

    上一篇：几段非常有用的脚本（来自微软网站,由downmoon精心收集）

    下一篇：VBS教程：VBScript 基础-VBScript 变量

     
    微信咨询办理
    在线QQ客服
    ( 客服小王 )
    ( 客服小李 )
    ( 客服小刘 )
    ( 客服小张 )
    关于我们 | 荣誉资质 | 呼叫中心 | 代理加盟 | 客户案例 | 服务支持 | 产品介绍 | 行业资讯

    Copyright © 1999-2012 诚信 合法 规范的巨人网络 www.1330.cn 始建于2005年

    全国网站建设网站开发咨询热线：400-1100-266   0514-86177077

    江苏扬州巨人网络科技有限公司   总部地址：江苏省扬州信息产业基地11号楼4层

    《增值电信业务经营许可证》苏B2-20120278    苏ICP备15040257号 网站地图
    全国咨询热线
    400-1100-266
    在线客服( QQ：340506921 )
    版权所有：巨人网络(扬州)科技有限公司——拥有网站建设十年经验，具备独立网站开发能力，能够提供完善的网站设计及相关的网站制作服务！     全国统一服务热线：400-1100-266
    收缩
    • 微信客服
    • 微信二维码

    • 电话咨询

    • 400-1100-266