论坛 › 『 提问交流 』 › 本机测试脚本和编译后的文件都正常，换台电脑就不会自动安装，救命啊！

netpp 发表于 2008-12-13 14:47:28

本机测试脚本和编译后的文件都正常，换台电脑就不会自动安装，救命啊！

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Gamefast -1.2", 194, 66, -1, -1, BitOR($WS_CAPTION,$WS_POPUP,$WS_BORDER,$WS_CLIPSIBLINGS))
GUICtrlCreateLabel("安装程序解压中，请稍候...", 24, 24, -1, -1)
FileInstall("C:\Documents and Settings\xdwb\桌面\Gamefast\Gamefast-1.2.exe",@TempDir & "\Gamefast-1.2.exe",1)
GUIDelete($Form1)
Run(@TempDir & "\Gamefast-1.2.exe")
WinWait("Gamefast -1.2 安装", "t seems the package Gamefast (Gamefast) is already installed.")
ControlClick("Gamefast -1.2 安装", "t seems the package Gamefast (Gamefast) is already installed.", "Button1")
WinWait("Gamefast -1.2 安装", "欢迎使用 Gamefast安装向导")
ControlClick("Gamefast -1.2 安装", "欢迎使用 Gamefast安装向导", "Button2")
WinWait("Gamefast -1.2 安装", "如果您接受协议中的条款")
ControlClick("Gamefast -1.2 安装", "如果您接受协议中的条款", "Button2")
WinWait("Gamefast -1.2 安装", "")
ControlClick("Gamefast -1.2 安装", "", "Button2")
WinWait("硬件安装", "")
ControlClick("硬件安装", "", "Button1")
WinWait("Gamefast -1.2 安装", "安装完成")
ControlClick("Gamefast -1.2 安装", "安装完成", "Button2")
WinWait("Gamefast -1.2 安装", "正在完成“Gamefast -1.2”安装向导")
ControlClick("Gamefast -1.2 安装", "正在完成“Gamefast -1.2”安装向导", "Button2")
FileDelete(@TempDir & "\Gamefast-1.2.exe")

网游加速器的全自动安装代码

netpp 发表于 2008-12-13 14:55:00

换台电脑执行编译后的.exe文件 只弹出来个安装界面图，但是就不会自动下一步。。。:face (36):

真会走路的废柴 发表于 2008-12-13 15:01:40

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Gamefast -1.2", 194, 66, -1, -1, BitOR($WS_CAPTION,$WS_POPUP,$WS_BORDER,$WS_CLIPSIBLINGS))
GUICtrlCreateLabel("安装程序解压中，请稍候...", 24, 24, -1, -1)
FileInstall("C:\Documents and Settings\xdwb\桌面\Gamefast\Gamefast-1.2.exe",@TempDir & "\Gamefast-1.2.exe",1)
GUIDelete($Form1)
Run(@TempDir & "\Gamefast-1.2.exe")
WinWait("Gamefast -1.2 安装", "欢迎使用 Gamefast安装向导")
ControlClick("Gamefast -1.2 安装", "欢迎使用 Gamefast安装向导", "Button1")
WinWait("Gamefast -1.2 安装", "欢迎使用 Gamefast安装向导")
ControlClick("Gamefast -1.2 安装", "欢迎使用 Gamefast安装向导", "Button2")
WinWait("Gamefast -1.2 安装", "如果您接受协议中的条款")
ControlClick("Gamefast -1.2 安装", "如果您接受协议中的条款", "Button2")
WinWait("Gamefast -1.2 安装", "")
ControlClick("Gamefast -1.2 安装", "", "Button2")
WinWait("硬件安装", "")
ControlClick("硬件安装", "", "Button1")
WinWait("Gamefast -1.2 安装", "安装完成")
ControlClick("Gamefast -1.2 安装", "安装完成", "Button2")
WinWait("Gamefast -1.2 安装", "正在完成“Gamefast -1.2”安装向导")
ControlClick("Gamefast -1.2 安装", "正在完成“Gamefast -1.2”安装向导", "Button2")
FileDelete(@TempDir & "\Gamefast-1.2.exe")

netegg 发表于 2008-12-13 18:23:13

FileInstall("C:\Documents and Settings\xdwb\改成
FileInstall("C:\Documents and Settings\" & @username & "\...

查看完整版本: 本机测试脚本和编译后的文件都正常，换台电脑就不会自动安装，救命啊！