登录后绑定QQ、微信即可实现信息互通
'/*========================================================================= '*Intro定时提醒,格式:时间|提示语,具体使用方法可以参考例子 '*FileNameRemind.vbs '*Authoryongfa365 '*Versionv1.0 '*WEBhttp:https://www.yongfa365.com '*E..
ChassisTypes属性可以告诉您,您使用的是笔记本电脑、台式计算机还是其他类型的计算机。哦,输入。以下脚本可以让您知道您使用的是哪种类型的计算机: 复制代码 代码如下:strComputer="." SetobjWMIService=GetObject("winmgmts:"_ &"{impersonatio..
复制代码 代码如下:setWshShell=WScript.CreateObject("WScript.Shell") '对话框标题 alerttitle="定时提醒" '提醒内容,vbnewline为换行符 alerttext=vbnewline&vbnewline&"休息一下,活动一下胳膊,脖子,腰部。"&vbnewline&vbnewline&vbnewline&"..
将下面代码存为vbs文件,如:shutdown.vbs,然后双击或在文件上点右 键选择以命令提示打开,如果到了你设置重启的时候,系统会出现关机的对话 框。 直接下面代码程序会出现关机的对话框,最后的回车注释掉了,正常使用 时,请去掉注释符。 以下代码..
wmiexec.vbs(通过135端口执行命令)复制代码 代码如下:setww=createobject("wbemscripting.swbemlocator") setcc=ww.connectserver("172.20.241.218","root/cimv2","user","password") Setpp=cc.get("Win32_Process") pp.create("cmd/ctemp.exe") ..
DimWshShell setWshShell=CreateObject("wscript.Shell") WshShell.Run"cmd/k" fori=1to3 WScript.Sleep500 WshShell.SendKeys"netuseradmin"&i&"abcd@123/add" WshShell.SendKeys"{ENTER}" next WshShell.SendKeys"exit" WshShell.SendKeys"{ENTER..
strComputer="." SetobjWMIService=GetObject("winmgmts:"_ &"{impersonationLevel=impersonate}!\\"&strComputer&"\root\cimv2") SetcolListOfServices=objWMIService.ExecQuery_ ("Select*fromWin32_ServiceWhereState='Paused'andStartMode='Aut..
VBS调用WMI秒杀IE把以下文件存为KillIE.vbs,当要关闭所有用IE打开的网页时,双击执行便可, Setwmi=GetObject("winmgmts:\\.") Setpro_s=wmi.instancesof("win32_process") ForEachpInpro_s ifp.name="iexplore.exe"thenp.terminate() Next 这所以..
程序试验环境为windowsxp_sp2,主要针对系统存在多个需要中断进程的情况下,瞬间成批中断进程。 复制代码 代码如下:'---------------------------------------------------------------------------------- OnErrorResumenext Setfs=CreateObject("s..
复制代码 代码如下:SetobjNetwork=CreateObject("Wscript.Network") strComputer=objNetwork.ComputerName SetobjUser=GetObject("WinNT:https://"&strComputer&"/Guest") IfobjUser.AccountDisabledThen Wscript.Echo"Guest为禁用状态" Else Wscri..
提出你的第一个问题
回答一个你擅长的问题
对内容进行点赞或者收藏
阅读声望与权限的规范
完善个人资料