锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net拷贝文件函数 vb 拷贝文件

IT技术删除

vb中复制文件的方法是什么？用API函数 SHFileOperation的方法 。
以下是使用SHFileOperation删除复制移动文件的例子 ， 可以复制文件夹
Private Type SHFILEOPSTRUCT
hwnd As Long
wFunc As Long
pFrom As String
pTo As String
fFlags As Integer
fAnyOperationsAborted As Long
hNameMappings As Long
lpszProgressTitle As String '只有在 FOF_SIMPLEPROGRESS 时用
End Type
Private Declare Function SHFileOperation Lib _
【vb.net拷贝文件函数 vb 拷贝文件】"shell32.dll" Alias "SHFileOperationA" (lpFileOp _
As SHFILEOPSTRUCT) As Long
'wFunc 常数
'FO_COPY 把 pFrom 文件拷贝到 pTo 。
Const FO_COPY = H2
'FO_DELETE 删除 pFrom 中的文件（pTo 忽略） 。
Const FO_DELETE = H3
'FO_MOVE 把 pFrom 文件移动到 pTo 。
Const FO_MOVE = H1
'fFlag 常数
'FOF_ALLOWUNDO 允许 Undo。
Const FOF_ALLOWUNDO = H40
'FOF_NOCONFIRMATION 不显示系统确认对话框 。
Const FOF_NOCONFIRMATION = H10
'FOF_NOCONFIRMMKDIR 不提示是否新建目录 。
Const FOF_NOCONFIRMMKDIR = H200
'FOF_SILENT 不显示进度对话框
Const FOF_SILENT = H4
Private Sub Command1_Click()
'例子：
Dim SHFileOp As SHFILEOPSTRUCT
' 拷贝
SHFileOp.wFunc = FO_COPY
SHFileOp.pFrom = "d:\MASM611"
SHFileOp.pTo = "c:\MASM611"
SHFileOp.fFlags = FOF_NOCONFIRMMKDIR
Call SHFileOperation(SHFileOp)
End Sub
或者用命令行
shell "cmd.exe /c xcopy "+chr(34)+"C:\新建文件夹 c:\aa /q /e" +chr(34)
VB.NET 复制文件夹,包括子文件夹 所有文件用 io.Directory.Exists 判断文件夹是否存在 。
再用My.Computer.FileSystem.CopyDirectory() 复制 。
VB.NET2010 如何复制指定目录下按类型的所有文件到另一文件夹 复制后再删除原来的文件？这段代码的问题是：
首先for each循环在files里查找文件对象，但是f变量声明为string了 ， 无法让它获取对象；
然后file.copy的变量file没有任何声明 ， 也没有初始化赋值等；
最后 ， 整个for each循环里查找集合files的文件，由于初始化的循环计数器仍然按照最初设定的文件数目向后递增（文件地址） ， 但是实际文件删除一部分，后续的文件位置就不能跟循环计数指针匹配了，所以默认为查找不到文件，将会报错 。一般的做法时把复制和删除分别放在2次循环里，第一次只复制文件，第二次才去删除 。
VB.NET怎么复制文件到剪切板，不是复制文件内容！例如 ， 把文件"E:\新建文件夹\a.txt"复制到剪贴板
CreateObject("Shell.Application").NameSpace("E:\新建文件夹").ParseName("a.txt").InvokeVerb "复制(C)"
关于vb.net拷贝文件函数和vb 拷贝文件的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站 。

    推荐阅读


    上一篇：如何登录格力电商，格力g平台网页登录

    下一篇：怎么取消电脑键盘上的标志，怎么取消电脑键盘上的标志图案