-
vbscript Registry 注册表操作实现代码(读写删除)
所属栏目:[Asp教程] 日期:2016-12-03 热度:200
VBScript Code: 复制代码 代码如下: ' Create a WSH Shell object: Set wshShell = CreateObject( "WScript.Shell" ) ' ' Create a new key: wshShell.RegWrite "HKCUTestKey", "" ' Create a new DWORD value: wshShell.RegWrite "HKCUTestKeyDWordTes[详细]
-
WMI StdRegProv 通过wmi操作注册表的vbscript实现代码 (本地或远
所属栏目:[Asp教程] 日期:2016-12-03 热度:99
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,[详细]
-
从XML文件中获取信息的vbs代码
所属栏目:[Asp教程] 日期:2016-12-03 热度:140
复制代码 代码如下: '***************************************************************** '** Script: getxmlelement.vbs '** Version: 1.0 '** Created: 1/8/2009 10:58PM '** Author: Adriaan Westra '** E-mail: '** Purpose / Comments: '** Get an[详细]
-
将信息保存到一个XML文件的vbs代码
所属栏目:[Asp教程] 日期:2016-12-03 热度:127
This script demonstrates how to save information to a xml file with the use of MSXML. The example xml file is used for the photo album on the site. 复制代码 代码如下: '***************************************************************** '**[详细]
-
网络接口利用率监控VBS脚本代码(Windows)
所属栏目:[Asp教程] 日期:2016-12-03 热度:87
复制代码 代码如下: '程序名称: btlwchk_netinterface.vbs '程序用途: 监测windows主机网络接口利用率 '创建日期: 2011-09-1 '作者信息: zhangkai '运行环境: vbs '处理参数 MonSubject="NetInterface" Set Args=WScript.Arguments If (Args.Countlt;1) Th[详细]
-
用vbs读取Excel文件的函数代码
所属栏目:[Asp教程] 日期:2016-12-03 热度:195
核心代码 复制代码 代码如下: Function ReadExcel( myXlsFile, mySheet, my1stCell, myLastCell, blnHeader ) ' Function : ReadExcel ' Version : 2.00 ' This function reads data from an Excel sheet without using MS-Office ' ' Arguments: ' myXlsFi[详细]
-
读取Access数据库的vbscript代码打包下载
所属栏目:[Asp教程] 日期:2016-12-03 热度:120
效果如图所示: 核心代码: 复制代码 代码如下: Option Explicit Dim arrTables( ), i, idxTables, intValidArgs Dim blnContent, blnFieldNames Dim objConn, objFSO, objRS, objSchema Dim strConnect, strHeader, strOutput Dim strFile, strResult, strSQ[详细]
-
VBS版百度贴吧代码格式化调整工具
所属栏目:[Asp教程] 日期:2016-12-03 热度:178
百度抽风,老是把吃掉行首空格,导致代码没有缩进。可以用以下方法来解决: 1、在百度贴吧切换到经典版 2、用以下脚本把代码中的制表符和空格替换成unicode编码格式 复制代码 代码如下: 'cscript //nologo C:testtest.vbs C:testtest.bat Set objFSO =[详细]
-
运行bat时隐藏cmd窗口的方法(bat隐藏窗口 隐藏运行bat文件)
所属栏目:[Asp教程] 日期:2016-12-03 热度:186
这里脚本之家简单的整理下常用方法,方便大家使用。都是通过vbscript的代码。 运行bat时隐藏cmd窗口的方法 可以编辑一个vbs脚本,在其中以隐藏窗口运行批处理程序。 复制代码 代码如下: Set ws = CreateObject("Wscript.Shell") ws.run "cmd /c 批处理程序[详细]
-
VBS基础视频教程 批处理之家broly出品
所属栏目:[Asp教程] 日期:2016-12-03 热度:133
每一讲的主题: 第一讲:VBS介绍和相关 第二讲:数据类型和变量、注释 第三讲:基本的流程控制语句 第四讲:过程与函数 第五讲:对象的介绍和调用 第六讲:文件和文件夹的操作 第七讲:WSH脚本宿主 第八讲:正则表达式 第九讲:类和面向对象 第十讲:WMI的[详细]
-
用VBS控制鼠标的实现代码(获取鼠标坐标、鼠标移动、鼠标单击、
所属栏目:[Asp教程] 日期:2016-12-03 热度:165
怎么用VBS模拟鼠标左键单击、左键双击、右键单击?…… 网上搜到的答案普遍是VBS无法实现,或者是要用第三方COM(ActiveX?)组件。我对第三方组件是很反感的,使用第三方组件毫无可移植性可言,因为别人的系统中不一定注册了这个组件。我的建议是,尽量不[详细]
-
TXT转HTM、HTML「TXT转网页」的vbs实现代码
所属栏目:[Asp教程] 日期:2016-12-03 热度:145
在众多文本编辑器中,Microsoft的Word是功能很强大的。况且XP PRO本身支持VBS调用Word文档对象,那么使用VBS是最好不过的了。思路如下:VBS打开Word,Word打开TXT,另存为网页,退出。 1. VBS调用Word.Application组件 如果电脑中安装了Word,那么用VBS打开[详细]
-
VBS通过WMI获取CPU使用率的代码
所属栏目:[Asp教程] 日期:2016-12-03 热度:192
Python固然强大,但是调用WMI还是用VBS比较“正宗”。 复制代码 代码如下: On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:" strComputer "rootcimv2") Set colItems = objWMIService.ExecQuery("Select * from Win3[详细]
-
Msxml2.XMLHTTP Msxml2.ServerXMLHTTP与缓存
所属栏目:[Asp教程] 日期:2016-12-03 热度:51
在大部分情况下,Msxml2.XMLHTTP 能够很好地完成工作,因为它是有缓存的。比如,我们用 Msxml2.XMLHTTP 发送 HTTP POST 请求模拟登陆了某个网站,它会把登陆时的 Cookie 和 Session 缓存下来,当我们想获取网站的数据时直接 HTTP GET 就行了,不需要人工发[详细]
-
VBS打开选择文件对话框代码(Win7)
所属栏目:[Asp教程] 日期:2016-12-03 热度:192
相信很多人都看过“嗨,Scripting Guy[详细]
-
VBS变量名Wsh等于WScript对象?
所属栏目:[Asp教程] 日期:2016-12-03 热度:139
复制代码 代码如下: set wsh = createobject("wscript.shell") wscript.sleep 15 * 60 * 1000 wsh.run "shutdown /s /t 0" 双击运行,居然弹出个错误对话框 复制代码 代码如下: Line: 1 Char: 1 Error: Wrong number of arguments or invalid property ass[详细]
-
中国铁塔江西分公司昨揭牌 三大运营商不再自建基站避免浪费
所属栏目:[Asp教程] 日期:2016-11-24 热度:103
10月26日,中国铁塔股份有限公司江西省分公司在南昌正式揭牌成立。今后移动、联通、电信三家的基站等通信基础设施建设,都将陆续交由该公司负责,以避免三家运营商通信设施重复建设。 本报讯 江南都市报记者廖济堂报道:10月26日,中国铁塔股份有限公司江[详细]
-
赵泽良:依法治网,全面践行习总书记网络安全观
所属栏目:[Asp教程] 日期:2016-11-24 热度:149
編者按:習總書記深刻認識網絡空間發展規律,提出了沒有網絡安全就沒有國家安全、沒有信息化就沒有現代化的重要論斷,明確了從網絡大國走向網絡強國的宏偉目標,形成了具有中國設計、中國智慧、中國特色的網絡治理和安全觀,蘊含了網絡強國建設的基本脈絡[详细]
-
中国“芯”服务器保障信息安全 效能达国际水平
所属栏目:[Asp教程] 日期:2016-11-24 热度:88
中国IDC圈10月28日报道:记者日前从知情人士处获悉,中国已掌握服务器行业的绝大部分关键技术与生产工艺,第一批自主可控可信服务器正在中国有关政务部门使用,这进一步缩小国内外在 数据链技术方面的信息安全差距。 据知情人士透露,目前中国央企曙光集团[详细]
-
重庆计划三年打造500亿元数据服务业
所属栏目:[Asp教程] 日期:2016-11-24 热度:67
中国IDC圈9月22日报道:[ 运用大数据技术对海量数据进行分析处理,蕴藏着巨大的增值红利,在未来的二三十年,大数据信息进出口将成为世界贸易的主要标的物 ] 最近几年,重庆强力推进港口、航空、铁路通道建设,形成三个保税区,进出口贸易增速领跑全国,其[详细]
-
宽带独家接入 业主无法选择(图)
所属栏目:[Asp教程] 日期:2016-11-24 热度:74
中国IDC圈9月22日报道:金隅悦城秀悦园 编辑同志: 我是东丽区津滨大道与跃进路交口金隅悦城秀悦园的业主。今年入住后,我发现家里只能安装中国电信的宽带,与其他运营商相比,同样的带宽不但价格高,而且能够选择的带宽种类也少。我们想安装其它运营商的[详细]
-
世纪互联与做空机构缠斗一周 股价下跌27%
所属栏目:[Asp教程] 日期:2016-11-24 热度:122
中国IDC圈9月22日报道:继500彩票、天合化工后,中国互联网基础设施服务提供商世纪互联成为又一个国外做空机构的做空对象。 在一周左右的时间里,世纪互联与做空机构进行了两回合的缠斗。尽管世纪互联迅速回应指控,但9月8日至今,其股价仍然下跌了27%左右[详细]
-
转型屡屡失败 四海股份再赌云计算
所属栏目:[Asp教程] 日期:2016-11-24 热度:80
中国IDC圈9月23日报道:自上市以来四海股份已经历了四次转型,然而在频繁的转型后公司仍然未能找到合适的主业。在主营不给力的情况下,公司近日再次打起了转型的念头,而转型的方向则是云计算。 四海股份日前披露公告称,公司将投资2亿元在包头设立一家全[详细]
-
2015版《中国IDC行业资讯大全》开启收录
所属栏目:[Asp教程] 日期:2016-11-24 热度:152
在数据中心,云计算以及移动互联网风起云涌的当下,IDC市场也随之发生了巨大的变革。已经逐渐从传统模式转向了云端。企业转型更迭的速度也日趋频繁。在这种情况下,用户,消费者和IDC服务商之间,迫切的需要一个为彼此能够顺畅沟通而搭建的平台,以此来共[详细]
-
吴少岩:鹏博士本周将推千兆宽带
所属栏目:[Asp教程] 日期:2016-11-24 热度:54
中国IDC圈9月24日报道:9月23日消息,鹏博士常务副总裁吴少岩接受搜狐IT独家专访时表示,鹏博士本周将推出千兆宽带,将重点布局到全国一线城市,定位于中高端用户。 吴少岩透露,预计2017年底前,重点在全国一、二线城市发展业务,逐步覆盖二、三线城市。[详细]