应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 专业学科区 » 信息科学 » 控制工程 » 【求助】哪位高人会用ＶＣ，ＶＣ＋＋调用ｃｏｍ组件的
21/1返回列表
查看: 891  |  回复: 1
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

豆子的豆

新虫 (初入文坛)

[交流] 【求助】哪位高人会用ＶＣ，ＶＣ＋＋调用ｃｏｍ组件的 已有1人参与

求高人，万分感谢
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
1楼 2010-06-08 22:10:12
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

absoluty

金虫 (正式写手)
★ ★ ★ ★ ★ ★
小木虫(金币+0.5):给个红包，谢谢回帖交流
无奈的云(金币+5):很详细！专家辛苦了~ 2010-06-09 09:02:35
C++和C#编写调用COM组件


作者：徐凌超

下载源代码


摘要：现在COM组件的使用越来越广泛，在各个程序中调用COM组件我想大家都遇到过，这篇文章就是关于COM组件的编写和调用的，主要包含了使用VC6.0编写和调用COM组件，VS2005中使用C#编写和调用COM组件，以及在VC6.0和VS2005之间互相调用COM组件。

关键字：VC6.0编写调用COM VS2005中C#编写和调用COM VC6.0和VS2005之间互相调用COM

正文：

前一阵在工作中做项目的时候，遇到了COM组件的调用和使用问题，当时研究和好一阵，才把中间的环节打通，现在写出来为大家提供方便，这里包含了四个类型:

1、在VS2005中，C#编写DLL并使用C++调用

2、在VS2005中C#编写的COM组件，使用VC6.0调用

3、在VC6.0中编写COM组件，使用VS2005 C#调用

4、在VC6.0中编写COM组件，使用VC6.0调用

其中每个类型都写了两个程序，一个为COM组件程序，一个为调用程序

程序实现：

1、在VS2005中，C#编写DLL并使用C++调用

（1）C#编写DLL程序

建立C#编写的DLL程序AddDll，项目类型为：类库

程序代码：


using System;
using System.Collections.Generic;
using System.Text;

namespace AddDll
{
    public class Add
    {
        public int iadd(int a, int b)
        {
            int c = a + b;
            return c;
        }
    }
}
      

（2）C++编写调用程序

建立C++的Win32控制台应用程序UseDll，项目类型为：Win32控制台应用程序

配置：右键点击解决方案资源管理器中的UseDll，选择“属性”，将公共语言运行库支持设置为“公共语言运行库支持(/clr)”

图一 公共语言运行库设置

程序代码：
#include "stdafx.h"
#include "stdio.h"

#using "..\debug\AddDll.dll"
using namespace AddDll;

int _tmain(int argc, _TCHAR* argv[])
{
        int result;
        Add ^add = gcnew Add();
        result = add->iadd(10,90);
        printf("%d",result);
        scanf("%s";
        return 0;
}
      

2、在VS2005中C#编写的COM组件，使用VC6.0调用

（1）VS2005中使用C#编写COM组件

建立C#编写的COM组件，项目类型为类库

配置：右键点击解决方案资源管理器中的AddCom，选择“属性”，选择“生成”，选择“为COM Interop注册(_P)”

打开AssemblyInfo.cs文件，设置[assembly: ComVisible(true)]

这用就可以生成AddCom.tlb文件


图二 COM生成设置

程序代码：
using System;
using System.Collections.Generic;
using System.Text;
using System.Runtime.InteropServices;

namespace AddCom
{
    //可以通过//菜单的 “工具/guid生成”。
    //注意要选择Define Guid{….}格式，并全//部保存下来，保存到哪都行，记事本呀什么的。
    //因为在做VC程序/////////的时候要用到的。
    [Guid("298D881C-E2A3-4638-B872-73EADE25511C"]  
    public interface AddComInterface
    {
        [DispId(1)]
        int iadd(int a, int b);
        [DispId(2)]
        float ladd(float a, float b);
    }

    [Guid("2C5B7580-4038-4d90-BABD-8B83FCE5A467"]
    [ClassInterface(ClassInterfaceType.None)]
    public class AddComService : AddComInterface
    {
        public AddComService()
        {
        }
        public int iadd(int a, int b)
        {
            int c = 0;
            c = a + b;
            return c;
        }
        public float ladd(float a, float b)
        {
            float c = 0;
            c = a + b;
            return c;
        }
    }
}
      

（2）VC6.0编写调用程序

使用VC6.0编写建立MFC应用程序UseCom，项目类型为MFC AppWizard(exe)

在stdafx.h添加：
#import "AddCom.tlb"
using namespace AddCom;
      

程序代码：
void CUseComDlg::OnButtonUse()
{
        // TODO: Add your control notification handler code here
        int dresult;
        float fresult;
        CString strResult;

        CoInitialize(NULL);//NULL换成0也可以

        AddCom::AddComInterfacePtr p_Add(__uuidof(AddComService));
        dresult = p_Add->iadd(1,2);
        fresult = p_Add->fadd(1.2,2.3);
        strResult.Format("int:%d \nfloat:%f",dresult,fresult);
        MessageBox(strResult,"计算结果",MB_OK);

        CoUninitialize();   
        
}
      

3、在VC6.0中编写COM组件，使用VS2005 C#调用

（1）VC6.0编写COM

使用VC6.0建立COM组件，工程类型：ATL COM AppWizard

程序代码：

接口：
interface IAdd : IDispatch
        {
                [id(1), helpstring("method iadd"] HRESULT iadd([in]int a, [in]int b, [out]int * c);
                [id(2), helpstring("method fadd"] HRESULT fadd([in]float a, [in]float b, [out]float * c);
                [id(3), helpstring("method isub"] HRESULT isub([in]int a, [in]int b, [out]int * c);
        };
      

实现：
STDMETHODIMP CAdd::iadd(int a, int b, int *c)
{
        // TODO: Add your implementation code here
        *c = a + b;

        return S_OK;
}

STDMETHODIMP CAdd::fadd(float a, float b, float *c)
{
        // TODO: Add your implementation code here
        *c = a + b;

        return S_OK;
}

STDMETHODIMP CAdd::isub(int a, int b, int *c)
{
        // TODO: Add your implementation code here
        *c = a - b;

        return S_OK;
}
      

（2）VS2005使用C#编写调用程序（网站程序）

使用VS2005建立网站UseCom

配置：在解决方案资源管理器中的主目录点击右键，选择添加引用，选择COM，添加刚刚建立的AddCom 1.0 Type Library

在程序中要using编写的COM组件：using ADDCOMLib;


图三 引用COM

程序代码：
using System;
using System.Data;
using System.Configuration;
using System.Web;
using System.Web.Security;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.WebControls.WebParts;
using System.Web.UI.HtmlControls;
using ADDCOMLib;

public partial class _Default : System.Web.UI.Page
{
    protected void Page_Load(object sender, EventArgs e)
    {

    }
    protected void ButtonCom_Click(object sender, EventArgs e)
    {
        Add add = new Add();
        int iresult;
        float fresult;
        int sresult;

        add.IAdd(10, 20, out iresult);
        add.fadd((float)1.2,(float)2.3, out fresult);
        add.isub(100, 10, out sresult);

        TextBoxResult.Text = iresult.ToString();
        TextBoxRe2.Text = fresult.ToString();
        TextBoxRe3.Text = sresult.ToString();
    }
}
      

4、在VC6.0中编写COM组件，使用VC6.0调用

（1）VC6.0编写COM组件

使用VC6.0建立COM组件，工程类型：ATL COM AppWizard

程序代码：

接口：
interface IAdd : IDispatch
        {
                [id(1), helpstring("method iadd"] HRESULT iadd([in]int a, [in]int b, [out]int * c);
                [id(2), helpstring("method fadd"] HRESULT fadd([in]float a, [in]float b, [out]float * c);
                [id(3), helpstring("method isub"] HRESULT isub([in]int a, [in]int b, [out]int * c);
        };
      

实现：
STDMETHODIMP CAdd::iadd(int a, int b, int *c)
{
        // TODO: Add your implementation code here
        *c = a + b;

        return S_OK;
}

STDMETHODIMP CAdd::fadd(float a, float b, float *c)
{
        // TODO: Add your implementation code here
        *c = a + b;

        return S_OK;
}

STDMETHODIMP CAdd::isub(int a, int b, int *c)
{
        // TODO: Add your implementation code here
        *c = a - b;

        return S_OK;
}
      

（2）VC6.0编写调用程序

使用VC6.0建立MFC应用程序UseCOM，调用刚刚建立的COM组件

将上面程序AddCom生成的AddCom.dll放入本程序的工程目录和程序生成目录中

在StdAfx.h中加入：

#import "AddCom.dll" no_namespace

程序代码：
void CUseComDlg::OnBUTTONUse()
{
        // TODO: Add your control notification handler code here
        CString strResult;
        CoInitialize(NULL);//NULL换成0也可以
        IAddPtr m_add = NULL;
        HRESULT hr = S_OK;
        hr = m_add.CreateInstance(__uuidof(Add));

        int d_a = 90;
        int d_b = 10;
        int d_c;
        int d_d;
        float f_a = 1;
        float f_b = 2;
        float f_c;

        m_add->_IAdd(d_a,d_b,&d_c);
        m_add->fadd(f_a,f_b,&f_c);
        m_add->isub(d_a,d_b,&d_d);

        strResult.Format("返回结果：%d; %f; %d",d_c,f_c,d_d);
        MessageBox(strResult,"结果",MB_OK);

        m_add.Release();
        m_add = NULL;
        CoUninitialize();   
        
}
文章出处:http://www.vckbase.com/document/viewdoc/?id=1852
赞一下(2人) 回复此楼
2楼2010-06-09 08:54:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 豆子的豆 的主题更新
21/1返回列表
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 为什么资助数各大高校都创新高，自己申请怎么就这么难 +10 Kittylucky 2026-08-27 10/500 2026-08-28 07:10 by sincosx
[基金申请] 国自然面上复盘~欢迎讨论 (金币+5) +11 晴天加油 2026-08-26 12/600 2026-08-28 01:22 by li09465290@
[基金申请] 哪位高人中了，把查询到的截图贴出来让我看看，让我长长见识 +5 yuleib84 2026-08-26 6/300 2026-08-28 00:02 by yudaoqian88
[基金申请] 基金未中，这种答复是模板吗？ +5 zhaosm1982 2026-08-27 6/300 2026-08-27 16:00 by lfy8008
[文学芳草园] 梦想 +3 myrtle 2026-08-26 3/150 2026-08-27 10:01 by angelyueyi
[基金申请] 为什么 国际(地区)合作与交流项目 没有放榜？ 10+3 majunge000 2026-08-26 11/550 2026-08-27 08:42 by 北京莱茵编辑
[硕博家园] 售SCI一区T0P文章，我:8.O.55.1.O.54,科目齐全,可+急 +3 LIbGuocjEEYw 2026-08-26 4/200 2026-08-27 02:01 by Ie9AyIAvGbvs
[基金申请] 我不理解！ +15 Edward_pc 2026-08-26 23/1150 2026-08-26 20:34 by zzuzxg
[基金申请] 系统查不到 +10 董八千 2026-08-26 10/500 2026-08-26 16:30 by Equinoxhua
[基金申请] 范进中举一文的中心思想 +9 炎黄贵胄 2026-08-22 10/500 2026-08-26 15:40 by semaglutide
[基金申请] 2026年8月25日国自然放榜前突然收到列入评审专家邮件，有关系吗？ +25 木水思豆 2026-08-25 28/1400 2026-08-26 14:53 by draco1987
[基金申请] 为什么国自然不能直接公布 +4 bjdxyxy 2026-08-26 4/200 2026-08-26 13:12 by qingmu1201
[基金申请] 项目信息和经费信息在系统里都可以看到了 +6 wittyboy 2026-08-26 14/700 2026-08-26 10:55 by wittyboy
[基金申请] 国合可查了 +3 paperzjh 2026-08-26 3/150 2026-08-26 10:41 by LemmonTr
[职场人生] 学生撞见辅导员送外卖，第二天全班都沉默了 +3 鲸鱼融金_浙江_� 2026-08-22 3/150 2026-08-26 09:01 by zzuzxg
[基金申请] 在坚冰还盖着北海的时候，我看到了怒放的梅花。 (金币+10) +6 ziyangfang 2026-08-25 9/450 2026-08-25 20:26 by huagongfeihu
[基金申请] 明天应该可查了！？ +6 chengyan1220 2026-08-23 6/300 2026-08-25 19:45 by zfd97
[基金申请] 没有任何消息-是不是就凉了 +9 图啦图啦 2026-08-24 10/500 2026-08-25 11:59 by 南海小哥
[基金申请] 建议基金发布提前给出明确的时间点 +13 kulium 2026-08-21 16/800 2026-08-24 16:27 by superceng
[基金申请] 看来今天不会放榜了？ +8 chengyan1220 2026-08-21 11/550 2026-08-21 17:52 by dcqxinyang
信息提示
关闭
请填处理意见
关闭