在vb中这样复制文件为啥不行？
FileCopy ThisWorkbook.Path & "\" & "wyh1225.xls", ThisWorkbook.Path & "\" & "sdf.xls"
[bo][un]水中无月[/un] 在 2008-7-10 20:37 的发言：[/bo]
Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long
这个是VB的定义
Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String, ByVal bFailIfExists As Long) As Long
这个是VB的定义
哪如何实现复制的功能？
请给vb的代码！