论坛 › 已解决问题区 › 想请教一下自动安装微信的问题

wqm491201 发表于 2025-8-14 11:39:54

想请教一下自动安装微信的问题

代码如下：Run('"C:\Users\Administrator\Desktop\WeChatsetup.exe"')
Sleep(2000)
WinWait("微信安装向导")
Sleep(2000)
Send("{TAB}")
Sleep(250)
Send("{TAB}")
Sleep(250)
send("{TAB}{SPACE}");接受协议
WinWait("微信安装向导")
Sleep(250)
Send("{TAB}")
Sleep(250)
Send("{TAB}")
Sleep(250)
send("{TAB}{SPACE}");接受协议
Sleep(250)
Send("{TAB}")
Sleep(250)
Send("{TAB}")
Sleep(250)
Send("^a"); Ctrl+A 全选
Sleep(100)
Send("{DELETE}"); 删除选中内容
Sleep(100)
ClipPut("D:\办公软件\微信"); 将路径放入剪贴板
Send("^v"); Ctrl+V 粘贴
Sleep(250)
Send("{TAB}")
Sleep(250)
Send("{TAB}")
Sleep(250)
Send("{TAB}")
Sleep(250)
send("{TAB}{SPACE}");接受协议
Sleep(25000)
If WinExists("微信安装向导") Then
      WinClose("微信安装向导")
      ; 若关闭失败则强制终止进程
      If WinExists("微信安装向导") Then
            WinKill("微信安装向导")
      EndIf
    EndIf

在编辑器里面运行都没有问题，但是右键run就是不行，希望哪位大佬帮忙看看什么问题。微信版本为4.0.6.1000

haijie1223 发表于 2025-8-14 15:30:21

以管理员身份运行试试

wqm491201 发表于 2025-8-14 17:49:45

第一个 sleep时间太短了，后来改成4000就可以了

vspeitao@126.co 发表于 2025-8-15 17:00:35

WeChatsetup.exe /S   如果要改安装路径我记得好像是可以通过修改注册表来实现

wqm491201 发表于 2025-8-17 17:37:42

vspeitao@126.co 发表于 2025-8-15 17:00
WeChatsetup.exe /S   如果要改安装路径我记得好像是可以通过修改注册表来实现

这个微信自动安装已经成功了 就是代码写的不太好，感谢回复

查看完整版本: 想请教一下自动安装微信的问题