access vba 复制文件夹
2015-09-18 20:45
567 查看
用vba完成文件夹的复制,需要使用FileSystemObject对象来完成,FileSystemObject的copyfolder方法可以把文件夹从一个地方复制到另一个路径。下面是一个示例代码:
Private Sub CommandButton1_Click()
Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")
fso.CopyFolder "d:\a", "e:\"
Set fso = Nothing
End Sub
Private Sub CommandButton1_Click()
Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")
fso.CopyFolder "d:\a", "e:\"
Set fso = Nothing
End Sub
相关文章推荐
- Outlook 批量发送邮件
- VBA将excel数据表生成JSON文件
- excel vba 限制工作表的滚动区域代码
- VBA解决Windows空当接龙的617局
- excel vba 高亮显示当前行代码
- Access 2000 数据库 80 万记录通用快速分页类
- 十万条Access数据表分页的两个解决方法
- VB6实现连接Access数据库的ADODB代码实现方法
- Access中字段上自动打开的输入法的解决方法
- Access to SQLserver 数据库生迁脚本编写器(DB_CreateSqlEV1.06下载)
- asp Access数据备份,还原,压缩类代码
- VBA中连接SQLSERVER数据库例子
- VB使用ADO操作Access数据库
- Access转成SQL数据库的方法
- 文本、Excel、Access数据导入SQL Server2000的方法
- Access 数据类型与 MS SQL 数据类型的相应
- ASP代码实现自动清除替换ACCESS(MDB)数据库的日文字符的
- 通过asp程序来创建access数据库
- Access转SqlServer的注意事项
- SQL Server数据复制到的Access两步走