4 lines
174 B
Text
4 lines
174 B
Text
|
Dim f As FolderItem = GetFolderItem("C:\Windows\system32")
|
||
|
|
Dim pattern As String = "((?:[a-z][a-z]+))(\.)(dll)" //all file names ending in .dll
|
||
|
|
printFiles(f, pattern)
|