vbs整人代码大集合 多年的代码收集（vbs整人代码无限弹窗）原创
一、你打开好友的聊天对话框,然后记下在你QQ里好友的昵称,把下面代码里的xx替换一下,就可以自定义发送QQ信息到好友的次数(代码里的数字10改一下即可). xx.vbs=> 复制代码 代码如...
排序
VBS实现将当前时间转换成UTC时间（vb实时输出数据）真没想到
Option Explicit Dim dtmDate If WScript.Arguments.Named.Count > 0 Then Syntax With WScript.Argum...
VBS实现截图功能（vb屏幕指定位置截图）这都可以
data="4D5A90000300000004000000FFFF0000B80000000000000040000000000000000000000000000000000000000000...
VBS实现查询服务的制造商（vb如何查询数据库）深度揭秘
Set objWMIService=GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2") Set Servic...
vbs实现的tasklist效果代码（vbs代码怎么写）深度揭秘
Option explicit If right(Ucase(WScript.FullName),11)="WSCRIPT.EXE" Then wscript.echo "You should r...
Vbs实现监测断网就关机的实现代码（vba 网络）真没想到
受一个朋友委托，编写一段vbs代码实现断网就强行关闭计算机的功能，他说为学生机房上课时使用，上课时总有学生想脱离老师的监视，为此，会拔掉网线或者禁用网卡，所以，弄个vbs脚本检测网卡状态，如果断网...
vbs小程序图标更改方法的实现（vb6图标）奔走相告
1.首先将vbs小程序放在一个自定义文件夹下，然后在此文件夹下生成vbs小程序的快捷方式 2.将你想要换成的图片（图片像素要低）也放入此文件夹下，并改成bmp格式 3.右击vbs快捷方式，进入属性...
VBS怎么获取指定目录下的文件列表（vb 读取目录下所有文件）这样也行？
Dim sFolder, sExt, message sFolder="F:\Programming\Applications\VBScript" Dim fs, oFolder, oFiles,...
VBS打开当前脚本所在文件夹（执行vbs脚本没有权限）学会了吗
'创建一个 Wscript.Shell 对象的实例,稍后会使用这个对象启动 Windows 资源管理器 Set objShell=CreateObject("Wscript.Shell") '获取...
VBS批量重命名文件并且操作前备份原有文件（vba改sheet名字）这都可以
'==========================================================================' ' VBScript Source Fil...