关于拷贝文件的实现
我想实现这样的功能:拷贝对话框打开的某个文件到指定文件夹目录下,并不改变文件名。 用filecopy可以实现吗?
[解决办法]
可是实现,使用CommonDialog.ShowSave来设置文件路径,然后使用FileCopy来复制文件
[解决办法]
CopyFile是API函数,FileCopy是前者在VB中的体现,都一回事。
参阅:
Option ExplicitPrivate Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, _ ByVal lpNewFileName As String, _ ByVal bFailIfExists As Long) As LongPrivate Sub Command1_Click() '前提是C盘有一个:1.txt文件 FileCopy "C:\1.txt", "D:\1.txt"End SubPrivate Sub Command2_Click() '前提是C盘有一个:2.txt CopyFile "C:\2.txt", "D:\2.txt", FalseEnd Sub
[解决办法]
你既然知道原文件名,为什么不能让目标文件名与原始文件名相同呢?
变通一点点啊.
[解决办法]
晕倒,用户既然选择了一个文件,那你程序里就已经得到了文件名,是不?
已经有了源文件名,那就把目标文件名也用这个名字,但改一下目标目录,是不?
那么,还有什么问题?