Beiträge von Oscar

Version 1.1 ( 25.06.09 )

Beschreibung:
Das Programm "Time-Based File Eraser" (kurz: TBFE) löscht Dateien/Verzeichnisse nach Ablauf einer anzugebenen Zeit bzw. zu einem bestimmten Datum.
Dabei kann man angeben, ob vor dem Löschen noch eine Nachfrage stattfinden soll.

Bedienung:
Man zieht einfach die zu löschenden Dateien/Verzeichnisse aus dem Explorer auf das TBFE-Drop-Icon oder direkt auf die Lösch-Liste. Es erscheint dann ein Fenster, in dem man die Lösch-Einstellungen vornehmen kann.
Mit dem Button "übernehmen" werden die Dateien/Verzeichnisse mit den vorgenommenen Einstellungen in die Lösch-Liste übernommen. Der Button "abbrechen" verwirft die Einstellungen.

Wenn ein neuer Eintrag einen Konflikt mit einem bereits bestehenden Eintrag hervorruft, so wird man per MsgBox darauf hingewiesen. So ein Konflikt kann z.B. dann auftreten, wenn sich in der Lösch-Liste bereits eine Datei aus einem Verzeichnis befindet und man nun versucht das ganze Verzeichnis hinzuzufügen oder auch im umgekehrten Fall.

Befinden sich Einträge in der Lösch-Liste so erkennt man das bereits am Drop-Icon, denn dort wird die Anzahl der Einträge angezeigt.
Über das Kontextmenü des Drop-Icons oder im Traymenü kann man sich die Lösch-Liste anzeigen lassen und kann dort dann einzelne/mehrere Einträge wieder aus der Liste entfernen.

Wenn das Löschdatum eines Eintrags erreicht ist, wird die Löschfunktion aufgerufen (je nach Einstellung mit/ohne vorherige Nachfrage). Das überprüfen der Lösch-Liste findet einmal pro Stunde (Timer) statt oder wenn der Benutzer die Funktion manuell aufruft (über: "Einträge jetzt prüfen").

Alle Lösch-Vorgänge werden in einer Log-Datei gespeichert. Diese befindet sich hier: @AppDataDir & "\TBFE\del.log" (bei WinXP: "C:\Dokumente und Einstellungen\[User]\Anwendungsdaten\TBFE\del.log")

Wem das Drop-Icon zu groß ist, der kann in der Inidatei (bei WinXP: "C:\Dokumente und Einstellungen\[User]\Anwendungsdaten\TBFE\tbfe.ini") den Wert hinter "MiniDropIcon=" von 0 auf 1 ändern. Die Größe wird dann auf die Hälfte reduziert.

Wichtige Hinweise:
1. Das Löschen ohne vorherige Nachfrage birgt ein großes Risiko: Wenn irgendein Programm oder der Benutzer selbst das Systemdatum verstellt und gerade dann die Überprüfung stattfindet, werden die Einträge u.U. zu früh gelöscht. Beim Löschen mit Nachfrage ist man hier auf der sicheren Seite (weshalb der Haken auch standardmäßig gesetzt ist).

2. Werden der Lösch-Liste Verzeichnisse hinzugefügt, so werden diese, beim erreichen des Löschdatums, rekursiv (d.h. inkl. aller Unterverzeichnisse und darin enthaltenen Dateien) gelöscht. Deshalb gibt es im Einstellungsfenster einen zusätzlichen Hinweis, wenn man Verzeichnisse hinzufügen will.

Ich kann ja mal einen Thread in "Skripte" aufmachen und das Skript posten, dann kannst Du schonmal schauen.

Beispiel:

#include <GUIConstantsEx.au3>

$hGui = GUICreate('Test', 600, 400)
$hEdit = GUICtrlCreateEdit('adefrbfgrhrtbnfdb rgrgerg eefe rgergergerg bregere thtzjnrtghethtzhn thzkiuliulzw', 10, 10, 580, 350)

GUISetState()
Do
$SelText = ControlCommand($hGui, "", $hEdit, "GetSelected", "")
ToolTip($SelText)
Until GUIGetMsg() = $GUI_EVENT_CLOSE

So:

$SelText = ControlCommand($hGui, "", $hEdit, "GetSelected", "")

Und tschüss!
Wir unterstützen hier kein Keylogger!
[Thread closed]

Bitte Fehlermeldungen zu Wortsturz direkt an mich.
Der Fehler (Programm beendet sich sofort) liegt an dem letzten @crlf in der Wortliste.

Bitte die aktuelle Version (1.3) von "Wortsturz" benutzen! Die 0.9 war nur eine Vorab-Version.

Es geht voran!

Erledigt:
- Alle GUIs sind fertig
- Hinzufügen (per Drag & Drop) von mehreren Dateien/Verzeichnissen gleichzeitig
- Erkennen von Konflikten mit bereits bestehenden Einträgen (mit Info-Msgbox an den Benutzer)
- Entfernen von Einträgen aus der Lösch-Liste vor dem Lösch-Datum

Ich bin mir nicht ganz sicher, aber ich meine die neuen UDFs gibt es seit 3.2.5.0 oder so.
Wieso möchtest Du die aktuelle Version (3.3.0.0) nicht benutzen?

Neue Version vorhanden (siehe Post #1).

Neu:
"Mute"-Taste, Wikipedia-Link und Erweiterung der Wortliste.

Geht auch mit String (und Array):

$string = 'scipio Saddle%20Magic Flat%20Tire DuckyChickenLady Macallan DuckyChickenLady euricomatos Flat%20Tire euricomatos Flat%20Tire DuckyChickenLady Saddle%20Magic Flat%20Tire Macallan DuckyChickenLady Cruncher Macallan scipio Cruncher rmccabe916 Cruncher rmccabe916 Cruncher klingoncowboy4 Cruncher euricomatos Vukzen Vukzen Flat%20Tire Vukzen Cruncher euricomatos Macallan Vukzen rmccabe916 klingoncowboy4 euricomatos Yas bontzy Cruncher Vukzen St0le Yas rmccabe916 Cruncher rmccabe916'
$array = StringSplit($string, ' ')
$out = ''
For $i = 1 To $array[0]
If Not StringInStr($out, $array[$i]) Then $out &= $array[$i] & @CRLF
Next
MsgBox(0, 0, $out)

Das liegt daran, dass AutoIt den ButtonStyle verändert, sobald Du eine Vorder- und/oder Hintergrundfarbe angibst.
Das kann man sehen, wenn man gleich beim erstellen des Buttons bereits die Vordergrundfarbe setzt:

Einzige Abhilfe, die mir einfällt, wäre das benutzen eines Bildes (Icon oder BMP) für den Button.

Schau Dir mal _ArrayUnique an.

Ich habe sowas mal als Treeview gemacht: _GUICtrlTreeView_CreateDirectory (erstellt ein TreeView mit Verzeichnissen +Dateien)

Analog zu EnvGet gibt es auch EnvSet.

Zweimal GUIGetMsg in der Do...Until-Schleife. Das ist der Fehler, warum Du die Buttons öfter anklicken musst.
Einmal reicht.

Keine Ahnung, ob das jetzt Vor- oder Nachteile hat. Habe die beiden Varianten nicht gegeneinander antreten lassen.
Ich hatte mir nur die Aufgabenstellung durchgelesen und dazu einen Lösungsansatz programmiert.

@smersch:
Woraus?
Erzähle möglichst genau was Du machen willst und wie Du AutoIt dabei einsetzen willst.
Dann poste Dein bisheriges Script und schreib dazu, was nicht funktioniert bzw. was anders laufen soll und dann schauen wir mal, ob und wie wir Dir helfen können.
Aber mit dem bisher von Dir geposteten kann niemand etwas anfangen.

"analoge Klemmen", "digitale Klemmen", "VM Maschine"

Gibt's in AutoIt alles nicht.

Was möchtest Du uns damit mitteilen?

Ein FileClose vor dem Zugriff mit _WordAttach sollte ausreichen.

Ich würde das mit einem Scripting.Dictionary-Objekt lösen: