关于拷贝文件的实现,该如何处理

关于拷贝文件的实现
我想实现这样的功能:拷贝对话框打开的某个文件到指定文件夹目录下,并不改变文件名。 用filecopy可以实现吗?

------解决方案--------------------
可是实现,使用CommonDialog.ShowSave来设置文件路径,然后使用FileCopy来复制文件
------解决方案--------------------
CopyFile是API函数,FileCopy是前者在VB中的体现,都一回事。

参阅:
VB code

Option Explicit
Private Declare Function CopyFile Lib "kernel32" Alias "CopyFileA" (ByVal lpExistingFileName As String, _
                                                                    ByVal lpNewFileName As String, _
                                                                    ByVal bFailIfExists As Long) As Long
Private Sub Command1_Click()
    '前提是C盘有一个:1.txt文件
    FileCopy "C:\1.txt", "D:\1.txt"
End Sub

Private Sub Command2_Click()
    '前提是C盘有一个:2.txt
    CopyFile "C:\2.txt", "D:\2.txt", False
End Sub

------解决方案--------------------
你既然知道原文件名,为什么不能让目标文件名与原始文件名相同呢?

变通一点点啊.
------解决方案--------------------
晕倒,用户既然选择了一个文件,那你程序里就已经得到了文件名,是不?

已经有了源文件名,那就把目标文件名也用这个名字,但改一下目标目录,是不?

那么,还有什么问题?