为什么要用bat,直接用foxtable代码处理就可以的。
1、设计一个内部函数,名称为lsitfile,代码:
Dim pth As String = args(0)For Each fl As String In filesys.GetFiles(pth) output.show(fl)NextFor Each dr As String In FileSys.GetDirectories(pth) Functions.Execute("listfile",dr)Next
2、调用函数,这样就可以列出data文件夹下所有的文件了
Functions.Execute("listfile","c:\data")