分类: C/C++
2008-04-23 21:46:20
让你的程序也能执行脚本
作者:
VBScript(JScript)是应用广泛,简单易学的脚本语言。使用VBScript(JScript)调用COM组件则更是容易。那么,如果在你的程序中也能够执行脚本,则在简化程序设计的基础上,还会极大地提升软件的功能。为了方便大家使用这个功能,我写了一个具有自动化(Automation/IDispatch)功能的EXE包装程序来代理调用脚本执行。这个包装程序接口只有2个函数,说明如下:
#include "vbsengin.h" OnButton() { IVBSEngin vbsEngin; //声明一个脚本执行代理对象 if(vbsEngin.CreateDispatch("VBSEngin.Api")) //启动脚本执行代理 { vbsEngin.Run(sProgram); //执行脚本,sProgram中存放的是脚本源程序 vbsEngin.ReleaseDispatch(); //释放脚本执行代理 } }应用举例
''''启动WORD Set word=CreateObject("Word.Application") ''''显示WORD程序界面(不执行这行,那么你的WORD调用不会被用户看到) word.Visible=True ''''增加一个新文档 word.Documents.Add ''''输入文本 word.Selection.TypeText("Hello") ''''输入回车 word.Selection.TypeParagraph word.Selection.TypeText("good morning") ''''保存 word.ActiveDocument.SaveAs("c:\Hello.doc") ''''退出WORD程序 word.Quit(False) ''''释放WORD接口 Set word=Nothing