-
用VBS实现的发送带Cookie的HTTP请求的代码
所属栏目:[Asp教程] 日期:2016-12-03 热度:149
为了方便测试,先写一个回显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 热度:152
昨天在做Arthur's Online Riddle的时候有这么一道题目: If QWERTY = ABCDEF then, OLSQFR = ? Qwerty 是各国使用的基于拉丁字母的标准的打字机和计算机键盘。QWERTY 是键盘第一行的前六个字母。键的安排顺序由克里斯多福·萧尔斯(Christopher Sholes)设[详细]
-
用VBS读写二进制文件的另一种方法分享
所属栏目:[Asp教程] 日期:2016-12-03 热度:101
之前写的那篇给出的方法虽然不错,但是当文件过大时(其实很小,也就几M),对应的数组也会很大,然后会出现运行时错误,提示内存耗尽,为此我郁闷了好久。 最近在博客的流量记录中发现百度关键字“一些很恶作剧的vbs程序”(看来现在的年轻人很喜欢玩这口[详细]
-
VBS For Next循环的陷阱分享
所属栏目:[Asp教程] 日期:2016-12-03 热度:190
昨天写《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 热度:61
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 热度:76
那天跟别人聊到 Y2K38 问题,于是想到一个恶作剧:用 VBS 把系统的时间修改到2038年1月19日3时14分07秒之后,这样某些依赖于 Unix 时间戳的程序就会出问题。那么怎样用 VBS 修改系统的时间呢? 最简单也是最没有技术含量的方法就是调用 cmd 的 date 和 time[详细]
-
邪恶的eval和new Function使用介绍
所属栏目:[Asp教程] 日期:2016-12-03 热度:171
代码: 复制代码 代码如下: // 友善提醒:为了你的手指安全,请在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 热度:70
特殊文件夹名称用于索引该集合以检索所需的特殊文件夹,文档中列出了下面的特殊文件夹: AllUsersDesktop AllUsersStartMenu AllUsersPrograms AllUsersStartup Desktop Favorites Fonts MyDocuments NetHood PrintHood Programs Recent SendTo StartMenu S[详细]
-
关于vbs 生成静态页面过程中出现的问题
所属栏目:[Asp教程] 日期:2016-12-03 热度:185
vbs是否能够实现如下的:访问某个aspx页面,然后把服务器返回的页面以filestream 的形式保存为html格式,如果可以实现,应该如何来用代码来实现呢? 先用InternetExplorer.Application打开http://xxx.xxx.xxx/xxx.aspx,然后保存oIE.document.body.outerHTM[详细]
-
dim函数第三个参数设置截取字符的长度问题
所属栏目:[Asp教程] 日期:2016-12-03 热度:86
dim函数的第三个参数,也就是截取字符的长度,我在设置这个的时候,出了些问题:response.write mid(up_address,a(i),a(i+1)-1) “lt;br /gt;”像我上面这样写的时候,它就会报错,提示无效的过程调用或参数, response.write mid(up_address,a(i),a(i+1)+1)[详细]
-
VBS实现将Excel表格保存为txt文本
所属栏目:[Asp教程] 日期:2016-12-03 热度:158
希望能够找到个能给excel表另存为TXT的VBS代码,虽然另存为可以选择,但还是需要直接VBS执行这一步另存为TXT格式的,应该如何写代码呢? 有装Excel的话,就会比较简单,下面的是通用的不装Office也可以运行的,如下: VBScript code: 复制代码 代码如下: Set[详细]
-
vbs解决处理TXT文本数据相关问题实现代码
所属栏目:[Asp教程] 日期:2016-12-03 热度:70
有个小问题,如下: 现有文本文件1.txt,内容如下: 数值_1出现频度12647 数值_2出现频度10000 数值_3出现频度12608 数值_4出现频度8712 数值_5出现频度10658 数值_6出现频度8472 数值_7出现频度11232 数值_8出现频度8648 数值_9出现频度9264 数值_10出现频[详细]
-
了解VBE VBE则是编译后(加密)的VBS代码
所属栏目:[Asp教程] 日期:2016-12-03 热度:176
一、vbe与vb VBE跟VBS差不多,都是VB脚本代码文件,但他们也有不同: VBS是明文代码,就是说可以直接使用记事本编辑; VBE则是编译后(加密)的VBS代码,使用记事本打开不能直接看到源代码。(有些例外) 加密工具有很多,其中常用的是 Microsoft Script En[详细]
-
VBS加密14法你会几种 VBS加密免杀浅谈
所属栏目:[Asp教程] 日期:2016-12-03 热度:153
手机打字实在在麻烦,所以一些比较简单或太复杂的代码我就不直接提供实例了。 1、不是方法的方法--加注释 加一些规则无用不含特征码的注释。代码略 2、大小写混编 利用VBS忽略大小写 3、 分行与同行混用 利用冒号(:)连接多行代码为一行 4、一行分多行[详细]
-
VBS基础教程
所属栏目:[Asp教程] 日期:2016-12-03 热度:160
VBScript(Microsoft Visual Basic Script Editon).,微软公司可视化BASIC脚本版). 正如其字面所透露的信息, VBS(VBScript的进一步简写)是基于Visual Basic的脚本语言. Microsoft Visual Basic是微软公司出品的一套可视化编程工具, 语法基于Basic. 脚本语言,[详细]
-
获取远程机器共享目录的物理路径的代码
所属栏目:[Asp教程] 日期:2016-12-03 热度:109
第一:依靠135端口,用wmi。像下边的脚本是得到共享目录ttt的物理目录。 复制代码 代码如下: strPath ="192.168.1.55ttt" strPath = Replace(strPath, "", "") arrPath = Split(strPath, "") strComputer = arrPath(0) strShare = arrPath(1) Set ob[详细]
-
EXE2BAT(EXE转BAT)的vbs脚本
所属栏目:[Asp教程] 日期:2016-12-03 热度:76
exe2bat的脚本 复制代码 代码如下: fp=wscript.arguments(0) fn=right(fp,len(fp)-instrrev(fp,"")) with createobject("adodb.stream") .type=1:.open:.loadfromfile fp:str=.read:sl=lenb(str) end with sll=sl mod 65536:slh=sl65536 with createobject([详细]
-
vbscript的骨灰级写法计算1到100的和
所属栏目:[Asp教程] 日期:2016-12-03 热度:155
这篇日志完全是看了一篇日志后的启发,原文为:邪恶的eval和new Function。 很少使用new Array的方式来定义数组,没想到new Array有这么一个妙用,通过new Array(n)我们可以创建n个空元素,同时也就在n个元素中间存在n-1个空白,通过join,我们可以将一些东[详细]
-
国内首个大数据天使投资平台将上线
所属栏目:[Asp教程] 日期:2016-11-24 热度:105
海燕天使盟近日宣布,国内首个针对天使投资项目的天使投资项目披露版平台将于10月上旬正式上线,该平台的创新在于将传统的基于线下的风险投资模式,升级为借助大数据思维的线上交易模式。 海燕天使盟创始人闫新程告诉南都记者,平台的一端对接的是天使投资[详细]
-
网宿科技前三季业绩预增105%至135%
所属栏目:[Asp教程] 日期:2016-11-24 热度:80
中国IDC圈10月16日报道,网宿科技10月14日晚间披露三季报业绩预告,公司预计今年前三季业绩将增长105%135%. 公司称,2014年前三季度,公司净利润继续保持较快增长,主要原因在于公司凭借领先的技术实力、高标准的服务水平以及丰富的运营经验继续推进业务发[详细]
-
铁塔公司回应招聘非市场化质疑:初期为方便工作
所属栏目:[Asp教程] 日期:2016-11-24 热度:175
作者 吴丰恒 10月16日报道:铁塔公司表示,公司筹备期工作基本完成,即将进入正式运营阶段。今年7月,铁塔公司揭牌成立,进入公司组建阶段,启动从总部到省市分公司人员招聘。 铁塔公司一成立就被打上电信改革、市场化改革标签,不仅剥离运营商铁塔资产,[详细]
-
中国铁塔总经理佟吉禄:新建能力是吃饭的本钱
所属栏目:[Asp教程] 日期:2016-11-24 热度:126
中国IDC圈10月20日报道:中国铁塔股份有限公司总经理佟吉禄在河北省分公司调研时表示, 铁塔的新建能力就是竞争力,是吃饭的本钱,要着重提升新建能力。 铁塔河北省分公司总经理范福州向佟吉禄做了工作汇报。公司自9月25日完成中国铁塔股份有限公司河北省[详细]
-
腾讯上海数据中心建成
所属栏目:[Asp教程] 日期:2016-11-24 热度:170
中国IDC圈10月22日报道,作为腾讯公司数据中心布局的重要一环,腾讯上海云数据中心已经完成园区和土建建设,成功交付给合作伙伴上海电信。腾讯公司高级执行副总裁卢山和中国电信上海分公司总经理马益民出席了交付仪式。 腾讯上海云数据中心位于上海青浦经[详细]
-
中国联通宽带公司总监周志祥:发挥法治规范网络行为的主导作用
所属栏目:[Asp教程] 日期:2016-11-24 热度:73
全面推进网络空间法治化,是发挥法治对引领和规范网络行为的主导性作用,引导网民遵法守法,做中国好网民。 在今后的工作中,中国联通将进一步增强大局意识和信息安全观念,坚持在重大事件和公益活动中的正确舆论导向,努力使手机媒体成为大众获取各类有益[详细]
-
新疆电信申建离岸数据中心
所属栏目:[Asp教程] 日期:2016-11-24 热度:106
中国IDC圈10月20日报道,日前,记者从中国电信新疆公司获悉,该公司正在与相关机构一起申请在乌鲁木齐建立离岸数据中心,为境内外客户提供面向境外的互联网应用平台业务。 据中国电信新疆公司相关责任人透露,离岸数据中心可以在国内直接向境内外客户提供[详细]

浙公网安备 33038102330577号