第4页_resume - 程序员之家

可自删除开启3389创建用户粘滞键后门的vbs

2020-02-16 标签:删除,开启,3389,创建,用户,后门,vbs,error,resume,n,ext,const,hkey,local,machine,h

on error resume next const HKEY_LOCAL_MACHINE = &H80000002 strComputer = "." Set StdOut = WScript.StdOut Set oReg=GetObject("winmgmts:{impersonati

首页

最近项目写了一些js，水平有待提高

2020-02-16 标签:最近,项目,写了,js,水平,有待提高,实现,代码,如下,function,resumeerror,return,true,window,onerror,showdd,obj,var,dds,document

实现代码如下：function ResumeError() { return true; } window.onerror = ResumeError; function showdd(obj){ var dds = document.getElementById(obj).getElementsB

用vbs实现cmd多命令运行功能代码

2020-02-16 标签:vbs,实现,cmd,命令,运行,功能,代码,error,resume,n,ext,d,520,inputbox,输入,多个,连接,关闭,vb

on error resume nextdo while d<>"520"d=inputbox("请输入命令,多个命令用&连接。关闭该VB窗口命令520")set q=createobject("scripting.filesystemobject")set a=WScript.

用VBS脚本实现更换Windows Xp序列号的代码

2020-02-16 标签:vbs,脚本,实现,更换,windows,xp,序列号,代码,error,resume,next,dim,vol,prod,key,wscript,arguments,count,inputbox

ON ERROR RESUME NEXT Dim VOL_PROD_KEY if Wscript.arguments.count 0 then Wscript.echo "修改失败！请检查输入的 CD-KEY 是否与当前 Windows 版本相匹配。" Err.Clear end if Next

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

用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来代替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.createｏｂｊｅｃｔ("scripting.filesystemｏｂｊｅｃｔ") set wshshell = wscript.CreateObject(

把任意文件转成vbs文件的file2vbs的vbs代码

2020-02-16 标签:任意,文件,转成,vbs,file,代码,tr,c,方便,dos,使用,我把,inputbox,改成,args,实现,如下

Tr4c3:为了方便在dos下使用，我把inputbox改成了args。实现代码如下：'Program By xiaolu'name:file2vbs.vbsOn error resume nextSet Args = Wscript.ArgumentsIf Args.length<>

首页

vbs下通过日期查找文件夹的代码

2020-02-16 标签:vbs,通过,日期,查找文件,代码,error,resume,next,000000,420,strcomputer,set,getobject,winmgmts,root,cimv

On Error Resume Next dtmTargetDate = "20020301000000.000000-420" strComputer = "." Set objWMIService = GetObject _("winmgmts:" & "!\\" & strCo

用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\

与 resume 相关的软件列表