Ich möchte ein Script bauen welches Dateien an Hand eines Hashwertes wie MD5 oder so erkennt. Nicht am Dateinnamen oder der Größe oder der Version.
Habe mich in der AutoIt Hilfe schon gesucht und nix brauchbares gefunden.
LG
Schnuecks
Ich möchte ein Script bauen welches Dateien an Hand eines Hashwertes wie MD5 oder so erkennt. Nicht am Dateinnamen oder der Größe oder der Version.
Habe mich in der AutoIt Hilfe schon gesucht und nix brauchbares gefunden.
LG
Schnuecks
Das ist auch eine Möglichkeit die ich noch gar nicht bedacht habe und zudem um einiges komfortabler.
Ich danke dir für Deine Mühe. Mir reichts es für heute und ich habe denke ich ne Menge gelernt.
LG & Gut Nacht & vielen vielen Dank
Schnuecks
Edit:30.07.2007
BTW: Das Thema kann als gelöst angesehen werden, meinerseits.
Und nochmals vielen Dank, an alle
Das funktioniert jetzt wunderbar.
Eine kleine Idee zur Vervollständigung hätte ich noch.
Ich dachte da an folgendes:
[autoit]Local $prio = InputBox("Priorität eingeben", "0 - Niedrig" & @crlf & "1 - Niedriger als normal" & @crlf & "2 - Normal" & @crlf & "3 - Höher als Normal" & @crlf & "4 - Hoch" & @crlf & "5 - Echtzeit - Vorsicht", "2")
[/autoit]um dann weiter unten im Script
[autoit]For $i = 1 To $a_iniindex[0][0] Step 1
If $a_iniindex[$i][1] <> "" Then
If ProcessExists($a_iniindex[$i][1]) <> 0 Then
ProcessSetPriority($a_iniindex[$i][1], $prio)
EndIf
EndIf
Next
Ich möchte das die Box erscheint und erstens nur der Wert zwischen 0 und 5 eingegeben werden kann und wenn man den Cancel Button der Box drückt das Script beendet wird.
Ich bin von Euch begeistert ![]()
Danke, werde ich mir mal anschauen und evtl. einbauen.
Wie bekomme ich im Tray Icon das Menü Pause weg, wenn ich das Exit behalten möchte.
Ich hatte mal etwas mit probiert das hat mir zwar ein Menü angezeigt aber das eigentlich Script dann nicht mehr berücksichtigt.
Wo liegt der Fehler?
#Include <Constants.au3>
#NoTrayIcon
HotKeySet("!q", "ende") ; HotKey Alt+e zum Beenden
Func ende()
Exit
EndFunc
Opt("TrayMenuMode",1) ; Default tray menu items (Script Paused/Exit) will not be shown.
[/autoit] [autoit][/autoit] [autoit]$aboutitem = TrayCreateItem("About")
TrayCreateItem("")
$exititem = TrayCreateItem("Exit")
TraySetState()
[/autoit] [autoit][/autoit] [autoit]While 1
$msg = TrayGetMsg()
Select
Case $msg = 0
ContinueLoop
Case $msg = $aboutitem
Msgbox(64,"About:","Zum Testen")
Case $msg = $exititem
ExitLoop
EndSelect
WEnd
Exit
;Script
$ini = "ProcessNames.ini"
$arProcess = IniReadSection($ini, "Process")
While 1
For $i = 1 To $arProcess[0][0]
If ProcessExists($arProcess[$i][1]) Then
ProcessSetPriority($arProcess[$i][1], 0)
EndIf
Next
Sleep(1000) ; Überprüfungs-Intervall, hier 1 Sekunde
WEnd
LG
Schnuecks
Ok Doppelposts werden vermieden ![]()
Ist ja auch weiter keine Problem das Teil neuzustarten wenn etwas geändert wurde.
Vielen Dank
Schnuecks
Da ist sie schon ![]()
Kann man es unterbinden das man das Script neustarten muss, wenn man in der .ini etwas ändert?
Vielen Dank schonmal an alle.
Die Lösung von BugFix hat mir sehr geholfen. Ich musste lediglich in der .ini noch die Wert ändern z. B. 001 --> 1 dann gings.
Falls ich noch Fragen habe werde ich mich nicht schäuen sie Euch zu stellen XD
LG
Schnuecks
Habe es auf meine weise gelöst nur weis ich nicht ob das jetzt eine gute ist. Wenn ich das Script jetzt starte hat die CPU ne Auslastung von um die 40% das will ich natürlich nicht so haben. Ich zeige Euch hier nochmal was ich bis jetzt gemacht habe.
1. die INI
2. die variablen.au3
;Variablen.au3
$ini = "ProcessNames.ini"
$var01 = IniRead($ini, "Process", "001","")
$var02 = IniRead($ini, "Process", "002","")
$var03 = IniRead($ini, "Process", "003","")
$var04 = IniRead($ini, "Process", "004","")
$var05 = IniRead($ini, "Process", "005","")
$var06 = IniRead($ini, "Process", "006","")
$var07 = IniRead($ini, "Process", "007","")
$var08 = IniRead($ini, "Process", "008","")
$var09 = IniRead($ini, "Process", "009","")
$var10 = IniRead($ini, "Process", "010","")
$var11 = IniRead($ini, "Process", "011","")
$var12 = IniRead($ini, "Process", "012","")
$var13 = IniRead($ini, "Process", "013","")
$var14 = IniRead($ini, "Process", "014","")
$var15 = IniRead($ini, "Process", "015","")
$var16 = IniRead($ini, "Process", "016","")
$var17 = IniRead($ini, "Process", "017","")
$var18 = IniRead($ini, "Process", "018","")
$var19 = IniRead($ini, "Process", "019","")
$var20 = IniRead($ini, "Process", "020","")
3. das Script selbst
#cs ----------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]Author: Schnuecks
[/autoit] [autoit][/autoit] [autoit]Script Function:
ProcessWatcher script.
#ce ----------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]#include "variablen.au3"
[/autoit] [autoit][/autoit] [autoit];Endlosschleife
While -1
;Process 1
If ProcessExists($var01) Then
ProcessSetPriority($var01, 0)
EndIf
;Process 2
If ProcessExists($var02) Then
ProcessSetPriority($var02, 0)
EndIf
;Process 3
If ProcessExists($var03) Then
ProcessSetPriority($var03, 0)
EndIf
;Process 4
If ProcessExists($var04) Then
ProcessSetPriority($var04, 0)
EndIf
;Process 5
If ProcessExists($var05) Then
ProcessSetPriority($var05, 0)
EndIf
;Process 6
If ProcessExists($var06) Then
ProcessSetPriority($var06, 0)
EndIf
;Process 7
If ProcessExists($var07) Then
ProcessSetPriority($var07, 0)
EndIf
;Process 8
If ProcessExists($var08) Then
ProcessSetPriority($var08, 0)
EndIf
;Process 9
If ProcessExists($var09) Then
ProcessSetPriority($var09, 0)
EndIf
;Process 10
If ProcessExists($var10) Then
ProcessSetPriority($var10, 0)
EndIf
;Process 11
If ProcessExists($var11) Then
ProcessSetPriority($var11, 0)
EndIf
;Process 12
If ProcessExists($var12) Then
ProcessSetPriority($var12, 0)
EndIf
;Process 13
If ProcessExists($var13) Then
ProcessSetPriority($var13, 0)
EndIf
;Process 14
If ProcessExists($var14) Then
ProcessSetPriority($var14, 0)
EndIf
;Process 15
If ProcessExists($var15) Then
ProcessSetPriority($var15, 0)
EndIf
;Process 16
If ProcessExists($var16) Then
ProcessSetPriority($var16, 0)
EndIf
;Process 17
If ProcessExists($var17) Then
ProcessSetPriority($var16, 0)
EndIf
;Process 18
If ProcessExists($var18) Then
ProcessSetPriority($var18, 0)
EndIf
;Process 19
If ProcessExists($var19) Then
ProcessSetPriority($var19, 0)
EndIf
;Process 20
If ProcessExists($var20) Then
ProcessSetPriority($var20, 0)
EndIf
WEnd
[/autoit]Bitte seit nicht so streng mit mir
ich kanns halt noch nicht besser ![]()
Könnts ihr mir noch bissl weiterhelfen, wie ich die CPU Last reduzieren kann.
Wenn ich dann in der .ini etwas ändere muss ja das Script neu gestartet werden, das müsste doch irgendwie machbar sein.
LG
Schnuecks
Hallo zusammen,
um gleich zur Sache zu kommen.
Ich erstelle (versuche) gerade ein Script zu erstellen das auf einige Prozesse achten soll die in einer .ini gelistet sind.
Wenn jetzt nun einer der Prozesse aus der .ini gestartet wird, soll dieser die Priortät "Hoch" bekommen.
Hier mal die .ini
hier der Beginn
$var = IniRead($ini, "Process", "001","")
[/autoit] [autoit][/autoit] [autoit]If ProcessExists($var) Then
ProcessSetPriority($var, 0)
EndIf
Wie stelle ich es an, das er "alle" Prozesse die in der .ini eingetragen sind überwacht und wenn der Prozess startet, auch gleich dessen Priorität ändert?
Fragt nicht nach dem Sinn dieses Scripts es soll lediglich zu meinen eigenen Testzwecken verwendet werden. Aber genau deshalb benötige ich etwas Hilfestellung dabei.
LG
Schnuecks
Aber genau da besteht das Problem. Wenn mein Passwort 1234abcd lautet brauch ich mich nicht wundern wenn jemand meinen Account missbraucht, fakt.
Von abwälzen kann gar keine Rede sein, nur man kann eben nicht vor allem gefeit sein, das ist quasi unmöglich.
Irgendwo ne Lücke zu dafür woanders wieder 2 auf. Gegen diese Katz und Mausspiele hat man eben kaum ne Chance. Man kann aber versuchen länger die Katze zu bleiben ![]()
Verantwortlich ist erst mal jeder bei sich selbst. Und solange niemandem wirklicher Schaden enstanden ist erst recht nicht.
LG
Schnuecks
Dazu reicht ein Zugang zum ACP oder zur DB, da brauchst Du nicht mal eine Adresse gesehen zu haben.
Man kann sich natürlich auch die Mühe machen und alles einzeln versenden, aber wozu.
/off-topic on
Ist schon unangenehm wenn man jemanden in seinem Board hat. Aber zum Thema Sicherheit solltet ihr alle mal woanders anfangen. All Eure Emails gehen zum Beispiel unverschlüsselt übers Netz das heisst alles kann problemlos mitgelesen werden, es sei denn ihr habt PGP oder ähnliches. Das sind Probleme die einen interressieren sollen, aber nicht solche Kleinigkeiten hier.
/off-topic off
Es gibt genug Addons fürs WBB die diese Probleme fast alle aus der Welt schaffen können, sie müssen nur genutzt werden.
LG
Schnuecks
Diese Geschichten hatte ich damals bei mir im Board auch. Ich hatte mir damals das CT-Security System eingebaut und zack war von einem auf den anderen Tag Ruhe.
Ich war danach zwar noch Ziel von Attacken aber diese liefen alle ins leere. Da das Board aber vor 2 Monaten von mir aus Zeitmangel geschlossen wurde habe ich auch leider keinen Link mehr dazu.
Aber versuchts der Einbau ist nicht sonderlich schwierig und erspart einem solche Scriptkiddy Attacken ![]()
LG
Schnuecks
hi,
mit ProcessExists und ProcessClose und so arbeite ich ja auch. Nur werden die Programme dann einfach rausgeschmissen und nicht normal beendet.
Habe eben im AutoIt FOrum ein Systray_UDF gefunden und hab auch schon kleine Tests mit gemacht.
Mal schauen wie es läuft.
Danke
Schnuecks
Hallo zusammen,
wenn ein Programm im Systray ist, gibt es ja die Möglichkeit dieses per Rechtsklick zu beenden. Wie kann ich das realisieren.
Hat da jemand eine Idee??
LG
Schnuecks
es sind lokale Drucker. Es sollen sowohl der Drucker als auch der dazugehörige Treiber gelöscht werden.
LG
Schnuecks
Hallo,
ich würde gerne per Script auf mehreren PC die gleichen Drucker löschen lassen. Die Drucker haben auch überall die gleiche Bezeichnung.
LG
Schnuecks
So mein Teil dazu ![]()
Ich bin Schnuecks.
Ich arbeite in einer Firma in der öffentlichen Verwaltung, bitte nicht schimpfen^^. Dort bin ich für die Netzwerkbetreung und Support sowie für diverse Installationen zuständig. Seit kurzem setzen wir auch AutoIt ein um manche Installationen komfortabler zu machen und sie dann hessenweit in der Verwaltung einzusetzen. Damit dort nicht jeder die gleiche Arbeit machen muss.
Da ich in AutoIt noch relativ neu bin werde ich Euch bestimmt des öfteren auf die Nerven gehen.
LG
Schnuecks
Ich habe ein kleines Problem damit ![]()
;~ 4 Do not display a progress dialog box.
;~ 8 Give the file being operated on a new name in a move, copy, or rename operation if a file with the target name already exists.
;~ 16 Respond with "Yes to All" for any dialog box that is displayed.
;~ 64 Preserve undo information, if possible.
;~ 128 Perform the operation on files only if a wildcard file name (*.*) is specified.
;~ 256 Display a progress dialog box but do not show the file names.
;~ 512 Do not confirm the creation of a new directory if the operation requires one to be created.
;~ 1024 Do not display a user interface if an error occurs.
;~ 2048 Version 4.71. Do not copy the security attributes of the file.
;~ 4096 Only operate in the local directory. Don't operate recursively into subdirectories.
;~ 9182 Version 5.0. Do not copy connected files as a group. Only copy the specified files.
_FileCopy("c:\Downloads\Systemsoftware_INSTALL\Windows Updates\WindowsXP-KB835935-SP2-DEU.exe" ,"C:\")
Func _FileCopy($fromFile,$tofile)
Local $FOF_RESPOND_YES = 16
Local $FOF_SIMPLEPROGRESS = 512
$winShell = ObjCreate("shell.application")
$winShell.namespace($tofile).CopyHere($fromFile,$FOF_RESPOND_YES)
EndFunc
Kopieren der Dateien funktioniert, nur die Optionen funktionieren nicht.
Ok habe mich mittlerweile etwas schlauer gemacht, das die Optionen Wildcards nicht funktionieren. Wäre aber schon kann man das irgendwie lösen.
Quelle:
http://www.autoitscript.com/forum/lofivers…php?t32196.html
In dem Ordner den ich kopieren will sind aber einige verschieden Dateitypen drin. Wie löse ich mein Problemchen ![]()
Ok
habe jetzt die Lösung des Problems hier gefunden
http://www.autoitscript.com/forum/index.php?s=&showtopic=26374&view=findpost&p=187997
Falls sich jemand die Mühe schon gemacht hat, trotzdem danke. ![]()
LG
Schnuecks
Also mit ändern der Registry funktioniert soweit. Das einzige ist das ich den LAN-Adapter nach der änderung deaktivieren und aktivieren muss damit die änderungen greifen.
Nur wie, kein Plan.
LG
Schnuecks
Danke schonmal
Hi zusammen,
ich benötige ein Script das mir meine lokalen IP-Adressen wechseln kann. Ich bräuchte ein Script wo man die möglichkeit mehrere Ip-Adressen inkl Subnetz auszuwählen. Habe schonmal nach irgendwelchen Freeware Tools gesucht aber nichts wirklich brauchbares gefunden.
Ist sowas mit AutoIt möglich ??
LG
Schnuecks