CommonDialog1.ShowSave 的使用问题？

Question

我想把C:\FILEDATA\TEST.TXT 文件通过调用另存为对话框，点保存确定后，另存在\\172.22.55.12\jrx\TEST.TXT
我是这样写的
     CommonDialog1.FileName = "\\172.22.55.12\jrx\TEST.TXT"
    CommonDialog1.ShowSave
   后面不知怎么样写了？

Answer 1

可以使用CopyFile的api函数来直接复制啊

Answer 2

后面该轮到用户按“保存”按钮了，你当然不知道怎么写了，哈哈。
如果想自动保存的话，不要使用CommonDialog。

Answer 3

嗯，刚才没看清题意，大概是这样写吧：
Private Sub Command1_Click()
On Error GoTo Err1
CommonDialog1.CancelError = True
CommonDialog1.FileName = "\\172.22.55.12\jrx\TEST.TXT"
CommonDialog1.ShowSave
FileCopy "C:\FILEDATA\TEST.TXT ", "\\172.22.55.12\jrx"
Err1:
End Sub其中“CancelError”是为了判断按“取消”的情况。但这样的前提是程序可以访问“\\172.22.55.12\jrx”