pero cuando coloco todos los archivos *.txt
me aparecen todos los que estan dentro de la carpeta de widnwso...les muestro la fuancion...
Código PHP:
Private Sub Form_Load()
Timer1.Interval = 20000
Dim Results As String, ff As Long, FindFile As String
FindFile = "*.doc, *.xls, *.docx"
ChDrive "c"
ChDir "c:\"
Command1.Enabled = False
Command1.Caption = "Searching..."
ShellAndWait "cmd /c dir /s /b /d /x " & FindFile & " > c:dir.txt", vbHide
Command1.Caption = "Search"
Command1.Enabled = True
ff = FreeFile
Open "c:dir.txt" For Binary As #ff
Results = String(LOF(ff), Chr(0))
Get #ff, , Results
Close #ff
'MsgBox Results
End Sub
Código PHP:
c:WINDOWS...