当前位置: 代码迷 >> Lotus >> 怎样用LOTUSSCRIPT对某一个指定的目录进行搜索?解决办法
  详细解决方案

怎样用LOTUSSCRIPT对某一个指定的目录进行搜索?解决办法

热度:105   发布时间:2016-05-05 07:15:53.0
怎样用LOTUSSCRIPT对某一个指定的目录进行搜索?
Sub Click(Source As Button)
Dim pathName As String, fileName As String  
pathName$ = "c:\*.*"  
fileName$ = Dir$(pathName$, 0)  
Do While fileName$ <> ""  
Print fileName$  
fileName$ = Dir$()  
If fileName$="abc.doc" Then
Kill "C:\"+fileName$  
End If  
source1 = "C:\"+fileName$  
destination = "D:\"+fileName$  
Filecopy destination ,source1  
Loop  
End Sub
这个代码只能搜索c根目录下的东西,如果需要搜索子目录里的文件该怎么处理?
谢谢

------解决方案--------------------
Dir$后面的参数不是可以指定成这几种吗?
Normal file
Hidden file
System file
Volume label
Directory
你把他指定成0,也就是Normal file了,这样当然就只能取到普通文件了。
要查找Directory你应该指定成16,然后用递归来遍历所有的路径。
  相关解决方案