读书人

在Vista下 VB6.0 用不了 FileCopy 命令

发布时间: 2012-02-22 19:36:55 作者: rapoo

在Vista下 VB6.0 用不了 FileCopy 命令!!!!! 帮忙!!!
在Vista下 VB6.0 用不了 FileCopy 命令!!!!! 帮忙!!!
急啊!


请高手帮助,或有其它方法?

我不想用象DOS的 shell BAT文件 的方法啊。。。因为反回不了数据。。

感激大家!!

[解决办法]
用Windows API CopyFile
[解决办法]
Private Function CopyFile(ByVal Source As String, ByVal Destination As String) As Long
Dim tFile As SHFILEOPSTRUCT

With tFile
.wFunc = FO_COPY
.pFrom = Source
.pTo = Destination
.fFlags = FOF_ALLOWUNDO And FOF_SIMPLEPROGRESS
End With

CopyFile = SHFileOperation(tFile)

End Function
[解决办法]
……普通用户对安装目录没有写入权限的
你应该写入到用户的我的文档目录或者应用程序数据目录
[解决办法]
蒋大哥一语中的

读书人网 >VB

热点推荐