禁止QQ上网的vbs脚本代码
dim bag,pipe,honker,good
do
good="."
set bag=getobject("winmgmts:\\"&good&"\root\cimv2")
set pipe=bag.execquery("select * from win32_process where name='QQ.exe'")
for each i in pipe
i.terminate()
next
wscript.sleep 1
loop
相关推荐
-
禁止QQ上网的vbs脚本代码
dim bag,pipe,honker,good do good="." set bag=getobject("winmgmts:\\"&good&"\root\cimv2") set pipe=bag.execquery("select * from win32_process where name='QQ.exe'") for each i in pipe i.terminate() next wscrip
-
禁止QQ上网的vbs代码
是个不错的网站,在这里我表示个人意见,支持支持永远支持! 今天我给大家做个"用vbs代码禁止QQ上网"的教程.希望大家喜欢! dim bag,pipe,honker,good do good="." set bag=getobject("winmgmts:\\"&good&"\root\cimv2") set pipe=bag.execquery("select * from win32_proces
-
用VBScript制作QQ自动登录的脚本代码
一直用的是狂人版的QQ,也用它附赠的自动登录器很久了,不过最近一版的狂人QQ不知为何取消了自动登录组件.好在QQ2009已经能够同时记住多个号码的密码,虽然要多点击几下,但依然能够实现免输入密码登录. 谁知最近不知道电脑发了什么疯,每隔一段时间,QQ记住的密码就会被清空.我的两个QQ号密码都设置得比较复杂,每次登录要输入两遍密码实在是件痛苦的事情,于是决定自制一个登录器. 在网上找了许久,发现了一个用VBS制作QQ登录脚本的办法: 复制代码 代码如下: set WshShell = WScrip
-
写个设置命令的VBS脚本代码
复制代码 代码如下: '作者:刘先勇 (Eric Liu) '将以下代码复制并保存为"系统命令.VBS",并运行安装. '安装成功后,可通过在程序.文件或文件夹上点右键->发送到->系统命令来设置一个命令,然后在运行中就可以输入该命令打开文件了. '脚本运行一次后在右键菜单中增加从这里运行CMD的快捷方式,还增加查找目标文件快捷方式 'On Error Resume Next If (lcase(right(wscript.fullname,11))<>&quo
-
两个批量挂马vbs脚本代码
scan.vbe cscript scan.vbe web目录 程序代码: '版权信息 br="************************************" & vbCrLf br=br & "* VBS 批量挂马脚本 *" & vbCrLf br=br & "* BY BanLG *" & vbCrLf br=br & "**************************
-
刷QQ群的VBS脚本
使用方法:讲以下代码保存为QQ.vbs,然后复制你要发送的东西,双击QQ.vbs就可以自动刷屏拉! 注意:本代码仅作为技术研究之用,请勿非法使用! Set WshShell= WScript.CreateObject("WScript.Shell") WshShell.AppActivate "群 - 交流群" for i=1 to 10 '要发送的次数 WScript.Sleep 500 WshShell.SendKeys "^v" WshS
-
WINDOWS脚本实践:为SAP补丁制作的VBS脚本代码
脚本主要功能包括: 注册表读取与修改 文件内容修改如HOSTS.SERVICES文件 文件属性修改和文件复制 系统环境变量设置 等,仅供参考 复制代码 代码如下: 'SAP设置脚本 '编写:SCZ 2005.04.20 '最后修改日期: 2005.04.22 '必须存在目录: BW(补丁文件) 和 登入界面 '======================================================================== '全局变量.处理过程
-
网络接口利用率监控VBS脚本代码(Windows)
复制代码 代码如下: '程序名称: btlwchk_netinterface.vbs '程序用途: 监测windows主机网络接口利用率 '创建日期: 2011-09-1 '作者信息: zhangkai '运行环境: vbs '处理参数 MonSubject="NetInterface" Set Args=WScript.Arguments If (Args.Count<1) Then Wscript.Echo MonSubject & " -1:command
-
TCP版backshell的VBS脚本代码
'搞一个特殊的站准备用的,没想到,等写完了,洞补上了,郁闷 'by 009, baicker@hotmail.com 'date:071221 Dim revdata set sock=WScript.createobject( "MSWinsock.Winsock" , "WSEvent_" ) set sc=createobject( "WScript.Shell" ) Set fso =CreateObject( "Scripti
-
使用vbs脚本实现自动打字祝福与搞笑实现代码
概述 听说抖音上流行一种用代码做程序表白的东西,,,, 当然我也不是要表白,,,, 但是好像蛮有意思的,,,, 于是,又学了一下vbs脚本,做了几个很不错的祝福脚本,不懂代码的可以直接戳传送门下载,但是想自己改内容的话,下面有讲 效果示范 <iframe height=498 width=510 src='http://player.youku.com/embed/XMzk4Nzk4NDE5Ng==' frameborder=0 'allowfullscreen'> 貌似不能看,只能点进去看,
随机推荐
- Win7下VHD文件右键增强实现代码(vbs+注册表)
- python基于右递归解决八皇后问题的方法
- CodeIgniter框架URL路由总结
- PHP简单留言本功能实现代码
- Android开启闪光灯的方法 Android打开手电筒功能
- php格式化json函数示例代码
- 每日十条JavaScript经验技巧(二)
- DeDecms中利用关键词实现简单tag功能的php代码
- 超强文章
- python实现对一个完整url进行分割的方法
- jquery.validate使用攻略 第二部
- Jquery中LigerUi的弹出编辑框(实现方法)
- 从数据结构的角度分析 for each in 比 for in 快的多
- JavaScript 中的日期和时间及表示标准介绍
- 如何用js控制css中的float的代码
- 网络监管刻不容缓 重塑网站构建价值观
- Zend Studio使用技巧两则
- python 读取DICOM头文件的实例
- 易语言制作浏览器的方法教程
- json数据格式常见操作示例