例如拷贝所有文件名为"订单"开头的Execl文件
Dim files() As String = System.IO.Directory.GetFiles("F:\源目录", "订单*.xls")
For Each file As String In files FileSys.CopyFile(file ,"f:\目标目录\" & FileSys.GetName(file) , True) Next
加好友 
发短信
Post By：2015/11/19 13:57:00 [显示全部帖子]
