用C操作word以及监控word事件的源程序

wordcapp

解决方案 »

免费领取超大流量手机卡，每月29元包185G流量+100分钟通话, 中国电信官方发货

注意，是1.c，是原始的C语言写的，这个是主程序：
#include"1.h"void my_process();int main()
{
CoInitializeEx(NULL,COINIT_MULTITHREADED);
//添加我们的代码；
initialize(); my_process();
CoUninitialize();
_gettchar();
return 0;
}void my_process()
{
IDispatch* pApp,*pDocs,*pDoc,*pSelection;
HRESULT hr;
OLECHAR* name=L"Visible";
DISPID id,putid;
DISPPARAMS param;
VARIANT var;
VARIANT A_Param[4];
IConnectionPointContainer* pIConnectionPointContainer;
IConnectionPoint* pIConnectionPoint;
DWORD cookie;

hr=CoCreateInstance(&CLSID_App,NULL,CLSCTX_LOCAL_SERVER,&IID_App,&pApp);
if(!SUCCEEDED(hr))
{
//错误处理代码；
} hr=pApp->lpVtbl->QueryInterface(pApp,&IID_IConnectionPointContainer,(void**)&pIConnectionPointContainer); hr=pIConnectionPointContainer->lpVtbl->FindConnectionPoint(pIConnectionPointContainer,&IID_AppEvent,&pIConnectionPoint); hr=pIConnectionPoint->lpVtbl->Advise(pIConnectionPoint,(IUnknown*)&My_IDispatch,&cookie); pIConnectionPointContainer->lpVtbl->Release(pIConnectionPointContainer);

hr=pApp->lpVtbl->GetIDsOfNames(pApp,&IID_NULL,&name,1,LOCALE_SYSTEM_DEFAULT,&id); //_tprintf(L"%d\n",id); var.boolVal=1;
var.vt=VT_BOOL;
putid=DISPID_PROPERTYPUT; param.cArgs=1;
param.cNamedArgs=1;
param.rgdispidNamedArgs=&putid;
param.rgvarg=&var; //显示被打开的Word。
hr=pApp->lpVtbl->Invoke(pApp,id,&IID_NULL,LOCALE_SYSTEM_DEFAULT,DISPATCH_PROPERTYPUT,
&param,NULL,NULL,NULL); param.cArgs=0;
param.cNamedArgs=0;
param.rgdispidNamedArgs=NULL;
param.rgvarg=NULL;

//获取Docuements对象的IDispatch指针；
hr=pApp->lpVtbl->Invoke(pApp,0x6,&IID_NULL,LOCALE_SYSTEM_DEFAULT,DISPATCH_PROPERTYGET,
&param,&var,NULL,NULL); //pDoc就是Documents接口的指针；
pDocs=var.pdispVal;
param.cArgs=4;
param.cNamedArgs=0;
param.rgdispidNamedArgs=NULL;
param.rgvarg=A_Param; param.rgvarg[3].vt=VT_BSTR;
param.rgvarg[3].bstrVal=NULL; param.rgvarg[2].vt=VT_BOOL;
param.rgvarg[2].boolVal=FALSE; param.rgvarg[1].vt=VT_I4;
param.rgvarg[1].lVal=0; param.rgvarg[0].vt=VT_BOOL;
param.rgvarg[0].boolVal=TRUE; //新建一个文档，获得文档接口Document的接口指针；
hr=pDocs->lpVtbl->Invoke(pDocs,0xe,&IID_NULL,LOCALE_SYSTEM_DEFAULT,DISPATCH_METHOD,
&param,&var,NULL,NULL); //pDoc就是文档的接口指针
pDoc=var.pdispVal; param.cArgs=0;
param.cNamedArgs=0;
param.rgdispidNamedArgs=NULL;
param.rgvarg=NULL; //选中当前文档内容；
hr=pDoc->lpVtbl->Invoke(pDoc,0xffff,&IID_NULL,LOCALE_SYSTEM_DEFAULT,DISPATCH_METHOD,
&param,NULL,NULL,NULL); //获得Selection对象接口指针；
/*
pApp->lpVtbl->Invoke(pApp,0x5,&IID_NULL,LOCALE_SYSTEM_DEFAULT,DISPATCH_PROPERTYGET,
&param,&var,NULL,NULL);*/
hr=pApp->lpVtbl->Invoke(pApp,0x5,&IID_NULL,LOCALE_SYSTEM_DEFAULT,DISPATCH_PROPERTYGET,
&param,&var,NULL,NULL); pSelection=var.pdispVal; param.rgvarg=A_Param;
param.cArgs=1;
param.cNamedArgs=0;
param.rgdispidNamedArgs=NULL;
param.rgvarg[0].vt=VT_BSTR;
param.rgvarg[0].bstrVal=SysAllocString(L"杨大毛：秦山第三核电厂，信息项目出：[email protected]");
//写入字符串；
hr=pSelection->lpVtbl->Invoke(pSelection,0x68,&IID_NULL,LOCALE_SYSTEM_DEFAULT,DISPATCH_METHOD,
&param,NULL,NULL,NULL);

_gettchar();

}
监控事件的对象以及其他函数所在的源文件：#include"1.h"IDispatch My_IDispatch;IDispatchVtbl table;BOOL Com_IID(IID a,IID b)
{
if(a.Data1!=b.Data1)
return FALSE;
else if(a.Data2!=b.Data2)
return FALSE;
else if(a.Data3!=b.Data3)
return FALSE;
else if(a.Data4[0]!=b.Data4[0])
return FALSE;
else if(a.Data4[1]!=b.Data4[1])
return FALSE;
else if(a.Data4[2]!=b.Data4[2])
return FALSE;
else if(a.Data4[3]!=b.Data4[3])
return FALSE;
else if(a.Data4[4]!=b.Data4[4])
return FALSE;
else if(a.Data4[5]!=b.Data4[5])
return FALSE;
else if(a.Data4[6]!=b.Data4[6])
return FALSE;
else if(a.Data4[7]!=b.Data4[7])
return FALSE; return TRUE;}HRESULT STDMETHODCALLTYPE QueryInterface(IDispatch * This,REFIID riid,void **ppvObject)
{
if(Com_IID(*riid,IID_IUnknown))
{
*ppvObject=This;
return S_OK;
}
else if(Com_IID(*riid,IID_IDispatch))
{
*ppvObject=This;
return S_OK;
}
else if(Com_IID(*riid,IID_AppEvent))
{
*ppvObject=This;
return S_OK;
}
else
{
*ppvObject=NULL;
return E_NOINTERFACE;
}}ULONG STDMETHODCALLTYPE AddRef(IDispatch * This)
{
return 1;
}ULONG STDMETHODCALLTYPE Release (IDispatch * This)
{
return 0;
}HRESULT STDMETHODCALLTYPE GetTypeInfoCount(IDispatch * This,UINT *pctinfo)
{
return E_NOTIMPL;
}HRESULT STDMETHODCALLTYPE GetTypeInfo (IDispatch * This,UINT iTInfo,LCID lcid,ITypeInfo **ppTInfo)
{
return E_NOTIMPL;
}HRESULT STDMETHODCALLTYPE GetIDsOfNames(IDispatch * This,REFIID riid,LPOLESTR *rgszNames,UINT cNames,LCID lcid,DISPID *rgDispId)
{
return E_NOTIMPL;
}HRESULT STDMETHODCALLTYPE Invoke(
            IDispatch * This,
            DISPID dispIdMember,
            REFIID riid,
            LCID lcid,
            WORD wFlags,
            DISPPARAMS *pDispParams,
            VARIANT *pVarResult,
            EXCEPINFO *pExcepInfo,
            UINT *puArgErr)
{
_tprintf(L"%X\n",dispIdMember);
return S_OK;
if(dispIdMember==2)
{
//word已经关闭，不能再进行操作

}}void initialize()
{
My_IDispatch.lpVtbl=&table;
My_IDispatch.lpVtbl->AddRef=AddRef;
My_IDispatch.lpVtbl->GetIDsOfNames=GetIDsOfNames;
My_IDispatch.lpVtbl->GetTypeInfo=GetTypeInfo;
My_IDispatch.lpVtbl->GetTypeInfoCount=GetTypeInfoCount;
My_IDispatch.lpVtbl->Invoke=Invoke;
My_IDispatch.lpVtbl->QueryInterface=QueryInterface;
My_IDispatch.lpVtbl->Release=Release;
}
如果看不懂程序，我做了视频教程，可以结合视频教程看，就会明白很多！！！！！
视频教程地址http://v.youku.com/v_show/id_XNzU2NjYxNTk2.html
http://v.youku.com/v_show/id_XNzU2NjU3MTcy.html
http://v.youku.com/v_show/id_XNzU3MjU3Nzg4.html
多谢楼主分享
不过用 C 来搞 COM , 感觉还真的很新鲜.
从代码上看只是打开了个word然后typetext了，有什么新奇的吗？
楼上不知道授之以鱼，不如授之以渔。事件抓取你看了没有。另外，这个源代码确实比较简单，建议你看看视频再评论，视频中告诉了你其他操作的办法。其实用C操作Word没有任何实际价值，只是锻炼一下而已，所以能够打印出字符，接收事件已经OK了。请问，用C操作word，还能用到其他技术吗？
您好，您这里面能不能涉及到监控word点击了打开，另存为，保存这个层面的东西呢？