如何让EXE 生产EXE

zcx880517

前来学习下。。向各位大大看齐

akmm88

将脚本写到程序尾部.
运行的时候读出.
用EXECUTE就能实现了

woeiwoei

回复 4# lynfr8



   Aut2exeA.EXE 在那？？我的\Aut2Exe\ 只有Aut2exe.EXE  
  AutoItSC.bin 也在。同样没见AutoItASC.bin
看大大 那片帖子 是 09年9月的。现在版本 升级了。文件貌似也改了把。

woeiwoei

回复 17# akmm88


    没AU3 环境的机器上呢？

akmm88

回复  akmm88


    没AU3 环境的机器上呢？
woeiwoei 发表于 2010-7-12 11:04

$hFile=FileOpen(@ScriptDir&"\1.au3")
$str=FileReadLine($hFile)
MsgBox(0,"",$str)
Execute($str)
FileClose($hFile)

1.au3

MsgBox(0,"test","script execute")

按照这个方法你可以,把1.au3一行一行的读出执行.
如果需要IF FOR这样的语句,需要自己来解释和判断.

akmm88

接我上面的说话,扩展
用AU3开发自己的脚本
mian.au3

$hFile=FileOpen(@ScriptDir&"\1.au3")
$str=FileReadLine($hFile)
MsgBox(0,"",$str)
Execute($str)
FileClose($hFile)

Func Sum($a,$b)
        Return($a+$b)
EndFunc

1.au3

MsgBox(0,"test Function sum",sum(10,20))

如果把main.au3继续强化的话,就可以开发出自己的脚本了

akmm88

再来,中文编程支持

$hFile=FileOpen(@ScriptDir&"\1.au3")
$str=FileReadLine($hFile)
MsgBox(0,"",$str)
$str=StringReplace($str,"求和(","Sum(")'为了演示,简化REGEXP用REPLACE
Execute($str)
FileClose($hFile)

Func Sum($a,$b)
        Return($a+$b)
EndFunc

1.au3

MsgBox(0,"test Function sum",求和(10,20))

把这个方式研究下去,用AUTOIT开发中文AUTOIT,完全可行.
说的够多了,希望你能明白.

以后尽量每天来论坛回复一个问题,哈哈

C.L

以前写过一个可以从文件*.txt中读取代码生成exe运行的例子，楼主可以到下面的链接看看：

http://www.autoitx.com/forum.php ... p;extra=&page=2

16#
17#有说明

以前是用FileInstall，现在有exe注入，可以用exe注入的UDF将代码文件全部注入到exe中，需要的时候读取出来，按照参数修改后编译运行

woeiwoei

回复 23# C.L


      果然 厉害~~

kk_lee69

可以調用 ACNWrapper.exe      不過有幾個問題要解決.....就是 對方的電腦不一定有裝AU3  而...ACNWrapper.exe 讀取的是 登錄檔裡面的 AU3設定路徑.......不然就會出現 選擇框...

我的解決方式 是 找到 ACNWrapper.exe 英文版的  源碼.....修改了 AUT2EXE 檔案的讀取路徑 內定都再同一個目錄裡面.......然後 編譯  呼叫就可以了