50分给你:
如何用代码实现这二个步骤?人工做很容易,代码如何做?
一:双击 “D:\原安装文件” 目录下的Setup.exe进行安装,假设安装目录是C: \Program Files\ThX
二:将 “D:\汉化文件”目录下的“ThX.exe”复制到安装目录C: \Program Files\ThX下,出现“是”/“否”替换提示时,选择“是”。代替原先的同名文件QQ:271937025
13727859861

解决方案 »

  1.   

    1、调用可执行文件:
    ============================
    Shell   函数   
        
      执行一个可执行文件,返回一个   Variant   (Double),如果成功的话,代表这个程序的任务   ID,若不成功,则会返回   0。   
        
      语法   
        
      Shell(pathname[,windowstyle])   
        
      Shell   函数的语法含有下面这些命名参数:   
        
      部分 描述   
      pathname 必要参数。Variant   (String),要执行的程序名,以及任何必需的参数或命令行变量,可能还包括目录或文件夹,以及驱动器。   
      Windowstyle 可选参数。Variant   (Integer),表示在程序运行时窗口的样式。如果   windowstyle   省略,则程序是以具有焦点的最小化窗口来执行的。   
      windowstyle   命名参数有以下这些值:   
        
      常量 值 描述   
      vbHide 0 窗口被隐藏,且焦点会移到隐式窗口。   
      VbNormalFocus 1 窗口具有焦点,且会还原到它原来的大小和位置。   
      VbMinimizedFocus 2 窗口会以一个具有焦点的图标来显示。   
      VbMaximizedFocus 3 窗口是一个具有焦点的最大化窗口。   
      VbNormalNoFocus 4 窗口会被还原到最近使用的大小和位置,而当前活动的窗口仍然保持活动。   
      VbMinimizedNoFocus 6 窗口会以一个图标来显示。而当前活动的的窗口仍然保持活动。   
      说明   
        
      如果   Shell   函数成功地执行了所要执行的文件,则它会返回程序的任务   ID。任务   ID   是一个唯一的数值,用来指明正在运行的程序。   
        
      注意       Shell   函数是以异步方式来执行其它程序的。也就是说,用   Shell   启动的程序可能还没有完成执行过程,就已经执行到   Shell   函数之后的语句。   
        
      Shell   函数示例   
        
      本示例使用   Shell   函数来完成一个用户指定的应用程序。   
        
      '   将第二个参数值设成   1,可让该程序以正常大小的窗口完成,并且拥有焦点。   
      Dim   RetVal   
      RetVal   =   Shell("C:\WINDOWS\CALC.EXE",   1) '   完成Calculator。  
    =====================
    2、 调用copy函数,并用fileexit函数,好久不写代码了,大概就是这个意思
      

  2.   

    如何知道在调用shell安装setup.exe的时候,那个安装目录是哪个吧?
    因为会在安装过程中,手工修改了目录。继续请教!
      

  3.   

    问题是这个软件不是我们开发的,是个英文软件
    汉化的倒是我们做的。
    我们现在想找一个简单的方法,实现那二个步骤(手工安装英文软件,手工复制汉化文件去替换那个原EXE同名文件)那个路径要是在安装过程中,手动修改,就要在第二步的时候由软件自动取得,这是难点