Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Suchscript (https://www.delphipraxis.net/100857-suchscript.html)

philipp21 4. Okt 2007 18:30


Suchscript
 
Hallo,
ich versuche ein Script zu schreiben, dass zum einem die Titel von Word und Ecxell Dateien durchläuft (Titel-Aufbau: XXXX 15.01.2007) und immer nur auf das Datum achtet und den Text vor dem Datum ignoriert. Immer wenn ein bestimmter Zeitraum vom aktuellem Datum zum Datum im Titel der Datei verstriechen ist soll 1. ein Popup aufgehen aber nur eins also nicht für alle x Dateien jeweils eins sondern nur eine Meldung das es Titel gibt die ein Datum haben das über den definierten Zeitraum herrüber sind und 2. alle Titel dieser Dateien in eine Liste hineinschreibt und diese Liste an einem bestimmten Ort unter einem bestimmten Namen abspeichert.

Ich habe zwar ein paar ansätze mit refractärer suche aber ich komm da nciht weiter, wäre echt super wenn mir jemand weiterhelfen könnte


vielen Dank!!!


String-Funktionen????, und das Script soll nur einen bestimmten Ordner durchsuchen. Aber was sicnd String Funktionen und wie bekommen ich das hin das das Script nach den NAmen der Dateien sucht und dort nur nach dem Datum da drin????

brinkee 4. Okt 2007 18:36

Re: Suchscript
 
Naja, mit ein paar String-Funktionen sollte das doch alles machbar sein. Wenn Du alle Verzeichnisse auf dem Rechner absuchen willst, dann steigst Du am besten rekursiv in alle Ordner rein und suchst Deine Dateien.

LG, Markus

P.S.: Der Rest sollte ja dann kein Problem sein...

Matze 4. Okt 2007 21:16

Re: Suchscript
 
Hallo Philipp

Zitat:

Zitat von philipp21
String-Funktionen????, und das Script soll nur einen bestimmten Ordner durchsuchen. Aber was sicnd String Funktionen und wie bekommen ich das hin das das Script nach den NAmen der Dateien sucht und dort nur nach dem Datum da drin????

Ich hoffe, du hast mich damals nicht missverstanden, auch wenn's von dir gut gemeint ist. Du sollst deinen letzten Beitrag nur dann editieren, wenn innerhalb von 24 Stunden kein Folgebeitrag hinzugekommen ist. Im oberen Fall hättest du einen neuen Beitrag erstellen sollen, sonst sieht man ja nicht, dass du dich auf diesen bezogen hast. ;)

Verzeichnisse kannst du so nach Dateien durchsuchen: FindAllFilesFindAllFiles.
Die Stringfunktionen sind Delphi-Referenz durchsuchenCopy, Delphi-Referenz durchsuchenDelete, Delphi-Referenz durchsuchenPos, Delphi-Referenz durchsuchenPosEx, Delphi-Referenz durchsuchenStringReplace und ähnliche. Evtl. empfehlen sich auch reguläre Ausdrücke zu nutzen. Damit lassen sich noch so komplexe Regeln/Muster erstellen, doch dies könnte auch etwas übertrieben für dein Vorhaben sein. Falls du's dir dennoch ansehen möchtest, gibt es hier eine Unit.

DP-Maintenance 4. Okt 2007 21:18

DP-Maintenance
 
Dieses Thema wurde von "Matze" von "Programmieren allgemein" nach "Sonstige Fragen zu Delphi" verschoben.
Ich vermute, es geht um Delphi.

philipp21 5. Okt 2007 07:48

Re: Suchscript
 
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!!??


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:45 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz