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. Schickedim

Beiträge von Schickedim

  • Update-Funktion

    • Schickedim
    • 9. November 2012 um 13:17

    Hallo,

    ich habe nicht direkt eine Ini genommen, sondern einfach eine Text datei. in der ersten Zeile im Programm steht halt die Versions nummer. Ich arbeite mit einem Teamlaufwerk, es gibt keine autorisierung.

    Prüfen der Versions Version:

    [autoit]

    $fCurrentVer = FileReadLine($sharepfad & "version.txt")
    if $fCurrentVer > $sVersion then
    $VerCheck = MsgBox(4, "Update Vorhanden. " & $fCurrentVer, "Eine neue Version liegt auf dem Server bereit. Wollen Sie das Update jetzt durchführen?")
    Select
    Case $VerCheck = 6
    _update ()
    exit
    Case Else
    EndSelect
    Else

    [/autoit]

    _Update

    [autoit]

    Func _update($iDelay = 5)
    Local $sCmdFile
    FileDelete(@TempDir & "\callupdate.bat")
    sleep(2000)
    $sCmdFile = 'ping -n ' & $iDelay & ' 127.0.0.1 > nul' & @CRLF _
    & ':loop' & @CRLF _
    & 'del "' & @ScriptFullPath & '"' & @CRLF _
    & 'if exist "' & @ScriptFullPath & '" goto loop' & @CRLF _
    & ':copyloop' & @CRLF _
    & 'copy "'&$sharepfad&'programmname.exe" '&'"'& @ScriptDir &'\programmname.exe"' & @CRLF _
    & ' if not exist "'& @ScriptDir &'\programmname.exe" goto copyloop' & @CRLF _
    & '"' & @ScriptFullPath & '"'
    FileWrite(@TempDir & "\callupdate.bat", $sCmdFile)
    Run(@TempDir & "\callupdate.bat", @TempDir, @SW_HIDE)

    EndFunc

    [/autoit]

    Ich hoffe ich konnte helfen, bin eigendlich relativ neu in dem Geschäft bei Autoit.

  • Eventlog auslesen

    • Schickedim
    • 1. August 2012 um 09:48

    Thanks.

  • Eventlog auslesen

    • Schickedim
    • 1. August 2012 um 09:22
    Zitat von chip

    Du hast einen Fehler bei deinen Variablen, bei _EventLog__Open nennt du die Variable $EventLog im restlichen Code dann immer $hEventLog.


    Danke Chip. Difinitiv Fehler 30, 30cm hinterm Bildschirm.

    Funktioniert sogut wie, leider funktioniert die Abfrage nicht mit 6005 or 6006. Er spuckt mir viel zu viel aus.

    noch eine Idee?

    Spoiler anzeigen
    [autoit]

    #include <EventLog.au3>
    #include <GUIConstantsEx.au3>
    #include <ListViewConstants.au3>

    $EventLog = _EventLog__Open ("", "System") ;Systemprotokolle auslesen
    $EventlogCount = _EventLog__Count ($EventLog)

    #Region ### START Koda GUI section ### Form=D:\Documents and Settings\ahirtz\Desktop\Scripts\Koda designer\Forms\moep.kxf
    $Form1 = GUICreate("Eventlog Start", 578, 301, 189, 125)
    $ListView1 = GUICtrlCreateListView("Datum|Uhrzeit|Event-ID", 8, 4, 560, 286)
    GUICtrlSendMsg(-1, 0x101E, 0, 150)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    For $i = 1 to $EventlogCount
    $aEvent = _EventLog__Read($EventLog, True, True)
    If $aEvent[6] = 6005 or 6006 Then
    GUICtrlCreateListViewItem($aEvent[2]&"|"&$aevent[3]&"|"&$aevent[6], $ListView1)
    EndIf
    Next

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

    _EventLog__Close($EventLog)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

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

    Case $ListView1
    EndSwitch
    WEnd

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

    auch wenn "or" großgeschrieben ist. Wenn ich darunter jetzt eine zweite abfrage rein haue, stimmt die reihenfolge nicht vom Datum.

  • Eventlog auslesen

    • Schickedim
    • 1. August 2012 um 07:43

    Guten Morgen, da ich ein Bisschen Faul bin wollte ich den Eventlog auslesen um genaue Zeiten zubekommen, wann ich gearbeitet habe.

    Meine ersten Versuche schön und gut, aber die Liste bleibt leer.

    hier mein Script

    Spoiler anzeigen
    [autoit]

    #include <EventLog.au3>
    #include <GUIConstantsEx.au3>
    #include <ListViewConstants.au3>

    $EventLog = _EventLog__Open ("", "System") ;Systemprotokolle auslesen
    $EventlogCount = _EventLog__Count ($EventLog)

    #Region ### START Koda GUI section ### Form=D:\Documents and Settings\ahirtz\Desktop\Scripts\Koda designer\Forms\moep.kxf
    $Form1 = GUICreate("Eventlog Start", 578, 301, 189, 125)
    $ListView1 = GUICtrlCreateListView("Datum|Event-ID", 8, 4, 560, 286, BitOR($LVS_REPORT,$LVS_SORTDESCENDING))
    GUICtrlSendMsg(-1, 0x101E, 0, 150)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    For $i = 1 to $EventlogCount
    $aEvent = _EventLog__Read($hEventLog, True, True)
    If $aEvent[6] = 6006 OR 6005 Then
    GUICtrlCreateListViewItem($aEvent[2]&"|"&$aevent[6], $ListView1)
    EndIf
    Next
    _EventLog__Close($hEventLog)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

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

    Case $ListView1
    EndSwitch
    WEnd

    [/autoit]

    Danke für eure Hilfe.

  • Passwort aus ner ini auslesen und in ein programm senden

    • Schickedim
    • 25. Juni 2012 um 12:13

    Ini sollte so aufgebaut sein

    [Quote]
    [SektionsName]
    Key= PASSWORT

    [/qoute]

    Der Link zur Hilfe ist dieser: http://translation.autoit.de/onlinehilfe/functions/IniRead.htm

  • FTPMSG - Komplexes FTP Mail Programm

    • Schickedim
    • 6. Juni 2012 um 13:54

    Man muss noch nicht mal auf den FTP zugreifen, sondern nur dem Link folgen.

    Siehe:
    killer12345.ki.ohost.de

  • Variable Problem

    • Schickedim
    • 19. Mai 2012 um 17:30
    Zitat von klischee


    Oder einfach den Send-Befehl als Variable.

    [autoit]

    $Anz = Guictrlread($txtAnzahl); also die 20 wird gelesen!
    ; jetzt soll 20x der Sendbefehl ausgeführt werden.

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

    $SendPara = "{NUMPADADD " & $anz & "}"
    Send($SendPara);....

    [/autoit]

    Hallöle,
    ich bin davon ausgegangen, dass die Anzahl der send Befehle ausgelesen werden soll.

    Wenn $anz = 20 dann sende 20 x ENTER (oder andere befehle)

  • Variable Problem

    • Schickedim
    • 19. Mai 2012 um 17:13

    Habs von oben Kopiert, wollte Ihm nur ein Beispiel zeigen :D

  • Variable Problem

    • Schickedim
    • 19. Mai 2012 um 16:09
    [autoit]

    $Anz = Guictrlread($txtAnzahl)
    For $i = 1 To $Anz
    send("{ENTER}")
    sleep(1000) ; script pausiert 1sekunde nach dem Send, dann nächste send bis §i = $Anz hat
    Next

    [/autoit]
  • Variable Problem

    • Schickedim
    • 18. Mai 2012 um 20:12
    [autoit]

    $Anz = Guictrlread($txtAnzahl)
    For $i = 1 To $Anz
    send("{ENTER}")
    Next

    [/autoit]


    anzahl wird x mal enter gesendet.

  • Variable Problem

    • Schickedim
    • 18. Mai 2012 um 19:59

    Hallöle versuch mal hiermit:

    [autoit]

    $Anz = 10
    Send("{NUMPADADD" & $anz & "}")

    [/autoit]

    oder was meinst du?

  • Outlook, ungelesenen Mails von einem Eingebundenen Konto auslesen

    • Schickedim
    • 10. Mai 2012 um 10:28

    So funktionierts bei mir, gerade getestet bei den Kollegen ebend so. Outlook 2007. Das postfach Kunde ist ein Multifunktionpostfach und greifen ca 21 Kollegen drauf.

    [autoit]


    #AutoIt3Wrapper_AU3Check_Parameters= -d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
    #AutoIt3Wrapper_AU3Check_Stop_OnWarning=Y

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

    #include <OutlookEX.au3>
    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>

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

    Global $oOutlook = _OL_Open()
    Global $aItems, $message, $aFolder
    _OL_FolderAccess($oOutlook, "Postfach - Kunde")

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

    $aItems = _OL_ItemFind($oOutlook, "Postfach - Kunde\Posteingang", $olMail, "[UnRead]=True", "", "", "Subject,Body", "", 1)
    If IsArray($aItems) Then
    _ArrayDisplay($aItems, "OutlookEX UDF: _OL_ItemFind Example Script - Unread mails")
    Else
    MsgBox(48, "OutlookEX UDF: _OL_ItemFind Example Script", "Could not find an unread mail. @error = " & @error & ", @extended: " & @extended)
    EndIf

    [/autoit]

    €dit: ohne _OL_FolderAccess($oOutlook, "Postfach - Kunde") funktioniert es auch, da das Postfach komplett eingebuden ist und ich Master Rechte habe. Die Kollegen haben nur Read Only.

  • Zahl + 1 senden

    • Schickedim
    • 23. März 2012 um 11:48

    Was hast du den Vor? wozu $i senden und dann deleten?

    Vielleicht mit POS1 nach ganzs links und denn die del taste senden...

  • Zahl + 1 senden

    • Schickedim
    • 22. März 2012 um 20:10
    [autoit]

    $anzahl=InputBox("Zahl bis...","Bis wieviel soll gezählt werden.")
    for $i = 1 to $anzahl
    send($i)
    send("{ENTER}")
    sleep(20)
    Next

    [/autoit]


    €dit: ahh, da war jemand schneller :D

  • ArraySearch Problem.

    • Schickedim
    • 21. März 2012 um 20:17

    Hallo,

    ich habe eine CSV Datei mit 3200 Rufnummern. 1 Zeile befindet sich die PC nummer, zweite Vorwahl und in der dritten die Rufnummer.

    Die Datei lese ich mit _FileReadToArray ein. Das klappt alles. Leider sind die PC-Nummern nicht durchnummeriert von 1 bis 3200.

    Folgenes funktioniert.

    Spoiler anzeigen
    [autoit]


    #include <Array.au3>
    #include <File.au3>

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

    _FileReadToArray("pcliste.csv", $rufnummer)

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

    $pcnummer = InputBox("PC", "Welcher PC:")

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

    $index = _ArraySearch($rufnummer, $pcnummer & ";", 1, 0, 0, 1)
    $nummer = StringSplit($rufnummer[$index], ";", 2)
    $telefon = $nummer[1] & $nummer[2]

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

    MsgBox(4096, "Test", $telefon) ; eigendlich wird die Rufnummer ans Telefon übertragen.

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

    Funktioniert einwandfrei, ABER beispiel: suche ich nach dem PC 5208 findet der die Zahl in einer Vorwahl vom PC 3117..

    Wie kann ich angeben, dass der NUR in der ersten Spalte sucht.

    Bitte um Hilfe... oder hat jemand eine andere Idee, wie ich das Realisieren kann.

  • Ping aus CSV Datei

    • Schickedim
    • 26. Februar 2012 um 18:33

    Ich danke dir!

    Habe das Thema auf gelöst gesetzt.

  • AutoIt Helpfunktion geht nicht

    • Schickedim
    • 22. Februar 2012 um 18:59
    Zitat von [S]killer

    Danke kev, aber mein problem ist es ja das sich wenn ich F1 drücke garnichts kommt Nicht Deutsch nicht Englisch... :/

    Hallo,
    ich habe bis vor kurzem mit der Englishen Hilfe gearbeitet. Ich habe mir einfach die Datei hier herrunter geladen und in den Ordner C:\Program Files\AutoIt3\* eingezogen!

    Sind die Datein: Autoit.chm, autoit3.chm und UDFs3.chm vorhanden?

    Kannst du die Hilfe über den reiter "Hilfe" -> Dropdown menü "Hilfe" aufrufen?


    Lg.

  • Processlist remote abfragen

    • Schickedim
    • 22. Februar 2012 um 17:21

    Hallo,

    per Console geht es.

    TASKLIST /S System /U Benutzername /P Kennwort /FO TABLE /NH

    So Vielleicht? Kanns leider nicht testen, habe zurzeit keinen Zugriff auf einen Server oder anderen Rechner.

    Spoiler anzeigen
    [autoit]

    $ip = inputbox("IP"," Ipadresse:")
    $user = inputbox("Username:", "domäne\user")
    $pass = inputbox("Passwort", "Passwort:", "", "*")
    Run(@ComSpec & " /k " & "tasklist /S \\"& $ip & "/U" & $user & "/P" & $pass & "/FO /NH", '', @SW_SHOW)

    [/autoit]

    Wenn ich mich Irre bitte berichtigen.

  • Ping aus CSV Datei

    • Schickedim
    • 22. Februar 2012 um 06:42

    Vielen dank.
    So in etwa meinte ich das! Muss das nur noch bisschen umstellen bis das hinhaut. Derzeit bekomme ich noch ein paar fehler Meldungen. Falls ichs nicht hinbekomme, werde ich mich melden.


    €dit:
    Ich habe soweit jetzt fast alles fertig. Aber etwas funktioniert nicht.

    Spoiler anzeigen
    [autoit]


    ; bin mir nie sicher welche au3 ich brauche.
    #include <GUIConstants.au3>
    #include <ButtonConstants.au3>
    #include <Constants.au3>
    #include <Misc.au3>
    #Include <File.au3>
    #include <String.au3>
    #include <Array.au3>

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

    dim $ips
    if Not _FileReadToArray("ips.csv", $ips) Then
    MsgBox(4096, "Fehler", "Fehler beim Einlesen der Datei in das Array!" & @CRLF & "Fehlercode: " & @error)
    Exit
    EndIf

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

    GUICreate("Filiale Ping", 764, 93, 194, 288)
    $flnr = GUICtrlCreateInput("", 112, 48, 97, 21)
    GUICtrlSetLimit(-1, 4)
    $router = GUICtrlCreateButton("Cisco Router", 0, 0, 89, 25, 0)
    GUISetState(@SW_SHOW)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $router
    _router ()
    EndSwitch
    WEnd

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

    Func _router ()

    $index = _ArraySearch($ips, GUICtrlRead($flnr) & ";", 1, 0, 0, 1)
    If @error Then
    MsgBox(0, "Ping", "Filiale nicht vorhanden")
    Else
    $ip = StringSplit($ips[$index], ";", 2)
    Ping($ips[$index]&".130", 250)
    If @error = 0 Then
    MsgBox(0, "Ping","Cisco Router ist Online.") ;"Cisco Router ist Online.")
    Else
    MsgBox(0, "Ping", "Cisco Router ist Offline.")
    EndIf
    EndIf
    EndFunc

    [/autoit]


    ips.cvs
    Filiale; IP
    12;10.199.250
    15;10.199.252
    20;10.199.255


    Der Router ist immer Offline und wenn ich kein Parametter eingebe bzw eine falsche, nicht vorhandende Filial nummer. Die Abfrage Filiale

    Da es sich um einen Kunden hält sind das hier beispiel daten.

  • Ping aus CSV Datei

    • Schickedim
    • 21. Februar 2012 um 06:48

    Guten Morgen.

    Zitat von autoBert

    du loest am besten mit

    AutoIt-QuellcodeCode kopieren

    [autoit]

    _FileReadToArray

    [/autoit]

    deine Datei in ein Array. Dieses Array gehst du dann Zeile für Zeile durch. Mit

    AutoIt-QuellcodeCode kopieren

    [autoit]

    StringSplit

    [/autoit]

    kannst du die einzeln Zeilen dabei wiederum in ein Array spliten. Mit dem entsprechenden Feld (der IP) führst du danach einen

    AutoIt-QuellcodeCode kopieren

    [autoit]

    Ping

    [/autoit]

    aus,

    mfg autoBert

    Alles anzeigen

    Erstmal Danke. Ich habe vergessen zuerwähnen, dass es etwa 3300 ips sind. und die gehen nicht von 1 bis x durch z.b. fehlt da 1-10 geht weiter mit 11 dann irrgentwann man mit 222 bis 9999. Ist es trotzdem möglich mit SplitArray nach dem ersten Parameter zu durchsuchen, weil ja nicht PC1 Zeile 1 enspricht.

    Zitat von UEZ

    Hi Oynama Schickidim Schickidim,

    vielleicht kannst du hieraus was gebrauchen: Check Online Status v0.97 Build 2011-11-27 Beta

    Gruß,
    UEZ

    PS: Tarkan lässt Grüßen ;)

    Hallöle.
    ich verstehe in der au3 nur spanisch :D

    Grüße zurück :D http://www.youtube.com/watch?v=f9yqn8gVnII


    Als anhang befindet sich die Beispiel Datei. Möglich mir ein beispiel zugeben?

    Dateien

    Filialen.txt 10,93 kB – 363 Downloads

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™