在vb中怎么实现整个目录的复制 vb中复制文件
Shell "cmd /c rd /s/q d:\123"
删除d:\123下的所有文件和文件夹。
新建一个工程，点击VB菜单 “工程”，选择“引用”，在弹出的对话框中，勾选“microsoft scripting runtime”，点击确定。
在Form窗体中增加一个Commandbotton控件。
复制粘贴如下代码：
Private Sub Command1_Click()
Dim fs As New Scripting.FileSystemObject
fs.CopyFolder "c:\Temp", "d:\"
Set fs = Nothing
End Sub
以上代码是将c盘TEMP目录（含文件夹内所有文件及目录）复制到d盘根目录下！
VB复制文件夹中文件，以指定路径的文件夹中文件复制到另一个文件夹！~
VB6.0使用CopyFile 方法来实现把一个或多个文件从一个地方复制到另一个地方。
CopyFile 方法。
描述，把一个或多个文件从一个地方复制到另一个地方。
语法：
说明
通配符只能用在 source 参数的最后一个路径部件。例如你可以在下面请况使用通配符：
FileSystemObject.CopyFile "c:\mydocuments\letters\*.doc", "c:empfolder\"
但下面情况不能使用：
FileSystemObject.CopyFile "c:\mydocuments\*\R1???97.xls", "c:empfolder"
如果 source 包含通配符或 destination以路径分隔符（\）为结尾，则认为 destination是一个已存在文件夹，在其中复制相匹配的文件。否则认为 destination 是一个要创建文件的名字。不论是那种情况，当复制一个文件时，可能发生三种事件。
1. 如果 destination 不存在，source 得到复制。这是通常的情况。
2.如果 destination 是一个已存在的文件，则当 overwrite 值为 False 时发生一个错误，否则，source的复制文件将试图覆盖已存在文件。
3.如果 destination 是一个目录，发生一个错误
如果使用通配符的 source 不能和任何文件匹配，同样产生一个错误。CopyFile 方法停止在它遇到的第一个错误上。不要试图回卷或撤消错误发生前所做的任何改变。
用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 _
"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中怎么实现整个目录的复制
答：文件的复制、删除、修改操作没有针对整个目录的，所以要实现，必须一个文件一个文件的来。如果要简单一些，可以直接调用CMD命令，例如删除目录用rd /s/q 盘符:\某个文件夹 ，这样整个文件夹所有的文件和文件夹都删除了，VB中就用：Shell "cmd /c rd /s/q d:\123"删除d:\123下的所有文件和文件...
VB怎样将文件夹复制到指定位置,注意是文件夹。
答：VB复制文件夹使用CopyFolder方法实现。CopyFolder 方法 描述 从一个地方递归地复制一个文件夹到另一个地方。语法 object.CopyFolder source, destination[,overwrite]实现代码中的source路径不能有错，否则VB报错。将C盘下的Program Flles目录夹复制到D盘Program Flles目录夹的实际代码如下：Private Sub Command...
VB怎么用filecopy复制文件夹?
答：VB复制文件夹使用CopyFolder方法实现。CopyFolder 方法 描述 从一个地方递归地复制一个文件夹到另一个地方。语法 object.CopyFolder source, destination[, overwrite]实现代码中的source路径不能有错，否则VB报错。将C盘下的Program Flles目录夹复制到D盘Program Flles目录夹的实际代码如下：Private Sub Comman...
vb复制文件夹有几种方法?
答：首先你说的这几种方法都可以有相应的实现方法，下面一一列举：1.vb函数实现复制文件夹。首先要指出，vb有6个基本的关于文件或文件夹操作的函数：(1)建立文件夹的函数MkDir;(2)改变当前文件夹ChDir;(3)删除文件夹RmDir;(4)删除文件kill;(5)复制文件FileCopy;(6)文件的改名和移动。但却没有直接的文...
VB将程序所在的文件夹里的文件复制到指定文件夹里
答：比如把当前程序所在目录的a.txt复制到d盘123目录下名为a.txt,则可用如下语句 FileCopy App.Path & "/a.txt""d:/123/a.txt"FileCopy "源文件""目标路径和文件名"
请问VB中什么函数可以复制文件夹中的所有文件,包括子文件夹?-编程_百度...
答：如果 destination 不存在，source 文件夹和它所有的内容得到复制。这是通常的情况。如果 destination 是一个已存在的文件，则发生一个错误。如果 destination 是一个目录，它将尝试复制文件夹和它所有的内容。如果一个包含在 source 的文件已在 destination 中存在，当 overwrite 为 False 时发生一个错误，...
VB 6.0怎样实现目录复制?在线等!
答：二楼的代码可以,你建一个TXT文件,把下面的代码放进去,再把后缀名改为FRM,然后生成EXE就可以了 VERSION 5.00 Begin VB.Form Form1 BorderStyle = 3 'Fixed Dialog Caption = "目录复制助手"ClientHeight = 1605 ClientLeft = 45 ClientTop = 435 ClientWidth = 3630 LinkTopic = "Form1"MaxButton...
VB如何实现移动整个文件夹?(包括当中的子文件夹)
答：最简单的方法是调用FSO组件：Private Sub Command1_Click()Dim fso As Object, folder As ObjectSet fso = CreateObject("Scripting.FileSystemObject")If fso.FolderExists(Text1.Text) Then Set folder = fso.GetFolder(Text1.Text) If fso.FolderExists(Text2.Text) Then folder.Move Text2...
VB中怎么复制文件夹啊,文件夹的源路径和目标路径是用folderbrowsedialog选...
答：这个很简单：比如把C:\aa目录中所有文件复制到D:\aa中，只要一行代码 Shell "xcopy C:\aa D:\aa\ /e /c /y", 0 /E 复制目录和子目录，包括空的 /C 即使有错误，也继续复制 /Y 禁止提示以确认改写文件 后面加0表示以隐藏方式运行 加的这些参数都是为了隐蔽性和自动性加的 目标文件夹...
VB将当前目录底下的文件夹复制或者剪切到指定位置
答：1 最简单的方法用shell执行dos命令：复制 shell "xcopy " & app.path & "\新建文件夹 D:\"剪切 shell "move " & app.path & "\新建文件夹 D:\"2 复杂的办法是,用dir()函数找到文件夹下的每个文件，先用mkdir创建文件夹 然后用copyfile复制文件到上面的文件夹 如果是剪切，复制后用 ...
