-
VBS通过WMI获取CPU使用率的代码
所属栏目：[Asp教程] 日期：2016-12-03 热度：196
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 热度：106
在大部分情况下，Msxml2.XMLHTTP 能够很好地完成工作，因为它是有缓存的。比如，我们用 Msxml2.XMLHTTP 发送 HTTP POST 请求模拟登陆了某个网站，它会把登陆时的 Cookie 和 Session 缓存下来，当我们想获取网站的数据时直接 HTTP GET 就行了，不需要人工发[详细]
-
VBS打开选择文件对话框代码（Win7）
所属栏目：[Asp教程] 日期：2016-12-03 热度：132
相信很多人都看过“嗨，Scripting Guy[详细]
-
VBS变量名Wsh等于WScript对象？
所属栏目：[Asp教程] 日期：2016-12-03 热度：129
复制代码 代码如下: 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 热度：66
复制代码 代码如下: 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 热度：75
晚上在 QQ 上看到昵称为“乱码”的好友回答了搜搜问问里一个问题： 在VBS中有办法定义字节数组么？ 在VBS中有办法定义字节数组么？就是字节子类型数组（VarType是8209的那种）注意不是VB！ 但是回答实在是不堪入目，连别人问什么都没搞懂，而且那人居然还满[详细]
-
用VBS实现的发送带Cookie的HTTP请求的代码
所属栏目：[Asp教程] 日期：2016-12-03 热度：120
为了方便测试，先写一个回显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 热度：192
昨天在做Arthur's Online Riddle的时候有这么一道题目： If QWERTY = ABCDEF then, OLSQFR = ? Qwerty 是各国使用的基于拉丁字母的标准的打字机和计算机键盘。QWERTY 是键盘第一行的前六个字母。键的安排顺序由克里斯多福·萧尔斯（Christopher Sholes）设[详细]
-
用VBS读写二进制文件的另一种方法分享
所属栏目：[Asp教程] 日期：2016-12-03 热度：75
之前写的那篇给出的方法虽然不错，但是当文件过大时（其实很小，也就几M），对应的数组也会很大，然后会出现运行时错误，提示内存耗尽，为此我郁闷了好久。 最近在博客的流量记录中发现百度关键字“一些很恶作剧的vbs程序”（看来现在的年轻人很喜欢玩这口[详细]
-
VBS For Next循环的陷阱分享
所属栏目：[Asp教程] 日期：2016-12-03 热度：100
昨天写《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 热度：195
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 热度：147
那天跟别人聊到 Y2K38 问题，于是想到一个恶作剧：用 VBS 把系统的时间修改到2038年1月19日3时14分07秒之后，这样某些依赖于 Unix 时间戳的程序就会出问题。那么怎样用 VBS 修改系统的时间呢？ 最简单也是最没有技术含量的方法就是调用 cmd 的 date 和 time[详细]
-
邪恶的eval和new Function使用介绍
所属栏目：[Asp教程] 日期：2016-12-03 热度：163
代码： 复制代码 代码如下: // 友善提醒：为了你的手指安全，请在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 热度：124
特殊文件夹名称用于索引该集合以检索所需的特殊文件夹，文档中列出了下面的特殊文件夹： AllUsersDesktop AllUsersStartMenu AllUsersPrograms AllUsersStartup Desktop Favorites Fonts MyDocuments NetHood PrintHood Programs Recent SendTo StartMenu S[详细]
-
服务器市场新引擎 联想将成立云数据中心事业部
所属栏目：[Asp教程] 日期：2016-11-23 热度：73
随着云计算十三五规划的启动，下一步，政府将着重培育龙头企业，打造完整的云计算产业链。作为全球最大的个人电脑和第三大的服务器提供商，联想集团近日正式公布其腾云计划。联想计划在中国兴建50个云计算中心，培训出超1000个云计算基础架构的专家；建设[详细]
-
香港中联办官网连遭恶意攻击
所属栏目：[Asp教程] 日期：2016-11-23 热度：92
10月8日、9日，中央人民政府驻香港特别行政区联络办公室官方网站两次遭到恶意攻击，导致正常访问一度受阻。 中联办9日发表声明说，这种网络攻击行为违反法律，违悖公德，中联办已向警方报案。目前网站已恢复正常运行。 近日非法占领中环集会示威发生后，香[详细]
-
戴尔公司任命黄陈宏博士为大中华区总裁
所属栏目：[Asp教程] 日期：2016-11-23 热度：71
2014年10月13日，北京 戴尔公司今天宣布，具有21年丰富行业经验的黄陈宏博士已经加入戴尔，担任戴尔大中华区总裁。 戴尔大中华区总裁黄陈宏 黄陈宏博士将带领戴尔大中华区团队，为消费者、中小企业、合作伙伴、公共机构以及大型企业提供创新的技术解决方案[详细]
-
积极布局中国云战略 看重中小企业市场
所属栏目：[Asp教程] 日期：2016-11-23 热度：123
科技的发展之快一直让人不忍直视，当我们昨天还携带U盘将文件拷来拷去，今天已可以直接将其放在云端。而根据希捷科技市场研究，到2020年将有60%的存储迁移至云应用。 作为实现大数据存储和分析的基石 ，云计算可以将IT资源进行高效整合与灵活分配，如今在[详细]
-
世纪互联牵手富士康建数据中心
所属栏目：[Asp教程] 日期：2016-11-23 热度：165
中国IDC圈10月13日报道，随着互联网技术的发展和大数据时代的到来，目前中国和海外市场上互联网数据中心需求猛增。据统计，2013年中国互联网数据中心市场规模达262.5亿元人民币，5年来规模增长了近6倍，年均增长率超过30％；2013年全球互联网数据中心市场[详细]
-
eBay和惠普都分了 接下来该轮到微软了？
所属栏目：[Asp教程] 日期：2016-11-23 热度：69
如果说到全球科技业最近几周的最热关键词，那非分拆莫属。9月30日，eBay宣布PayPal将分拆成为独立公司，之后，硅谷先驱惠普、安全厂商赛门铁克先后宣布了分拆计划。 最近，硅谷投资大亨安德森表示，所有20岁以上的科技巨头，都将会分拆掉。媒体将刚刚更换[详细]
-
国内首个大数据天使投资平台将上线
所属栏目：[Asp教程] 日期：2016-11-22 热度：66
海燕天使盟近日宣布，国内首个针对天使投资项目的天使投资项目披露版平台将于10月上旬正式上线，该平台的创新在于将传统的基于线下的风险投资模式，升级为借助大数据思维的线上交易模式。 海燕天使盟创始人闫新程告诉南都记者，平台的一端对接的是天使投资[详细]
-
网宿科技前三季业绩预增105%至135%
所属栏目：[Asp教程] 日期：2016-11-22 热度：95
中国IDC圈10月16日报道，网宿科技10月14日晚间披露三季报业绩预告，公司预计今年前三季业绩将增长105%135%. 公司称，2014年前三季度，公司净利润继续保持较快增长，主要原因在于公司凭借领先的技术实力、高标准的服务水平以及丰富的运营经验继续推进业务发[详细]
-
铁塔公司回应招聘非市场化质疑:初期为方便工作
所属栏目：[Asp教程] 日期：2016-11-22 热度：146
作者 吴丰恒 10月16日报道：铁塔公司表示，公司筹备期工作基本完成，即将进入正式运营阶段。今年7月，铁塔公司揭牌成立，进入公司组建阶段，启动从总部到省市分公司人员招聘。 铁塔公司一成立就被打上电信改革、市场化改革标签，不仅剥离运营商铁塔资产，[详细]
-
中国铁塔总经理佟吉禄：新建能力是吃饭的本钱
所属栏目：[Asp教程] 日期：2016-11-22 热度：175
中国IDC圈10月20日报道：中国铁塔股份有限公司总经理佟吉禄在河北省分公司调研时表示， 铁塔的新建能力就是竞争力，是吃饭的本钱，要着重提升新建能力。 铁塔河北省分公司总经理范福州向佟吉禄做了工作汇报。公司自9月25日完成中国铁塔股份有限公司河北省[详细]
-
重庆铁塔公司成立 三大运营商将实现资源共享
所属栏目：[Asp教程] 日期：2016-11-22 热度：102
10月24日，中国铁塔股份有限公司重庆市分公司（下称重庆铁塔公司）在两江新区正式挂牌成立。这也是中国铁塔公司在国内设立的第3家省级分公司。 重庆铁塔公司下设9个区域性分公司。按照发展计划，该公司将通过专业化、市场化的模式，开展通信基础设施的建设[详细]
浙公网安备 33038102330477号