一个离开.NET的程序员

ryhan

  博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

2011年5月4日

摘要: Dim xmlDoc,xmlRoot,xmlNode,lastNode,newNode Dim doc,docRoot,i,flag Dim strNodeName,strPath,docPath Dim xmlFolder,docFolder,oshell Set oshell = CreateObject("Shell.Application") Set xmlFolder = oshell.BrowseForFolder(0, "选择目标XML文档所在的目录", 0, ssfDRIVES) strPath = xmlFolder.Self.Path 阅读全文
posted @ 2011-05-04 15:12 ryhan 阅读(1075) 评论(0) 推荐(0) 编辑

摘要: -------------------------------------------------------------------------------------------------------Function GetXml (strXmlFilePath,nodestring)Dim xmlDoc,xmlRootSet xmlDoc = CreateObject("Microsoft.XMLDOM") '创建XML DOM对象xmlDoc.async = False '控制加载模式为同步模式(xml树加载完毕后再执行后续代码)xmlDoc.lo 阅读全文
posted @ 2011-05-04 15:10 ryhan 阅读(3127) 评论(0) 推荐(0) 编辑

摘要: ''* 功能:使用VBS读取ini文件中指定节点下的所有值'* 输入参数:inipath :ini文件的地址'* initypes :ini文件中包含在"["和"]"之间的值'* 返回值:找到的字段的值组成的array'* 编写人: chenyb'* 编写日期:2008-12-26'* 其他说明:以下只是方法,具体问题具体修改'Function vbsGetIniFields(inipath,initypes)Const ForReading = 1 '定义常量'FS 阅读全文
posted @ 2011-05-04 15:08 ryhan 阅读(1297) 评论(0) 推荐(0) 编辑

摘要: '作者:CSDN 许仙 'Homepage : jjweb.126.com'MSN :Coderxu#hotmail.com'QQ:19030300'转载请保持文章完整,保存以上作者信息 请珍惜他人劳动成果 由于卡巴斯基 太厉害 弄的 OFFCIE编写的程序 调用API读取配置文件都不可以 于是 想到了用FileSystemObject对象读取INI 文件 代码如下, 修改了一下, 同时 支持了 VBS 当然 也支持ASP 网页读配置文件了.... VB代码Public Function GetIni1(ByVal strPrimary As Strin 阅读全文
posted @ 2011-05-04 15:06 ryhan 阅读(942) 评论(0) 推荐(0) 编辑

摘要: 有两种方式注册组件:一种是调用regsvr32.exe:例如我们运行regsvr32.exe c:\test.dll来注册位于C:盘根目录下的test.dll。另外一种是在MTS(微软事务服务器)中注册。MTS是值得推荐的,因为它具有下列优点:1、动态卸载平衡,提高组件和基于组件的应用程序的升级性。2、包含公布和提交事件和队列组件的能力,使得更容易与多个组件联合。 本文将详细介绍COM+组件在MTS中的注册方法:步骤一:【开始菜单】→【程序】→【管理工具】→【组件服务】步骤二:出现窗口后,【组件服务】→【计算机】→【我的电脑】→【COM+ QC Dead Letter Queue Listen 阅读全文
posted @ 2011-05-04 14:53 ryhan 阅读(578) 评论(0) 推荐(0) 编辑