|
Registriert seit: 29. Sep 2007
21 Beiträge
|
Re: Suchscript
5. Okt 2007, 08:48
Option Explicit
Const ORDNERPFAD = "c:\"
Const SUCHSTRING = "Dateina"
Dim Ordner, Datei
Set Ordner = CreateObject("Scripting.FileSystemObject").GetFold er(ORDNERPFAD)
For Each Datei In Ordner.Files
If Instr(LCase(Datei.Name), LCase(SUCHSTRING)) > 0 Then
WScript.Echo Datei.Path
End If
Next
ok kann mal jamand (BIIITTTTEEEE) darauf schauen ab das Script funktionierrt?? aber meine Frage: Wie bringe ich hier die Datumssuche rein, die Variable vor dem Datum und und die ausgabe in einem Dokument!!??
|