vb脚本实现电脑定时关机操作

1.思路

a.需要创建一个变量(执行方法)

b.获取电脑中管理员权限

c.打开DOS界面(cmd窗口)

d.输入指令进行定时关机

2.基础语法

2.1 定义变量

dim 变量名

2.2 赋予系统最高权限

set 变量名=createobject("wscript.shell")

2.3 打开指定位置的程序

变量名.run "位置",打开程序方式(type)

当位置为字符串时,需要在字符串外面套一层英文双引号

当type为0时,表示该程序在后台执行

当type为1时,表示该程序正常打开

当type为2时,表示该程序打开后最小化

当type为3时,表示该程序打开后最大化(与F11键值的效果是一致的)

例如a.run “cmd”,1表示以正常窗口的大小打开cmd程序(DOS程序)

2.4 如何编写在cmd里面执行的指令

变量名.run "cmd /c 指令内容"

例如 a.run “cmd /c shutdown /s /t 120”

意思是打开cmd窗口并2分钟后执行关机操作

2.5 关机的相关语法是什么？

shutdown /s '关机
shutdown /a  '取消关机操作
shutdown /s /t t1 't1/60分钟后关机---->定时关机(系统方面给出消息提示)
shutdown /s /t t1 /c 消息内容't1/60分钟后关机并给出消息提示(手动写)
shutdown /r '重启
shutdown /l '注销
shutdown /p '立即执行关机程序

2.6 vb脚本的程序如何编写?

a.直接新建一个记事本

b.更改它的文件拓展名为.vbe

c.然后设为它的编码格式为ANSI,用来防止中文乱码问题

​ 此步骤的具体操作过程见后面常见问题中4.1的内容

d.编写vb脚本的语句

3.每一步的具体实现过程

3.1 步骤a–需要创建一个变量(执行方法)

dim a
'定义变量a来执行后面操作的方法

3.2 步骤b–获取电脑中管理员权限

set a=createobject("wscript.shell")
'给变量a赋予当前系统的最高权限    

注意:createobject、wscript.shell这两部分是不能随便定义的

3.3 步骤c–打开DOS界面

a.run "cmd"
'打开当前vbe脚本文件所在的目录

3.4 步骤d–输入指令进行关机

a.run "cmd /c shutdown /s /t 时间 /c ""提示关机的中文内容"" "

注意:时间以60s为计量单位,例如120就代表2分钟,180就代表3分钟,这数字后面不能加s

4.常见问题

4.1 在vb脚本中出现中文乱码的显示问题

解决方案如下

a.打开文件扩展名为.vbe的文件

b.修改编码格式

点击完另存为就进入了如下图所示的界面

c.确认替换原文件

4.2 关机代码中定时关机的时间以什么为计量单位?

时间是以s为单位,当时间为120s时,意味着2分钟后关机

但是在书写指令的过程中是不能加上s这个单位

​ 且后面的提示中文要在中文字符上套两层双引号

例如: shutdown /s /t 120s------写法错误,120后不能加s

​ shutdown /s /t 120 /c “系统将在2分钟后关机” 写法错误,中文外应该加两层 英文双引号

正常的2分钟关机且含有中文提示的指令如下所示:

shutdown /s /t 120 /c ""电脑将在2分钟后关机""

4.源代码

dim a
'使它具有后台管理员权限
set a=createobject("wscript.shell")
a.run "cmd /c shutdown /s /t 120 /c ""系统将会在2分钟后关机""",1

5.用法

晚上用来下载视频资源,速度较慢,而自己又不想等太久
可以直接建立一个定时关机vb脚本,点击后让它在
后台运行,这样就可以解放自己去做其他的事情了