电脑微信多开脚本怎么做（利用vbs在电脑上实现微信多开教程）

微信是我们日常生活中必不可少的社交软件，很多人有多个微信，但通常会面临一个问题，在电脑上只能同时打开一个微信，今天小编教大家利用vbs脚本来实现在电脑上实现微信多开。

1.新建文本文档，复制以下代码，保存后缀名为vbs。

代码如下：

' 打开微信的数量

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

2.双击刚刚保存的vbs程序，打开输入框，输入启动的微信数量。

3.确定之后输入微信应用程序地址。

这样就可以在同一台电脑上登录多个微信啦！~

想要学习更多关于VBS脚本知识，欢迎关注"vbs_edit"（VBS脚本之家）！

vbs脚本之家

,