2020-02-16 标签:vbs,模拟,post,上传,文件,代码,实现,如下,xml,upload,class,xmlupload,private,xmlhttp,objtemp,adtypetext,strcharset,strboundary,sub

实现代码如下：'XML Upload Class Class XMLUpload Private xmlHttp Private objTemp Private adTypeBinary, adTypeText Private strCharset, strBoundary Private Sub

2020-02-16 标签:vbs,获取,unix,时间,函数,代码,类似,c,标准,time,乍一看,很简单,实现,如下,function,unixtime,datediff,s

VBS中没有类似C标准库中的time函数，怎么获取Unix时间戳呢？乍一看很简单： 实现代码如下： Function UnixTime() UnixTime = DateDiff("s", "01/01/1970 00:00:00", Now()) End Function一个很想当然的方法，仅仅注

2020-02-16 标签:vbs,检测,u,插入,弹出,事件,代码,可以说,wmi,掌握,程度,多少,直接,决定,水平,高低,看过,网上,普遍

可以说，对WMI的掌握程度的多少直接决定了你的VBS水平高低。看过网上普遍流传VBS版U盘小偷程序，基本上都是靠无限循环实现的，一点技术含量也没有，文章的末尾给出了我写的VBS版U盘小偷程序的下载地址。虽然用WMI也得无限循环，但是效率是不一样的。 使用WMI的Win32_VolumeChangeE

2020-02-16 标签:vbs,调用,wmi,实现,搜索,硬盘,mp,文件,代码,如下,strcomputer,set,getobject,winmgmts,impersonate,root,cimv

实现代码如下： strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" _ & strComputer & "\root\cim

2020-02-16 标签:获取,屏幕,分辨率,vbs,代码,我想到,方法,两种,wmi,win,32,实现,如下,strcomputer,set,getobject,winmgmts

我想到的方法有两种。 一种是WMI中的Win32_DesktopMonitor类 实现代码如下： strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")

2020-02-16 标签:vbs,设置,静态,ip,dns,服务器,地址,代码,核心,array,192,168,148,255,strgateway

核心代码一：strIPAddress = Array("192.168.0.148") strSubnetMask = Array("255.255.255.0") strGateway = Array("192.168.0.1") strGatewayMetric = Array(1) arrDN

2020-02-16 标签:简单,vbs,加密,实现,代码,昨天,病毒,确实,恐怖,我不是,高手,不出,高级,受病,启发,进行,不难,低级

昨天那个病毒的加密确实很恐怖，我不是高手，写不出那么高级的加密。但是受病毒第一层加密的启发，进行简单的加密还是不难的。当然这种低级的加密只能拿来骗骗一些垃圾的杀毒软件。使用了msxml2.xmlhttp和adodb.stream对象的VBS脚本很容易被杀毒软件认为是病毒，不明真相的同学一看报毒自然就

2020-02-16 标签:vbs,下载,文件,新方法,blog,备份,脚本,发现,cdo,message,访问,网络,东西,说是,研究,或许,用来,当下

BLOG备份脚本时发现 CDO.MESSAGE可以访问网络下载东西，说是研究研究或许可以用来当下载者用。 于是研究了一会。写出个粗糙的DEMO。 exe2hex.vbs //xiaolu写的exe2vbs ，我修改成直接拖放,转成十六进制 ==============================

2020-02-16 标签:html,txt,文件,转换,asp,输出,vbs,代码,使用方法,手工,修改,名称,想要,生成,文件名,下面,保存为

使用方法:手工修改html文件的名称与想要生成的asp的文件名称，然后将下面的代码保存为1.vbs，跟1.html放同一个目录双击运行即可。实现代码如下：html = "1.html" asp = "1.asp" Set fso = CreateObject("Scripting.FileSyste

2020-02-16 标签:vbs,脚本,也有,gui,图形,界面,日志,清除,功能,使用方法,下面,代码,保存为,rizhi,双击,运行,即可,不行,可能是,杀毒软件

使用方法：将下面的代码保存为rizhi.vbs双击运行即可，如果不行可能是杀毒软件的问题。可以搜索下。以前提供过解决方法。set ie=wscript.createobject("internetexplorer.application","event_") '创建ie对象' ie.menubar=