利用vbs在电脑上实现微信多开教程 利用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脚本之家
- 12-31阳台封窗是整体框好还是分体框好:阳台装修安装无框窗安全吗
- 12-18电脑无法识别u盘如何处理?电脑无法识别U盘原因汇总
- 01-02大气时尚加动感实拍雪佛兰探界者:能否复刻北美销量神话
- 04-29小麦自发面粉和普通面粉的区别 从小麦到面粉是怎么形成的
- 01-29兔年年画可爱又简单:兔年画兔兔年一团和气图
- 03-07oppok3值得入手不,千元真香机,OPPOK3评测
- 04-10转化率和平衡转化率有区别吗?转化率,CVR是什么意思
- 10-29潮品小商品2元店加盟前景:你知道开这样一家十元潮品百货店要多少钱吗
- 10-25花果山水帘洞真假美猴王 翠藓堆蓝,白云浮玉
- 11-24高血压高到什么程度需要快速降压?高血压160,110属于高血压几级
- 02-08什么样的人最容易得狐臭?为何有的人是狐臭有的人是体香
- 10-18微信朋友圈发空白怎么发?微信朋友圈可发空白信息
- 04-20儿童护眼胡萝卜汁,番茄和胡萝卜护眼黄金搭档
- 09-30月亮英语怎么读正确的?月亮,的英语竟然不是moon
- 03-06陕西女娃直爽 矫情,硬气咸阳女娃咋是个这
- 10-08lo裙推荐日常优雅白色:满满圣洁感白色lo裙安利
热门
推荐
- 1呼和浩特周边自驾游出行介绍389
- 2不平凡的未来作文900,不平凡的梦作文900字203
- 3夹心马芬蛋糕的做法怎么做261
- 4学习动力文章261
- 5不吃药不打针怎么丰胸388
- 6小学数学简易方程习题及答案252
- 7廉政建设工作情况报告130
- 8培养数学思维,其实很简单,做到这几点思维能力将超于常人135