论坛 › 『 提问交流 』 › 关于FileInstall()函数的用法

yunnl 发表于 2012-8-10 20:03:15

关于FileInstall()函数的用法

在网上找到了带参数运行的案例
想着用FileInstall装入文件到脚本

但是发现无论参数正确或者错误
文件都会解压

求大神提供思路

以下是小弟的源码Local $b = FileInstall("C:\Users\Administrator\Desktop\install.exe",@ScriptDir & "\install.exe",1)

If $CmdLine > 0 Then
      If $CmdLine = "/s" Then _main0()               
      If $CmdLine = "/run" Then _main1()
Else
      _main()
EndIf

Func _main0()
;程序代码
EndFunc

Func _main1()
;程序代码
EndFunc

Func _main()
;程序代码
EndFunc

netegg 发表于 2012-8-10 20:24:23

$CmdLine这个是什么

ajian55 发表于 2012-8-10 20:40:17

If $CmdLine > 0 Then
      If $CmdLine = "/s" Then;Install ?
            FileInstall("C:\Users\Administrator\Desktop\install.exe",@ScriptDir & "\install.exe",1)
             _main0()               
      ElseIf $CmdLine = "/run" Then ;Run ?
             Run(@ScriptDir & "\install.exe")
             _main1()
         Else
            ;The Command Line Parameter is error
         EndIf
Else
      _main()
EndIf

Func _main0()
;程序代码
EndFunc

Func _main1()
;程序代码
EndFunc

Func _main()
;程序代码
EndFunc

netegg 发表于 2012-8-10 20:47:44

回复 3# ajian55

这个能运行？

ajian55 发表于 2012-8-10 21:06:01

本帖最后由 ajian55 于 2012-8-10 21:13 编辑

回复 4# netegg


    为什么觉得不能运行呢 ？可以的呀。

netegg 发表于 2012-8-10 21:06:58

本帖最后由 netegg 于 2012-8-10 21:10 编辑

$CmdLine哪来的？

知道了

ajian55 发表于 2012-8-10 21:15:05

回复 6# netegg


    蛋蛋开始没转过弯来吧   楼主很蛋疼的说~

yunnl 发表于 2012-8-10 22:21:32

回复 7# ajian55


    谢谢啦~
一个不小心在C盘运行了个清空目录的操作{:face (245):}
等电脑里的文件找回来再试试～　

yunnl 发表于 2012-8-11 14:06:06

回复 7# ajian55


    {:face (88):}非常完美～谢谢啦～

qq309266378 发表于 2012-8-12 14:34:25

菜鸟路过，学习了。

查看完整版本: 关于FileInstall()函数的用法