求一个可以更改计算机名为指定值的vbs脚本，不弹窗，直接在代码中指定

PQianbei 2015-09-10 03:22:56

求一个可以更改计算机名为指定值的vbs脚本，不弹窗，直接在代码中指定。
双机vbs就可以默认完成。

...全文

233 1 打赏收藏转发到动态举报

写回复

用AI写文章

1 条回复

切换为时间正序

请发表友善的回复…

发表回复

slwsss 2015-09-10

打赏
举报

Set objWMIService = GetObject("winmgmts:\\.\root\cimv2") Set colComputers = objWMIService.ExecQuery("Select * from Win32_ComputerSystem") For Each objComputer in colComputers objComputer.rename "计算机名" Next

最近刷B站，发现很多视频开头点了关注之后，就有很多弹窗，其实这就是vbs脚本，下面，让我教大家怎么做吧。

恶搞整人无限弹窗

win10中，如何发一个弹窗呢？那就要用到VBS这门语言啦！首先啊，建一个新建文本文档（txt），然后输入代码： msgbox "Hello" 接下来将名字改为“弹窗.vbs” 点击运行，就会出现一个弹窗。那大家想要弹窗特效吗？如果想要，那就复制以下其中一条代码，试一试： 1，⚠️ msgbox ("Hello"),vbExclamation,("Windows") 2，❓ msgbox ("Hello"),vbQuestion,("Windows") 3，❌ msgbox ("Hello"),v.

具体操作步骤如下： 1、先创建1个弹窗文档： ① 点击鼠标右键，新建一个文本文档 ② 复制粘贴这串代码 msgbox("想说的话") msgbox("想说的话") ③打开文档【另存为】界面，将文件名设置为【常用软件名称】，文档后缀名【.txt改为.vbs】，编码设置为【ANSI】，点击保存就可以啦~ 2、接下来，将这个弹窗文档图标，设置为TA常用软件的图标： ① 创建1个弹窗文档的快捷方式 ② 接下来需要同时把TA常用的软件和弹窗文档的更改图标功能打开：点.....

个性化弹窗的实现原理非常简单，大体的思路是：用记事本编写一句由Msgbox函数构成的弹出信息显示命令，然后将这个文件保存为Windows可以直接运行的.VBS脚本文件。例如要让标题栏显示“这是一个非常重要的值班日”，将"TITLE"替换为"这是一个非常重要的值班日"，命令行变为“X=Msgbox("今天轮你值班，设备都检查好了吗？小提示：如果要改变提示信息窗口的内容和标题栏的内容，只需在vbs程序上右键单击并选择用记事本打开，参照上述表格，修改两处参数的内容或代码即可。这样，需要的弹窗程序就建好了。

vbScript

4,008

社区成员

3,510

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章