2020-02-16 标签:使用,vbs,下载,文件,代码,加强版,说到,是不是,想到,xmlhttp,呵呵,以下,比较,经典,ilocal,lcase,wscript,arguments,iremote

说到使用vbs下载文件是不是想到了XMLHTTP呢，呵呵，以下是比较经典的代码： iLocal=LCase(Wscript.Arguments(1)) iRemote=LCase(Wscript.Arguments(0)) Set xPost=createObject("Microsoft.XMLH

2020-02-16 标签:实用,vbs,提醒,程序,使用方法,下面,代码,保存为,ring,文件名,自定,移动,启动,windows,自动,位置

使用方法：1. 将下面的代码保存为：Ring.vbs （文件名可自定）2. 将Ring.vbs移动到程序启动组，这样可以随WINDOWS自动启动了（位置是：开始--程序--启动，XP的启动组位置是：C:\Documents and Settings\你的用户名\「开始」菜单\程序\启动\）3. 我这

2020-02-16 标签:简单,vbs,实例,代码,class,cfoo,sub,printhello,response,write,hello,world,end,dim,obj,set,n,ew,call

class CFoosub PrintHello()response.Write "Hello World!"end sub end class dim obj set obj = new CFoocall obj.PrintHello set obj = nothing

2020-02-16 标签:vbs,shellcode,转换,escape,加密,code,netpatch,x,29,xc,83,xe,xa,xd,xee,74,24,xf

'code by NetPatch code="\x29\xc9\x83\xe9\xa1\xd9\xee\xd9\x74\x24\xf4\x5b\x81\x73\x13\x92\x06\x5b\x18\x83\xeb\xfc\xe2\xf4\x79\x16\x01\x52\xa1\xcf\x3d\x

2020-02-16 标签:批量,文件,查找,替换,功能,vbs,脚本,code,lcx,修改,网上,原有,程序,不知,作者,目录,实现,递归,放在

'＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝ 'code by lcx 修改网上原有的一个小程序，不知作者，那个程序没有对目录实现递归查找 '将本程序放在你要查找的目录下，或把查找的目录拖到此脚本上，估计还有bug '==================

2020-02-16 标签:vbs,输入,助手,执行,会调,用好,乱的,进程,error,resume,next,set,arg,wscript,arguments,count,quit,enjoy,code

On Error Resume Next Set Arg=Wscript.arguments If Arg.count=0 then Wscript.quit '------------------- 'Enjoy it 'Code By NetPatch '-------------------

2020-02-16 标签:asp,实现,网页,调用,doc,response,contenttype,详细,列表,微软,有篇,文章,http,support,microsoft,com,kb,193998,zh

微软有篇文章:http://support.microsoft.com/kb/193998/zh-cn,用doc读取和显示二进制数据,《怎样读取二进制文件》,没测试，懒得编译dllasp程序：控件代码：第一步：在VB中创建一个ActiveXDLLProject第二步：把工程名改为MyObject第三

2020-02-16 标签:vbs,实现,dos,窗口,隐藏,批处理,运行,option,explicit,dim,wshshell,pro,set,wscript,shell,d,program

Option Explicit Dim WshShell, Pro Set WshShell = WScript.CreateObject("WScript.Shell") Pro = "D:\Program Files\千千静听\TTPlayer.exe D:\千千静听\默认.ttpl" WshS

2020-02-16 标签:windows,2003,一句话,3389,vbs,代码,作者,lcx,来源,小铺,wmic,rdtoggle,servername,call,开远

作者：lcx 来源：vbs小铺 wmic RDTOGGLE WHERE ServerName='%COMPUTERNAME%' call SetAllowTSConnections 1 开远程：WMIC /node:"远程机器名" /user:"administrator" /password:"l

2020-02-16 标签:vbs,实现,获取,电脑,硬件,信息,脚本,最新版,代码,version,调整,错误处理,方法,错误信息,输出,logfile,文件,查看

代码一：'******************************************************************************************* 'Version:3.1 '调整错误处理方法，错误信息输出到LogFile文件，可以查看扫描失败原因 '如