【研究了好久卡壳了】如何将运行目录下的文件复制到指定文件夹？

我爱吃西瓜

  

窗口程序集名	保 留	保 留	备 注
窗口程序集1

子程序名	返回值类型	公开	备 注
_按钮1_被单击

n ＝ 浏览文件夹 (“标题”, 假)
判断 (n ≠ “”)
编辑框1.内容 ＝ n

子程序名	返回值类型	公开	备 注
_按钮2_被单击

变量名	类 型	静态	数组	备 注
源目录文件	文本型

源目录文件 ＝ 到文本 (读入文件 (取运行目录 () ＋ “\” ＋ “LoginGate.exe”))
' 源目录文件 = 取运行目录() + "\" + LoginGate.exe()
模块_复制文件 (“源目录文件”, “D:\MirServer\LoginGate\LoginGate.exe”)

i支持库列表	支持库注释
shell	操作系统界面功能支持库

.版本 2<br /> .支持库 shell<br /> <br /> .程序集 窗口程序集1<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> n ＝ 浏览文件夹 (“标题”, 假)<br /> .判断开始 (n ≠ “”)<br /> 编辑框1.内容 ＝ n<br /> .默认<br /> <br /> .判断结束<br /> <br /> <br /> .子程序 _按钮2_被单击<br /> .局部变量 源目录文件, 文本型<br /> <br /> 源目录文件 ＝ 到文本 (读入文件 (取运行目录 () ＋ “\” ＋ “LoginGate.exe”))<br /> ' 源目录文件 = 取运行目录() + "\" + LoginGate.exe()<br /> 模块_复制文件 (“源目录文件”, “D:\MirServer\LoginGate\LoginGate.exe”)

上图 是我要指定的根目录文件夹

源文件夹（软件在任意目录下都可以将软件运行目录下的“\收费网关\LoginGate.exe” 复制覆盖到目标目录）
D:\软件\收费网关\LoginGate.exe

覆盖目标目录(将文件覆盖到我软件指定根目录下的LoginGate文件夹)
D:\MirServer\LoginGate\LoginGate.exe

D:\MirServer = 根目录（根据软件指定目录变换）
例如我指定 E:\MirServer 就可以吧源文件覆盖到 E:\MirServer\LoginGate\LoginGate.exe



求解答

ジ秋水

复制文件 (“D:\软件\收费网关\LoginGate.exe”, “D:\MirServer\LoginGate\LoginGate.exe”)

H裸奔的鸭子C

12.zip (501.9 KB, 下载次数: 13)

2014-9-21 14:35 上传

点击文件名下载附件

我爱吃西瓜

明哥 发表于 2014-9-21 14:35

亲, 我想软件在任意目录下都可以将软件运行目录下的“\收费网关\LoginGate.exe” 复制覆盖到目标目录
源文件不需要选择 目标文件夹也不需要选择额

寻找星空

复制文件 (取运行目录()+“\收费网关\LoginGate.exe”, “D:\MirServer\LoginGate\LoginGate.exe”)

b1043807144

如果他有注册表根据注册表取目录进行操作  如果没有注册表 自己写一个 就是初始化一下