让系统重启的批处理

让系统重启的批处理,第1张

——————————————————————

set ws=CreateObject("wscriptshell")

wsrun "shutdown -r -t 0",0

——————————————————————

将以上代码(不包括横线)复制到记事本中,然后将文件后缀改成vbs即可。

如果修改后缀没有用,那么按以下步骤 *** 作即可:

在工具——文件夹选项——查看中,把“隐藏已知文件类型的扩张名”前面的勾去掉,就可以看见文件的后缀名,再修改就可以了。)

添加到注册表可以运行啊,你是这样做的吗:

定位到HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run在右边新建一个字符串值,名字随便取,双击它在数个数据里面填上你的111vbs的绝对路径比如是d:\abc\111vbs具体看你自己把它放哪了,这样就行了

也可以通过这样来实现开机启动:新建一个111vbs的快捷方式到桌面上,然后把快捷方式复制到序-启动里面

你可能是从网上复制的代码?网页上复制时,可能会复制一些不可见的字符导致这种错误。

删掉vbs文件,新建文本文档,自己输入代码,再测试。

或者打开cmd,执行以下命令:

d:

echo msgbox "hello world!">"hello world"vbs

"hello world"vbs

效果可能如下:

或者用十六进制编辑工具编辑vbs,看是否有不可显示字符。

do

Set Of = CreateObject("ScriptingFileSystemObject")

set ws=createobject("wscriptshell")

dim OK,oShell

OK=False

set bag=getobject("winmgmts:\\\root\cimv2")

set pipe=bagexecquery("select from win32_process where name='QQEXE'")

For Each id In pipe

OK = True

Next

If not OK Then

wsrun "如果重启QQ程序这里填写QQ程序路径,如果重启电脑,这里填写shutdown -r -t 0"

end if

Set Of=Nothing

Set ws=Nothing

Set bag=Nothing

Set pipe=Nothing

wscriptsleep 2000

loop

以上就是关于让系统重启的批处理全部的内容,包括:让系统重启的批处理、开机启动VBS、为什么我用电脑输入最简单的vbs程序也报错等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址:https://54852.com/zz/10123386.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-05-05
下一篇2023-05-05

发表评论

登录后才能评论

评论列表(0条)

    保存