我要评论需求分析
微信是我们日常生活中必不可少的社交软件，很多人不止有一个微信，但通常会面临一个问题，在电脑上只能同时打开一个微信，今天我闲来无事，写了一个在电脑上可以微信多开的脚本，最初使用的是bat脚本，但bat需要面对的是终端，不适用于普通人，就学习并使用了vbs来实现
- 双击桌面的
vbs程序，打开输入框，输入启动的微信数量 - 确定之后输入微信应用程序地址
- 确定之后循环第一步的数量执行启动微信操作
实现思路
- 需要打开输入框并获取到输入的数量，这里使用
inputbox方法 - 输入微信应用程序地址并获取结果同样使用
inputbox方法 - 使用
for...to循环 - 使用
wscript.shell的run方法启动微信
具体代码
' 打开微信的数量
dim count
' 微信应用程序地址
dim src
' wsh脚本终端
dim wsh
' fso读取文件信息
dim fso
' 设置wsh脚本终端
set wsh = wscript.createobject("wscript.shell")
' 设置fso来读取文件
set fso = createobject("scripting.filesystemobject")
' 调用函数打开输入框
call getcount()
' 定义一个函数用来打开输入框弹窗
sub getcount()
' 获取打开的微信数量，默认打开两个
count = inputbox("请输入微信多开数量","微信多开",2)
' 判断是否输入内容
if count = "" then
' 如果点击取消，直接退出函数
if isempty(count) then
wscript.quit
else
' 如果点击确定则提示输入数量
msgbox("请输入打开微信的数量")
call getcount()
end if
end if
' 获取微信可执行文件地址，默认是我本机的微信应用程序地址
src = inputbox("请输入微信程序地址","微信程序地址","e:\wechat\wechat.exe")
' 判断是否输入微信程序地址
if src = "" then
' 如果点击取消，直接退出函数
if isempty(src) then
wscript.quit
else
' 如果点击确定则提示输入微信程序地址
msgbox("请输入微信可执行文件地址")
call getcount()
end if
end if
if count > 7 then
msgbox("最多打开7个微信")
call getcount()
elseif count < 0 then
msgbox("最少打开1个微信")
call getcount()
end if
' 检查文件路径是否存在
if not fso.fileexists(src) then
msgbox("指定的微信启动程序不存在")
call getcount()
end if
dim runstatus
for i = 1 to count
runstatus = wsh.run(src)
if runstatus <> 0 then
msgbox("程序出现异常")
exit sub
end if
next
set wsh = nothing
end sub
最后将代码保存在桌面，并将后缀修改为.vbs，双击就可以直接运行啦
收获
vbs中定义变量可以使用dim- 通过
createobject来创建一个对象 - 通过
sub或function来声明一个函数 - 通过
call来调用一个函数 - 不等于符号可以使用
<> - 输入框可以使用
inputbox控件 - 消息弹框可以使用
msgbox控件 if条件判断必须以end if结束且大小写不敏感
结语
这也是我第一次学习vbs，并做了这么一个小工具，肯定会有很多地方不够规范，甚至如果有错误希望你可以指出，对了，这个东西是基于微软的，所以只能在windows上使用哦~
以上就是在电脑上实现微信多开的技巧教程的详细内容，相关文章！
发表评论