VB6.0中怎么复制、移动文件?

来源:百度知道 编辑:UC知道 时间:2024/05/17 08:29:24
比如我写了个EXE文件放在c:\123目录下,
怎样在这个EXE里写程序使得其本身移到c:\456下?
如果说移动很困难的话,那么能复制到C: \456下吗????

怎么写语句???????
写得好的会加分,说到做到的!!

FileCopy replace(app.path & "\" & app.exename,"\\","\"),replace("C:\456\" & app.exename,"\\","\")

这样就可以了```
app.path & "\" & app.exename & ".exe"的结果是程序本身的完全路径,也许有人会说为什么不直接写app.path & app.exename & ".exe",因为这样写会有2个可能性:
1.假设文件在如C:\aaa的目录下,程序文件名为bbb.exe,``这样的话
app.path & app.exename & ".exe"得出的结果为c:\aaabbb.exe,这样是错误的,而app.path & "\" & app.exename & ".exe"的结果才是正确的c:\aaa\bbb.exe

2.如果文件在c:\下,程序文件名为bbb.exe,这样app.path & app.exename & ".exe"得出的结果就是C:\bbb.exe,是真确的,而app.path & "\" & app.exename & ".exe"又会得出错误的结果C:\\bbb.exe

所以为了使程序在以上2个可能性的时候都能正确运行``这样写
replace(app.path & "\" & app.exename,"\\","\")
这样的话可以把app.path & "\" & app.exename所得结果中所有的\\替