快速业务通道

复制代码 代码如下: Option Explicit ''○○○○○○○○○○○○○○○○○○○○○○○○○○○○○开始 Const blnVBSShowCaption=True ''生成的服务备份中是否添加说明 Const blnVBSShowDescription=True ''●●●●●●●●●●●●●●●●●●●●●●●●●●●●●结束 ''文件读写标识常量 Const Forwriteing = 8 '

发布时间:2013-07-09 作者: 佚名 views(194)

核心代码: 复制代码 代码如下: If WScript.Arguments.UnNamed.Count 1 Then Syntax If WScript.Arguments.Named.Count 1 Then Syntax blnTd = False If WScript.Arguments.Named.Count = 1 Then If UCase( WScript.Arguments.Named( 0 ) ) = '/TD' Then blnTd = True Else Syntax En

发布时间:2013-07-09 作者: 佚名 views(217)

这里脚本之家简单的整理下常用方法,方便大家使用。都是通过vbscript的代码。 运行bat时隐藏cmd窗口的方法 可以编辑一个vbs脚本,在其中以隐藏窗口运行批处理程序。 复制代码 代码如下: Set ws = CreateObject('Wscript.Shell') ws.run 'cmd /c 批处理程序名',vbhide 将上面代码拷贝到记事本中,保存为'runbat.vbs'或者其

发布时间:2013-07-09 作者: 佚名 views(521)

Because of its length, only the code for the function itself is shown on this page. The demo script that shows how to use this function is available as a separate download. 复制代码 代码如下: Function ReadRegValue( myComputer, myRegPath, myRegValue ) '' Thi

发布时间:2013-07-09 作者: 佚名 views(350)

百度抽风,老是把吃掉行首空格,导致代码没有缩进。可以用以下方法来解决: 1、在百度贴吧切换到经典版 2、用以下脚本把代码中的制表符和空格替换成unicode编码格式 复制代码 代码如下: ''cscript //nologo C:\test\test.vbs C:\test\test.bat Set objFSO = CreateObject('Scripting.FileSystemObject') Set objFile = obj

发布时间:2013-07-09 作者: 佚名 views(204)

VBScript Code: 复制代码 代码如下: '' Create a WSH Shell object: Set wshShell = CreateObject( 'WScript.Shell' ) '' '' Create a new key: wshShell.RegWrite 'HKCU\TestKey\', '' '' Create a new DWORD value: wshShell.RegWrite 'HKCU\TestKey\DWordTestValue', 1, 'RE

发布时间:2013-07-09 作者: 佚名 views(591)

每一讲的主题: 第一讲:VBS介绍和相关 第二讲:数据类型和变量、注释 第三讲:基本的流程控制语句 第四讲:过程与函数 第五讲:对象的介绍和调用 第六讲:文件和文件夹的操作 第七讲:WSH脚本宿主 第八讲:正则表达式 第九讲:类和面向对象 第十讲:WMI的使用 ----------------------------------------------------------

发布时间:2013-07-09 作者: 佚名 views(214)

在众多文本编辑器中,Microsoft的Word是功能很强大的。况且XP PRO本身支持VBS调用Word文档对象,那么使用VBS是最好不过的了。思路如下:VBS打开Word,Word打开TXT,另存为网页,退出。 1. VBS调用Word.Application组件 如果电脑中安装了Word,那么用VBS打开Word其实很简单,如下: Set objWord = CreateObject('Word.Applic

发布时间:2013-07-09 作者: 佚名 views(319)

Copyright ©1999-2011 厦门凌众科技有限公司 厦门优通互联科技开发有限公司 All rights reserved

地址(ADD):厦门软件园二期望海路63号701E(东南融通旁) 邮编(ZIP):361008

电话:0592-5908028 传真:0592-5908039 咨询信箱:web@lingzhong.cn 咨询OICQ:173723134

《中华人民共和国增值电信业务经营许可证》闽B2-20100024  ICP备案:闽ICP备05037997号