VB 复制文件 到指定共享文件夹下
Dim fs ' 先声明一个变体型
Set fs = CreateObject("Scripting.FileSystemObject") '创建文件系统对象fs
fs.copyfile "D:\copyto.txt", "E:\" '使用该对象的copyfile方法将源文件复制到目标文件
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 方法停止在它遇到的第一个错误上。不要试图回卷或撤消错误发生前所做的任何改变。
桓邵产后: 假设你要复制到的文件夹是c:\file FileCopy commondialog1.filename "c:\file\" 就可以了.
新乐市13877694203: VB中怎么将一个文件复制到指定文件夹 - ?
桓邵产后: 语法 object.CopyFile source, destination[, overwrite] CopyFile 方法语法有如下几部分:部分 描述 object 必需的.object始终是一个 FileSystemObject 的名字. source 必需的.指明一个或多个要被复制文件的字符串文件说明,它可以包括通配符...
新乐市13877694203: 在VB里用什么语句实现把文件复制到指定的文件夹目录下边啊?哪位高手指点一下,最好举个例子! - ?
桓邵产后: 文件目录 FileName1="e:\1.doc" 目标目录 FileName2="d:\001\1.doc" If Dir(FileName1) <> "" ThenFileCopy filename1,filename2 end if******************************* 楼主,FileCopy 就是复制函数.不可能删除原来的文件的.你是不是编译器出问题?我在我机器上调试正常.
新乐市13877694203: 怎么用vb复制文件到指定的文件夹里?
桓邵产后: 调用外部的dos 的copy命令,可以实现的要求... shell "cmd /c copy c:\1.doc d:\001\" 用vb的文件复制,需要指定目标文件的姓名. 不过这样不符合你的要求. Dim result, Sourcefile, Destinationfile As String result = MsgBox( "确定要复制吗? ", vbYesNo, "询问 ") If result = vbYes Then Sourcefile = "c:\1.doc" Destinationfile = "d:\001\1.doc" FileCopy Sourcefile, Destinationfile End If
新乐市13877694203: VB如何把选择的文件复制到指定文件夹?CommonDialog控 ?
桓邵产后: 假设你要复制到的文件夹是c:fileFileCopy commondialog1.filename "c:file"就可以了.
新乐市13877694203: VB如何把选择的文件复制到指定文件夹? - ?
桓邵产后: Private Sub Command1_Click() CommonDialog1.ShowSave FileCopy "D:\1.TXT", CommonDialog1.FileName End Sub
新乐市13877694203: VB中如何复制指定文件到指定文件夹,并以当前日期存放 - ?
桓邵产后: VB,将文件复制到指定目录下的同名文件夹中 (2008-09-19 09:43:17)转载标签: it分类: GIS二次开发界面如下: '——————————————————————————'名称:FindFolderInAppointFolder'作者:罗简单'日期:2008-9-19'...
新乐市13877694203: vb复制指定文件到选定的文件夹 - ?
桓邵产后: Private Type SHFILEOPSTRUCThwnd As LongwFunc As Long '对文件的操作指令pFrom As String '源文件或路径pTo As String '目的文件或路径fFlags As Integer '操作标志fAnyOperationsAborted As LonghNameMappings As Long...
新乐市13877694203: vb把全盘doc文件集中复制到指定的文件夹 - ?
桓邵产后: 在窗体中添加一个文本框text1和一个文件列表框file1,添加如下代码,运行就可以了.另外,最好生成exe可执行文件,这样的话复制就方便了.'把全盘doc文件集中复制到指定的文件夹中(如复制到c:\abc文件夹下)?能提供源代码吗?Private ...
新乐市13877694203: 怎么用VB把文件移到指定文件夹 - ?
桓邵产后: filecopy 源文件路径 , 目标全路径(全文件名)