-
VBS基础视频教程 批处理之家broly出品
所属栏目:[Asp教程] 日期:2016-12-03 热度:93
每一讲的主题: 第一讲:VBS介绍和相关 第二讲:数据类型和变量、注释 第三讲:基本的流程控制语句 第四讲:过程与函数 第五讲:对象的介绍和调用 第六讲:文件和文件夹的操作 第七讲:WSH脚本宿主 第八讲:正则表达式 第九讲:类和面向对象 第十讲:WMI的[详细]
-
用VBS控制鼠标的实现代码(获取鼠标坐标、鼠标移动、鼠标单击、
所属栏目:[Asp教程] 日期:2016-12-03 热度:134
怎么用VBS模拟鼠标左键单击、左键双击、右键单击?…… 网上搜到的答案普遍是VBS无法实现,或者是要用第三方COM(ActiveX?)组件。我对第三方组件是很反感的,使用第三方组件毫无可移植性可言,因为别人的系统中不一定注册了这个组件。我的建议是,尽量不[详细]
-
TXT转HTM、HTML「TXT转网页」的vbs实现代码
所属栏目:[Asp教程] 日期:2016-12-03 热度:118
在众多文本编辑器中,Microsoft的Word是功能很强大的。况且XP PRO本身支持VBS调用Word文档对象,那么使用VBS是最好不过的了。思路如下:VBS打开Word,Word打开TXT,另存为网页,退出。 1. VBS调用Word.Application组件 如果电脑中安装了Word,那么用VBS打开[详细]
-
VBS通过WMI获取CPU使用率的代码
所属栏目:[Asp教程] 日期:2016-12-03 热度:159
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 热度:149
在大部分情况下,Msxml2.XMLHTTP 能够很好地完成工作,因为它是有缓存的。比如,我们用 Msxml2.XMLHTTP 发送 HTTP POST 请求模拟登陆了某个网站,它会把登陆时的 Cookie 和 Session 缓存下来,当我们想获取网站的数据时直接 HTTP GET 就行了,不需要人工发[详细]
-
VBS打开选择文件对话框代码(Win7)
所属栏目:[Asp教程] 日期:2016-12-03 热度:162
相信很多人都看过“嗨,Scripting Guy[详细]
-
VBS变量名Wsh等于WScript对象?
所属栏目:[Asp教程] 日期:2016-12-03 热度:111
复制代码 代码如下: 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[详细]
-
VBS中获取系统本次及上次开关机时间的代码(WinXP/win2003/Win7兼
所属栏目:[Asp教程] 日期:2016-12-03 热度:130
复制代码 代码如下: If (Lcase(Right(Wscript.FullName,11)) = "wscript.exe") Then CreateObject("WScript.Shell").Run("%Comspec% /C " Chr(34)"mode con cols=100Cscript.exe //NoLogo "Chr(34) Wscript.ScriptFullName Chr(34)"(Echo 此窗口40秒后自动[详细]
-
在VBS中定义字节数组Byte()介绍
所属栏目:[Asp教程] 日期:2016-12-03 热度:72
晚上在 QQ 上看到昵称为“乱码”的好友回答了搜搜问问里一个问题: 在VBS中有办法定义字节数组么? 在VBS中有办法定义字节数组么?就是字节子类型数组(VarType是8209的那种)注意不是VB! 但是回答实在是不堪入目,连别人问什么都没搞懂,而且那人居然还满[详细]
-
用VBS实现的发送带Cookie的HTTP请求的代码
所属栏目:[Asp教程] 日期:2016-12-03 热度:67
为了方便测试,先写一个回显Cookie的简单的PHP程序: 复制代码 代码如下: lt;?php foreach($_COOKIE as $key =gt; $value) echo "$key =gt; $valuern"; ?gt; 然后分别用ServerXMLHTTP和XMLHTTP测试: 复制代码 代码如下: Dim http Set http = CreateObjec[详细]
-
QWERTY密码:加密与解密vbs版
所属栏目:[Asp教程] 日期:2016-12-03 热度:105
昨天在做Arthur's Online Riddle的时候有这么一道题目: If QWERTY = ABCDEF then, OLSQFR = ? Qwerty 是各国使用的基于拉丁字母的标准的打字机和计算机键盘。QWERTY 是键盘第一行的前六个字母。键的安排顺序由克里斯多福·萧尔斯(Christopher Sholes)设[详细]
-
用VBS读写二进制文件的另一种方法分享
所属栏目:[Asp教程] 日期:2016-12-03 热度:117
之前写的那篇给出的方法虽然不错,但是当文件过大时(其实很小,也就几M),对应的数组也会很大,然后会出现运行时错误,提示内存耗尽,为此我郁闷了好久。 最近在博客的流量记录中发现百度关键字“一些很恶作剧的vbs程序”(看来现在的年轻人很喜欢玩这口[详细]
-
VBS For Next循环的陷阱分享
所属栏目:[Asp教程] 日期:2016-12-03 热度:90
昨天写《QWERTY密码:加密与解密》的时候,为了得到26个字母的字符串,写了这样一个 For Next 循环: 复制代码 代码如下: 'Author: Demon 'Website: http://demon.tw 'Date: 2012/2/10 For i = 65 To (i + 25) s = s Chr(i) Next WScript.Echo s 运行后却发[详细]
-
VBS For Next循环的一些细节
所属栏目:[Asp教程] 日期:2016-12-03 热度:66
For Next 语句的基本结构为: 复制代码 代码如下: For counter = start To end [Step step] [statements] [Exit For] [statements] Next 当 For Next 循环开始时,Visual Basic Scripting Edition (VBScript) 将 start 赋值给 counter。在运行循环中的语句[详细]
-
用VBS修改(设置)系统时间和日期的代码
所属栏目:[Asp教程] 日期:2016-12-03 热度:98
那天跟别人聊到 Y2K38 问题,于是想到一个恶作剧:用 VBS 把系统的时间修改到2038年1月19日3时14分07秒之后,这样某些依赖于 Unix 时间戳的程序就会出问题。那么怎样用 VBS 修改系统的时间呢? 最简单也是最没有技术含量的方法就是调用 cmd 的 date 和 time[详细]
-
邪恶的eval和new Function使用介绍
所属栏目:[Asp教程] 日期:2016-12-03 热度:65
代码: 复制代码 代码如下: // 友善提醒:为了你的手指安全,请在Chrome下运行 'alert("hello")'.replace(/.+/, eval); 'alert("hello")'.replace(/.+/, function(m){new Function(m)();}); var i = 0; eval(new Array(101).join('alert(++i);')); var i =[详细]
-
WScript.Shell对象SpecialFolders属性未公开文档分享
所属栏目:[Asp教程] 日期:2016-12-03 热度:90
特殊文件夹名称用于索引该集合以检索所需的特殊文件夹,文档中列出了下面的特殊文件夹: AllUsersDesktop AllUsersStartMenu AllUsersPrograms AllUsersStartup Desktop Favorites Fonts MyDocuments NetHood PrintHood Programs Recent SendTo StartMenu S[详细]
-
第四批虚拟运营商牌照即将发放
所属栏目:[Asp教程] 日期:2016-11-23 热度:56
中国IDC圈9月26日报道:工信部通信發展司司長聞庫在中國虛擬郀I商產業大會上介紹,第四批虛擬郀I商牌照即將發放,相關文件正在簽署中。 聞庫表示,目前已有多家企業正式放號發展用戶,累計超過40萬戶,試點情況整體良好。而工信部電信研究院副院長於生多[详细]
-
信息安全下的资本金蛋
所属栏目:[Asp教程] 日期:2016-11-23 热度:107
中国IDC圈9月28日报道:斯诺登事件之后,信息安全问题彻底浮出水面。为了抗衡国际信息战争,我国政府已经将信息安全上升至国家战略。 2014年5月16日,中央国家机关政府采购中心发布通知,对入围中央机关采购范围内的信息类产品提出新的采购要求:所有计算[详细]
-
北京数据中心产业将外移 京冀申报国家数据基地
所属栏目:[Asp教程] 日期:2016-11-23 热度:149
中国IDC圈报道:9月26日讯,周四北京市数据中心产业发展布局工作会上,北京市经信委宣布从今年开始,北京市禁止新建和扩建数据中心,产业向河北转移。 会议对北京市数据中心产业做出了新布局。北京IDC市场占全国份额38%,北京经信委表示,结合京津冀一体化[详细]
-
铁塔公司开始第三轮招聘 限运营商内部报名
所属栏目:[Asp教程] 日期:2016-11-23 热度:151
中国IDC圈9月28日,备受关注的铁塔招聘又已启动。据透露,第三轮招聘的职位为省公司部门主任以及地市公司正副职。本次报名限定在三大运营商内部,在各自体系内报名。要求从事相关岗位,报名截止时间为9月28日。 机构设置根据此前铁塔公司的安排,总部将设7[详细]
-
全国千兆宽带推广计划启动
所属栏目:[Asp教程] 日期:2016-11-23 热度:143
中国IDC圈9月29日报道:民营电信运营商鹏博士宣布启动全国千兆宽带产品推广计划。 据悉,千兆宽带将首先在全国一线城市开展业务。其特征是高速光纤接入,内容全网分发,用户将不再依赖本地计算机的处理能力,千兆宽带成为计算机总线的延伸,将键盘、鼠标直[详细]
-
加强网络攻击力量建设
所属栏目:[Asp教程] 日期:2016-11-23 热度:142
中国IDC圈9月19日报道:网络空间的主权、利益和安全问题是当前任何国家都无法忽视的问题。网络空间安全威胁已经不是危言耸听,为此,我国应以高度的使命感和紧迫感,采取积极有效措施,应对在网络空间面临的威胁和挑战。 首先,加快建立我国军警民战略应急[详细]
-
IT国产化环境下 云计算变得更复杂
所属栏目:[Asp教程] 日期:2016-11-23 热度:115
中国IDC圈9月29日报道:这年头,不管是传统的IBM、HP、微软等IT巨头们,还是亚马逊、Facebook、阿里巴巴、百度等互联网新贵们,都开始凑云计算、大数据的热闹。但同是谈云,其实是有很大的区隔的,特别是放在IT国产化即互联网化这个语境下,使得云计算的概[详细]
-
消息称铁塔公司已完成省分公司副总选聘工作
所属栏目:[Asp教程] 日期:2016-11-23 热度:167
中国IDC圈月29日消息,作为我国电信行业内未来几年的最大变数,中国铁塔股份有限公司(下称铁塔公司)从成立之初就得到了行业内的普遍关注,特别是在人员构成和选聘方面,更是一石激起千层浪。 据知情人士透露,目前铁塔公司各省分副总选聘工作已于日前结[详细]