微信4.0多开助手
今天更新了微信PC端的最新版，发现之前的双开、多开方法又回来了。
但是exe名字不是wechat了，就叫weixin.exe，还得改bat文件。
bat文件双击还闪一下，编程我是啥也不懂，以前的解决方法是找了一个bat to exe的工具做了个exe，就不闪了，但是想开更多个就不行，不够灵活。
今天在AI的帮助下，我自己完成了一个双开的小程序跟大家分享一下。
这个就是我用AI帮我写的一个小程序
首次使用，打开后是个设置页面，设置微信的安装路径和打开数量，数量我设置了个上限9。填完之后保存设置，会在程序同一目录下生成一个配置文件，存储微信路径信息和打开数量。
有了正确的配置文件之后，再双击程序会直接执行微信多开的命令，不会弹出这个设置页面，无感多开。
需要修改的话可以删除掉配置文件，也可以直接修改配置文件。
程序地址
链接：夸克网盘分享
提取码：sH6Y
程序源码
#Requires AutoHotkey v2.0
#SingleInstance Force
; 检查设置文件并决定是否直接运行
if FileExist("settings.ini") {
path := IniRead("settings.ini", "Config", "Path", "")
if FileExist(path) {
count := Integer(IniRead("settings.ini", "Config", "Count", "2"))
Loop count
Run(path)
ExitApp
}
}
; 创建主窗口
MyGui := Gui("+AlwaysOnTop", "微信多开助手")
MyGui.SetFont("s10", "Microsoft YaHei UI")
; 添加关闭事件处理
MyGui.OnEvent("Close", (*) => ExitApp())
; 添加控件
MyGui.Add("Text", "x10 y25", "微信路径:")
pathEdit := MyGui.Add("Edit", "x+10 y20 w290 h25") ; 减小宽度以适应浏览按钮
pathEdit.Value := IniRead("settings.ini", "Config", "Path", "")
browseBtn := MyGui.Add("Button", "x+10 y20 w80 h25", "浏览") ; 添加浏览按钮
; 浏览按钮事件
browseBtn.OnEvent("Click", BrowseFile)
MyGui.Add("Text", "x10 y+15", "打开数量:") ; 调整第二行的起始位置
countEdit := MyGui.Add("Edit", "x+10 y56 w40 h25 Number", "2")
countEdit.OnEvent("Change", CheckCount) ; 添加输入值变化事件
upButton := MyGui.Add("Button", "x+5 w25 h25", "+")
downButton := MyGui.Add("Button", "x+5 w25 h25", "-")
clearBtn := MyGui.Add("Button", "x+20 w80 h25", "清空参数")
saveBtn := MyGui.Add("Button", "x+10 w80 h25", "保存设置")
runBtn := MyGui.Add("Button", "x+10 w80 h25", "运行")
; 按钮事件
clearBtn.OnEvent("Click", Clear)
saveBtn.OnEvent("Click", SaveSettings)
runBtn.OnEvent("Click", RunWeChat)
upButton.OnEvent("Click", IncreaseCount)
downButton.OnEvent("Click", DecreaseCount)
; 显示窗口
MyGui.Show("w465 h100")
Clear(*) {
pathEdit.Value := ""
countEdit.Value := "2"
}
SaveSettings(*) {
if !FileExist(pathEdit.Value) {
MsgBox("请输入正确的微信程序路径", "警告", 0x1000) ; 添加 AlwaysOnTop 标志
return
}
IniWrite(pathEdit.Value, "settings.ini", "Config", "Path")
IniWrite(countEdit.Value, "settings.ini", "Config", "Count")
MsgBox("设置保存成功", "提示", 0x1000) ; 添加 AlwaysOnTop 标志
}
RunWeChat(*) {
path := pathEdit.Value
if !FileExist(path) {
MsgBox("请输入正确的微信程序路径", "警告", 0x1000) ; 添加 AlwaysOnTop 标志
return
}
count := Integer(countEdit.Value)
Loop count
Run(path)
ExitApp
}
IncreaseCount(*) {
count := Integer(countEdit.Value)
if count < 9
countEdit.Value := count + 1
else
MsgBox("最多只能同时打开9个微信", "提示", 0x1000)
}
DecreaseCount(*) {
count := Integer(countEdit.Value)
if count > 1
countEdit.Value := count - 1
else
MsgBox("至少需要打开1个微信", "提示", 0x1000)
}
; 添加文件浏览函数
BrowseFile(*) {
file := FileSelect(3,, "选择微信程序或其快捷方式", "应用程序 (*.exe; *.lnk)")
if file {
if SubStr(file, -3) = ".lnk" {
targetPath := ""
try {
FileGetShortcut(file, &targetPath)
if targetPath ; 确保获取到了目标路径
pathEdit.Value := targetPath
else
MsgBox("无法获取快捷方式目标路径", "错误", 0x1000)
} catch as err {
MsgBox("读取快捷方式失败: " err.Message, "错误", 0x1000)
}
} else {
pathEdit.Value := file
}
}
}
; 添加数值检查函数
CheckCount(*) {
count := Integer(countEdit.Value)
if count < 1 {
countEdit.Value := "1"
MsgBox("至少需要打开1个微信", "提示", 0x1000)
} else if count > 9 {
countEdit.Value := "9"
MsgBox("最多只能同时打开9个微信", "提示", 0x1000)
}
}
我也不知道这是啥语言，AI给我生成的，这个程序倒是挺好用，设置好之后，做个快捷方式到任务栏，单击直接多开微信。
