1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. bugmenot1

Beiträge von bugmenot1

  • CCleaner-Starter

    • bugmenot1
    • 13. Januar 2016 um 19:35

    Hallo, ich habe einen kleinen Skript erstellt, der CCleaner startet, eine Reinugung durchführt und den PC anschließend runterfährt. Ich habe jedoch Zweifel am zweiten Absatz des Skripts, bei der 1. Schleife. Könnte das gutgehen? Order gibt es eine klügere Art das zu lösen? Oder fährt der meinen PC immer wieder runter bis der zerstört ist? :P

    MfG

    AutoIt
    #RequireAdmin
    HotKeySet("{ESC}", "_Exit")
    AutoitSetOption('MouseCoordMode', 0)
    
    
    ShellExecute("C:\Program Files\CCleaner\CCleaner64.exe")
    Sleep(5000)
    WinWait("Piriform CCleaner")
    WinActivate("Piriform CCleaner")
    MouseClick("primary", 992, 554, 2) ; Button zum starten von CCleaner drücken
    
    
    
    
    While 1
    IF ProcessExist("CCleaner64.exe") = False
       Then Shutdown(1)
       Else Sleep(20000)    ; Wenn CCleaner fertig ist, soll der PC runtergefahren werden.
    WEnd
    
    
    
    
    
    
    Func _Exit()
       Exit
    EndFunc
    Alles anzeigen
  • Active Directory Funktionen - Neue Version 1.5.0.0 freigegeben!

    • bugmenot1
    • 25. Mai 2012 um 13:52

    Verdammt du bist es :)
    Hab in meinem Script weiter unten _AD_Open und auch Close zwar eingetragen, aber nicht an der Stelle wo ich deinen Code eingefügt habe ;)
    Soll heißen jetzt funktioniert es!
    Dankeschön :)

    Schönes Wochenende :)

  • Active Directory Funktionen - Neue Version 1.5.0.0 freigegeben!

    • bugmenot1
    • 25. Mai 2012 um 13:33

    Thx für deine sau schnelle Antwort :)
    Ich glaube diese Funktion hab ich sogar schonmal probiert, allerdings kommt da leider folgende Fehlermeldung:

    Code
    C:\Program Files (x86)\AutoIt3\Include\AD.au3 (1271) : ==> Variable must be of type "Object".:
    $oAD_Command.Properties("Searchscope") = $iAD_SearchScope
    $oAD_Command^ ERROR

    Leider kann ich damit mal so ziemlich gar nichts anfangen :)

  • Active Directory Funktionen - Neue Version 1.5.0.0 freigegeben!

    • bugmenot1
    • 25. Mai 2012 um 12:58

    water

    Hi,
    hab da ne Frage...
    Ist es möglich mit deiner UDF alle Computer aus dem AD auszulesen und in ein Array zu schreiben?
    Also z.B. ich möchte alle PCs, deren Name mit CX- oder mit VM- anfängt...

    Hab dazu jetzt nicht wirklich etwas funktionierendes gefunden...
    Es gäbe zwar die manuelle Möglichkeit mit csvde und dann anhand der Excel Liste Filtern und selbst eine Datei nur noch mit den Namen erstellen, aber das ist erstens zeitaufwendig und zweitens hat die Liste immer nur den Stand der Erstellung. . .

    Grüße
    Markus

    P.S.: Ansonsten is ne verdammt coole UDF :) Hat mir mein Admin Leben um einiges erleichtert :)

  • IniRead und Variablen

    • bugmenot1
    • 10. Mai 2012 um 07:03

    peethebee
    Danke du bist einfach ein Gott :)
    Macht das Script wesentlich kürzer und nicht so Fehleranfällig :)

    Ah und noch generell Danke für die verdammt schnellen Antworten ;)

    Grüße

  • IniRead und Variablen

    • bugmenot1
    • 9. Mai 2012 um 18:05

    Hallo Zusammen,
    ist es möglich per IniRead AutoIT Variablen auszulesen und zu verwenden?
    Sprich ich schreibe in eine .ini Datei z.B. folgendes:

    Code
    [Q_Verzeichnis]
    Pfad="C:\Users\@UserName\Downloads"

    und möchte dann in AutoIT, dass im Code daraus dann C:\Users\Markus\Downloads wird.
    Da das wohl nicht direkt geht habe ich mir überlegt erst einen anderen Wert aus der .ini Datei auszulesen (über welchen ich dann festlege: Wenn User=1 Dann @UserName) und dann in per IniWrite oder ähnlich den Grundpfad mit der Variable in AutoIT zusammen baue, um ihn dann im Anschluss verwenden kann.

    Grüße

  • Digitaluhr

    • bugmenot1
    • 12. April 2012 um 11:09

    Hallo Oscar,
    was mir gerade aufgefallen ist, wenn der Hintergrund der Uhr transparent ist, dann kann ich auf Windows 7 Professional x64 nicht mehr durch diese hindurchklicken, bei XP ging das noch.
    Haben das Problem noch andere oder bin ich hier allein?
    (Wenn in den Kompatibilitätseinstellungen von Windows "Desktopgestaltung deaktivieren" angehakt ist, dann funktioniert das hindurchklicken, allerdings sieht dann der Desktop sehr bescheiden aus :)

    Grüße

  • Profil Ordner verschieben

    • bugmenot1
    • 17. Dezember 2010 um 09:35

    Ich denke das Mapping als Netzlaufwerk im Script bringt auch nichts, da ich die Ordner vorher zum Teste bereits manuell gemappt habe und das Script die Ordner dann auch nicht kopieren konnte, bzw. das Datum auslesen.

  • Profil Ordner verschieben

    • bugmenot1
    • 17. Dezember 2010 um 09:17

    So hier mal mein bisheriger Code:
    (Wenn ich das Script direkt auf dem Server ausführe, dann funktioniert es wie gewünscht. Wollte es erst von einem anderen Server laufen lassen, aber wenn nicht möglich, dann halt eben nicht :D )
    Es wird noch nichts wie im Script beschrieben verschoben, sondern erstmal nur kopiert.

    Spoiler anzeigen
    [autoit]

    #cs ----------------------------------------------------------------------------

    [/autoit] [autoit][/autoit] [autoit]

    AutoIt Version: 3.3.6.1
    Author: $cR!pT k!ddY

    [/autoit] [autoit][/autoit] [autoit]

    Script Function:
    Dieses Script verschiebt die Profilordner, das Startmenü, den Desktop und die
    Anwendungsdaten von Usern, die bereits X Tage ausgeschieden sind.
    (Hierzu wird das letzte Änderungsdatum der jeweiligen Ordner genommen!)

    [/autoit] [autoit][/autoit] [autoit]

    Variablen:
    $appFolder Verzeichnis, in dem die CITRIX Anwendungsdaten liegen
    $deskFolder Verzeichnis, in dem der CITRIX Desktop liegt
    $profileFolder Verzeichnis, in dem die CITRIX Profile liegen
    $startFolder Verzeichnis, in dem das CITRIX Startmenü liegt
    $FilterFolder Filter für die Ordnersuche "*"

    [/autoit] [autoit][/autoit] [autoit]

    Achtung!!
    $profileFolder muss zwingend ein lokaler Pfad und kein UNC Pfad sein, da
    sonst das Änderungsdatum der Profil Ordner nicht ausgelesen werden kann.
    #ce ----------------------------------------------------------------------------

    [/autoit] [autoit][/autoit] [autoit]

    ;$cR!pT Start

    [/autoit] [autoit][/autoit] [autoit]

    ;Includes
    #include <array.au3>
    #Include <Date.au3>
    #include <File.au3>
    ;==>Includes

    [/autoit] [autoit][/autoit] [autoit]

    ;Variablen
    $appFolder = "\\fs-piagms05\cx$\Anwendungsdaten\" ;Ordner, in dem sich die Anwendungsdaten befinden
    $deskFolder = "\\fs-piagms05\cx$\Desktop\" ;Ordner, in dem sich der Desktop befindet
    $profileFolder = "G:\CX$\Profile\" ;Ordner, in dem sich die Profile befinden
    $startFolder = "\\fs-piagms05\cx$\Startmenue\" ;Ordner, in dem sich das Startmenü befindet

    [/autoit] [autoit][/autoit] [autoit]

    $FilterFolder = "*" ;Ordner Filter festlegen
    ;==>Variablen

    [/autoit] [autoit][/autoit] [autoit]

    ;Array
    Dim $Array[1] ;Array deklarieren
    $Array[0] = 0 ;Array Größe festlegen
    ;==>Array

    [/autoit] [autoit][/autoit] [autoit]

    Folders($profileFolder) ;Variable $profileFolder in Function Folders als $Pfad schreiben
    Func Folders($Pfad) ;Funktion um Array zu befüllen
    $arr = _FileListToArray($Pfad, $FilterFolder,2) ;Variable $arr deklarieren
    If Not @error Then ;Abbruch bei Fehler
    For $x = 1 To $arr[0] ;Zähler
    ;_ArrayAdd($Array,$Pfad & "\" & $arr[$x]) ;Ordner/Unterordner und Dateien einbeziehen
    _ArrayAdd($Array,$arr[$x]) ;nur Ordner auf erster Ebene in Array schreiben
    $Array[0] = $Array[0]+1 ;Array bei jedem Schleifendurchlauf um +1 vergrößern
    ;Folders($Pfad & "\" & $arr[$x]) ;Pfad + Ordnername in Array schreiben
    Folders($arr[$x]) ;Nur Ordnername in Array schreiben

    [/autoit] [autoit][/autoit] [autoit]

    $DaysUnchanged = _FileGetUnchangedDays($Pfad & $Array[$x]) ;Änderungsdatum von Ordnern auslesen
    ConsoleWrite($DaysUnchanged & @CRLF) ;Tage in Console ausgeben

    [/autoit] [autoit][/autoit] [autoit]

    If $DaysUnchanged > 30 Then ;Wenn Änderungsdatum > x Tage, dann. . .
    MsgBox(0, "Ordner wird verschoben!", $Pfad & $Array[$x])
    $split = StringSplit($Array[$x], ".", 1) ;StringSplit - User.PIAG zerteilen in User + PIAG und in das Array $split schreiben
    ;-----------------------------------------------------------
    ;Failsafe
    ;MsgBox(0, "", $split[1])
    ;MsgBox(0, "", $split[2])
    ;_ArrayDisplay($split)
    ;-----------------------------------------------------------
    DirCopy($Pfad & $Array[$x], "\\fs-piagms05\allgemein\Datenaustausch\mbm\test Backup\Profile\" & $Array[$x], 1) ;Profile kopieren
    DirCopy($appFolder & $split[1], "\\fs-piagms05\allgemein\Datenaustausch\mbm\test Backup\Anwendungsdaten\" & $split[1], 1) ;Anwendungsdaten kopieren
    DirCopy($deskFolder & $split[1], "\\fs-piagms05\allgemein\Datenaustausch\mbm\test Backup\Desktop\" & $split[1], 1) ;Desktop kopieren
    DirCopy($startFolder & $split[1], "\\fs-piagms05\allgemein\Datenaustausch\mbm\test Backup\Startmenue\" & $split[1], 1) ;Startmenü kopieren
    ;Error wenn kein Desktop Ordner, etc. vorhanden? Überspringen??
    EndIf ; ->Ende If-Abfrage

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Next ; ->Ende Schleife
    EndIf ; ->Ende If-Abfrage
    EndFunc
    ;==>Func Folders
    _ArrayDisplay($Array) ;Array anzeigen

    [/autoit] [autoit][/autoit] [autoit]

    Func _FileGetUnchangedDays($search)
    $aFileChanged = FileGetTime($search, 0)
    If @error Then Return SetError(1, 0, "")
    Return _DateDiff("D", StringFormat("%04s/%02s/%02s", $aFileChanged[0], $aFileChanged[1], $aFileChanged[2]), StringFormat("%04s/%02s/%02s", @YEAR, @MON, @MDAY))
    EndFunc
    ;==>_FileGetUnchangedDays

    [/autoit] [autoit][/autoit] [autoit]

    ;$cR!pT End

    [/autoit]
  • Profil Ordner verschieben

    • bugmenot1
    • 16. Dezember 2010 um 08:31

    Hallo funkey,
    erstmal danke für dein Script, habs jetzt die letzten Tage versucht in mein zum Teil fertiges Script einzubauen, allerdings stose ich da noch auf das ein oder andere Problem.
    Kann es sein, dass das Script nicht mit Ordner im Netzwerk funktioniert?
    Denn bei einem lokalen Pfad würde er mir alles einwandfrei ausführen, aber sobald ich einen UNC Pfad angebe, läuft er zwar durch gibt aber nichts mehr auf der Console aus.

    [autoit]

    ConsoleWrite($DaysUnchanged & @CRLF)

    [/autoit]

    Sprich das Script führt dann auch keinen Kopiervorgang, etc. aus.

  • Profil Ordner verschieben

    • bugmenot1
    • 13. Dezember 2010 um 16:14

    Hallo Zusammen,
    ich möchte gerne ein Script schreiben, welches mir folgende Sachen erledigt:

    - verschieben mehrer Ordner die älter als beispielsweise 30 Tage sind
    - es soll nur der Hauptordner überprüft werden (Beispiel: \\Server\Freigabe\Name.Domäne -> Idee wann wurde dieser Ordner zuletzt geändert)

    Ich habe schonmal mit Robocopy rumexperimentiert, allerdings überprüft er mir alle Dateien/Ordner und kopiert auch teilweise etwas weg.
    Allerdings möcht ich nur überprüfen wann der Ordner zuletzt geändert wurde und dann den gesamten Profil Ordner verschieben.

    Ich hoffe Ihr könnt mir hierbei helfen.

    MfG

  • WLan key Schreiben?

    • bugmenot1
    • 14. Januar 2009 um 22:30

    vlt hilft dir ja das weiter:
    [ gelöst ] W-LAN Einstellungen importieren

    wenn ich das was ich gelesen hab alles richtig verstanden hab gibt es eine Schnittstelle in Windows mit der man dann W-LAN Einstellungen eintragen bz exportieren kann.

    Vom Windows Tool wird nur der WEP Key unverschlüsselt in der Registry gespeichert. WPA und WPA2 wird verschlüsselt gespeichert. Sieht man wenn man zb mit dem c´t Tool etwas exportiert ;)

    Hoffe du kommst so deinem vorhaben näher.

    Viel Erfolg

    Mfg
    Apollo 13

  • W-LAN Einstellungen importieren

    • bugmenot1
    • 18. Dezember 2008 um 11:28

    Also erst mal ein fettes danke :rock:
    Hätte ich vlt noch Zusatzinfos geben sollen bezüglich dem Hotfix für SP2 Systeme...und Download Link für die Software :P

    Du hast das was ich machen wollte perfekt gekürzt :)
    Aber hat wenigstens den positiven Nebeneffekt, das ich mich nen bisschen über Arrays eingelesen hab und da gleich mal rumprobiert hab.

    Also noch mal danke
    dann hat sich des Thema ja auch schon erledigt

    Mfg
    Apollo 13

  • W-LAN Einstellungen importieren

    • bugmenot1
    • 17. Dezember 2008 um 11:12

    Hallo Leute =)
    ich sitze nun schon seit längerer Zeit drann meine Einstellungen von dem W-LAN zu exportieren und dann wieder zu importieren.
    Folgendes habe ich dazu gefunden:
    Es gibt von ct nen Tool (ctWLANKloner 1.1) mithilfe dessen ich meine gewünschten W-LAN Einstellungen schnell exportieren und wieder importieren kann.
    Mit dem Windows XP eigenen Tool könnte ich das zwar auch recht simpel machen, aber dort ist der Hacken das ich nur WEP und WPA Einstellungen speichern kann, aber keine mit WPA2. Glaube das in Vista integrierte Tool könnte WPA2, weis ich aber nicht.

    Als Hintergrund Info: Bei uns in der Firma gibt es mehrere W-LANs (also auch in Niederlassungen, etc.) und jetzt hat sich ein Benutzer gemeldet, der die W-LAN Schlüssel bei sich eingetragen haben möchte. Er soll diese aber natürlich nicht selbst eingeben. Und auch nach möglichkeit nich aufschreiben.
    Habe gerade getestet das bei den exportierten Dateien (zumindest bei einem WPA Schlüssel) der Key nicht im Klartext gespeichert wird, WEP zwar schon, aber davon gehe ich jetzt mal weniger aus das der User die Datei "analysieren" wird. Ist im Prinzip alles auch nur um ihm die Arbeit bei der Einrichtung abzunehmen.

    Ein Script für den Import hab ich schon geschrieben, ich möchte es nur noch etwas besser machen xD.
    Die Profile trage ich lokal auf einem Notebook ein und lasse Sie als Datei exportieren, mit AutoIT rufe ich dann das ct Programm auf und lasse die Datei importieren.
    Geht soweit auch schon alles.

    Ich möchte nur das er mir das dann so macht, je nachdem wie viele W-LAN Dateien in dem Ordner liegen auch nur diese importiert, sprich das ich das nicht alles im Code eintragen muss. Es könnte sich ja ma was ändern.
    So bin ich auf ein Array gekommen.

    Hier mal mein Code:

    Spoiler anzeigen
    [autoit]

    #cs ----------------------------------------------------------------------------

    [/autoit] [autoit][/autoit] [autoit]

    AutoIt Version: 3.2.12.1
    Author: $cR!pT k!ddY

    [/autoit] [autoit][/autoit] [autoit]

    Script Function:
    W-LAN Einstellungen importieren
    #ce ----------------------------------------------------------------------------
    ;$cR!pT Start

    [/autoit] [autoit][/autoit] [autoit]

    ;old
    ;$config = "Schulung.wlan"
    ;ShellExecute(@ScriptDir & "\ctWLANKloner.exe", $config)
    ;->old

    [/autoit] [autoit][/autoit] [autoit]

    ;Includes
    #include <Array.au3> ;Include für Arrays importieren
    ;-->Includes

    [/autoit] [autoit][/autoit] [autoit]

    ;Globale Variablen
    Dim $title = "ctWLANKloner" ;->Title von Programmfenster deklarieren
    Dim $array[1] ;->Array deklarieren
    ;-->Globale Variablen

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    ;Dateien mit .wlan finden
    $suche = FileFindFirstFile("*.wlan")
    If $suche = -1 Then
    MsgBox(0, "Fehler", "Keine Übereinstimmung")
    Exit
    EndIf
    While 1
    $suche2 = FileFindNextFile($suche)
    If @error Then ExitLoop
    ;MsgBox(4096, "Datei:", $suche2)
    _ArrayAdd($array, $suche2)
    WEnd
    _ArrayDisplay($array, "Array")
    ;->Dateien mit .wlan finden

    [/autoit] [autoit][/autoit] [autoit]

    #cs
    ;For Schleife zu W-LAN Ermittlung (Dateinamen eingeben!)
    For $zaehler = 0 To 1
    $config = InputBox("Input", "Bitte config Namen incl. der Erweiterung .wlan eingeben")
    _ArrayAdd($array, $config)
    Next
    ;_ArrayDisplay($array, "Array")
    #ce

    [/autoit] [autoit][/autoit] [autoit]

    For $i = 1 To 2 ;ArrayLenght??
    ShellExecute(@ScriptDir & "\ctWLANKloner.exe", $array[$i])
    WinWait($title, "Soll die")
    ControlClick($title, "&Ja", "Button1")
    Sleep(1000)
    If WinExists($title, "Ein Profil") Then
    ControlClick($title, "&Ja", "Button1")
    Else
    Exit
    EndIf
    Next

    [/autoit] [autoit][/autoit] [autoit]

    ;$cR!pT End

    [/autoit]

    Könnt ihr mir da weiterhelfen und/oder Verbesserungsvorschläge geben?
    Wenn ich etwas zu ungenau erklärt hab bitte einfach fragen :)

    Mfg
    Apollo 13

  • Hidden/Silent/versteckte Installation mit Progress

    • bugmenot1
    • 8. Dezember 2008 um 15:05

    wahrscheinlich weil nicht jede anwendung diese parameter unterstützt?!
    zb einige alte installer können damit nicht umgehen.

    zu dem thema gabs glaub ich schonmal nen tread...wenn ich mich richtig erinnere hatte ich da damals auch was gepostet...
    sin da aber auch auf keinen grünen zweig gekommen -_-

    Mfg
    Apollo 13

  • Problem mit WMP Script

    • bugmenot1
    • 7. November 2008 um 07:44

    THX
    meine Herren....ich habs gewusst...es is bestimmt nur was ganz kleines...warum des da ned funzt...
    und natürlich wars des auch...aaaaa...%&%"$§%§...
    Hab die Syntax für ControlClick falsch geschrieben....omg...
    kaum schreibt mans richtig lässts sich auch wegklicken :D

    Danke :)
    Dann hat sich des Thema ja jetzt auch schon erledigt.

  • Problem mit WMP Script

    • bugmenot1
    • 6. November 2008 um 12:35

    Hey Leute,
    ich hab mal wieder nach langer Zeit ein Problem mit einem Script von mir...
    und zwar hab ich mir ein Installations/Deinstallations Script für den Windows Media Player 11 geschrieben. Die Installation klappt auch komplett reibungslos, aber die Deinstallation macht mir noch diverse Probleme.
    Scheinbar will AutoIT einfach den Button (ums verrecken) nicht klicken...
    kann es daran liegen das einfach bestimmte Windows Meldungen nur von Hand und nicht von AutoIT zu klicken sind?

    Komm da einfach nich mehr weiter.
    Ja ich weis wenn ich den Media Player deinstalliere, dann müsst ich die Updates auch wieder deinstallieren lassen...um das solls jetzt aber in dem Script mal nicht gehn...rein um die Installation und Deinstallation des Media Players.

    Hier noch ein Bild der Meldung die er nicht klicken will bei mir:
    [Blockierte Grafik: http://img46.imageshack.us/img46/9337/testho5.jpg]

    Spoiler anzeigen
    [autoit]

    #cs ----------------------------------------------------------------------------

    [/autoit] [autoit][/autoit] [autoit]

    AutoIt Version: 3.2.12.1
    Author: $cR!pT k!ddY

    [/autoit] [autoit][/autoit] [autoit]

    Script Function:
    Windows Media Player 11 installieren

    [/autoit] [autoit][/autoit] [autoit]

    #ce ----------------------------------------------------------------------------

    [/autoit] [autoit][/autoit] [autoit]

    ;$cR!pT Start
    HotKeySet("{ESC}", "Abbrechen")

    [/autoit] [autoit][/autoit] [autoit]

    ;Variablen deklarieren
    $pfad = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Windows Media Player", "UninstallString")
    $pfad1 = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Windows Media Format Runtime", "UninstallString")
    ;--------------------------------------------------------------------------------

    [/autoit] [autoit][/autoit] [autoit]

    If Not @error Then
    $msg = 'Programm ist bereits installiert.' & @CRLF & 'Programm deinstallieren?'
    Switch MsgBox(33, 'Windows Media Player', $msg)
    Case 1
    If MsgBox(36,"Windows Media Player","Nach Deinstallation neu installieren?") = 6 Then
    Call("_ReInstall")
    Else
    Call("_DeInstall")
    Exit
    EndIf
    Case 2
    Exit 2
    EndSwitch
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    ;--------------------------------------------------------------------------------
    ;Installation
    RunWait("\\fs-piagms05\programme$\AutoIT\Source Code\Windows Media Player\Windows Media Player 11.exe")
    Exit 2
    ;--------------------------------------------------------------------------------
    Func _ReInstall()
    ;DeInsallation
    ;siehe Deinstall!!

    [/autoit] [autoit][/autoit] [autoit]

    ;Installation
    RunWait("\\fs-piagms05\programme$\AutoIT\Source Code\Windows Media Player\Windows Media Player 11.exe")

    [/autoit] [autoit][/autoit] [autoit]

    Exit 2
    EndFunc
    ;--------------------------------------------------------------------------------
    Func _DeInstall()
    $title = "Windows Media Player 11"
    $title1 = "Windows Media Format Runtime"
    RunWait($pfad)
    WinWait($title, "Rollback")
    ControlClick($title, "Button1", "OK")
    WinWait($title, "Sie haben sich entschieden")
    ControlClick($title, "Button6", "&OK")
    WinWait($title, "abgeschlossen")
    ;ControlClick($title, "Button4", "&Neustart")
    WinClose($title, "abgeschlossen")

    [/autoit] [autoit][/autoit] [autoit]

    RunWait($pfad1)
    WinWait($title1, "The Windows")
    ControlClick($title1, "Button1", "OK")
    WinWait($title1, "You have chosen")
    ControlClick($title1, "Button1", "&Do you want to continue with the rollback?")
    ControlClick($title1, "Button6", "&OK")
    WinWait($title1, "complete")
    ;ControlClick($title1, "Button4", "&Restart")
    WinClose($title1, "complete")

    [/autoit] [autoit][/autoit] [autoit]

    Exit 2
    EndFunc
    ;--------------------------------------------------------------------------------
    Func Abbrechen()
    Exit
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    ;$cR!pT End

    [/autoit]
  • Digitaluhr

    • bugmenot1
    • 10. Oktober 2008 um 17:43

    Jawoll =)
    funzt tooop....danke danke Oscar :)))))))

  • Digitaluhr

    • bugmenot1
    • 7. Oktober 2008 um 14:32

    Hey Oscar,
    also ich habs ausprobiert, wenn ich nun nach dem entsperren des Rechners auf die Uhr klicke, dann aktualisiert sie sich =)
    denk es müsste auch gehn wenn sich die stunde ändert, da sich die Uhr ja von den minuten und sekunden auch aktualisiert nach dem die sekunden bei 60 angelangt sind.

    Mal schaun ob sich das Datum morgen dann auch aktualisiert wenn ich die Uhr anklicke, ich denke aber schon.
    Meld mich dann morgen nochmal.

    Aber schonmal THX, und ich würd die Digitaluhr schon bei c´t vorschlagen :)

    Mfg
    Apollo 13

    Edit: Jap es funzt...sobald ich die Uhr anklicke wird alles aktualisiert...also Sekunden, Minuten, Stunden, und die Tages, Monats, Jahresanzeige =)
    denk so reicht es das es sich aktualisiert wenn ich draufklicke...die stunde würde sich zwar aktualisieren sobald sie voll ist und die neue anfängt...aber das dauert dann doch zu lang...und das dann erst mal beim tag xD :D

    Ach und Oscar...hast du in diesem Release die Farben etwas aufgehellt? Ich finde sie so wies sie vorher warn besser...also dunkler...kann man besser lesen ;)

  • Digitaluhr

    • bugmenot1
    • 1. Oktober 2008 um 20:41

    jap...hab das anfangs nicht bemerkt, da er ja die minuten und die stunden dann nach kurzer zeit aktualisiert...
    hab mir dann nen kleiens scirpt geschrieben was mir die uhr halt schnell beendet und wieder neustartet um das Problem zu umgehen

    weis nich was du da gemacht hast das es mit dem minuten sekunen funzt...vlt geht des ja synchron mit den stunden und tagen auch =)

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™