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. msp-holzwurm

Beiträge von msp-holzwurm

  • Array - Bestimmte Bereiche löschen

    • msp-holzwurm
    • 13. November 2008 um 20:36

    Hallo!

    hab gerade mal was von meinem bescheidenen Testbestandsmaterial aus der Firma genommen:
    Quelldatei 10000 Zeilen mit dem gleichen Wert 573122 werden durch XXXXXX ersetzt. (in jeder Zeile ist ein Treffer)

    Hier als Version mit Stringabarbeitung:
    Dauer (mitgeschnitten) 1 Sekunde

    die Variante von gestern (in array lesen und im array ändern) läuft seit ca. 10 Minuten!!!!
    wäre noch die Frage: ist StringInStr oder StringRegExp schneller??

    Grüße

    German
    PS: hier mit Code, war ja ne Frage eines Kollegen und ich habs auch immer gehasst, wenn jedes Anfangsproblem von den -Superäggsbärden- "zu tote" diskutiert worden ist und für mich als Fragesteller blieb nichts übrig
    PS1: hier steht schon ein PC mit anständig Dampf unter der Haube, falls einer die Messzeit ankreidet


    Spoiler anzeigen
    [autoit][/autoit] [autoit][/autoit] [autoit]

    ; Beispiel: Einlesen der Datei in ein Array
    ; Zeilenweises abarbeiten
    ; Austausch von gefundenem Text und Ausgabe als STring

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

    #include <Date.au3>
    #include <string.au3>
    #include <array.au3>
    #include <file.au3>

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

    $testdatei=@workingdir & "\mq573"
    $newfile=@workingdir & "\mq573a_a"

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

    ; Inhalt der text3.txt:
    ;Schlosser
    ;Schreiner
    ;Dreher
    ;Telefontechniker

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

    $pfile=Fileopen($newfile,1)

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

    Dim $myarray
    If Not _FileReadToArray($testdatei,$myarray) Then
    MsgBox(4096,"FEHELER", " Datei " & $textdatei & " nicht gefunden, oder leer")
    Exit
    EndIf

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

    For $x = 1 to Ubound($myarray) -1 ; jetzt wird das array von Zeile 1 bis zur lezten Zeile eingelesen
    $Zeile=$myArray[$x]
    ; msgbox(0,"ich hab jetzt die Zeile mit folgendem Inhalt:", $zeile)
    $Ausgabe=_checkandreplace($zeile)
    FileWrite($pfile, $Ausgabe & @CRLF)
    Next

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

    FileClose($pfile)

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

    Func _checkandreplace($zeile)

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

    SELECT
    case StringRegExp($zeile,'573122')
    $neuezeile=StringReplace($zeile,"573122","XXXXXX")
    Return $neuezeile
    ;_arraydelete($myarray,$x)
    ;_arrayInsert($myarray,$x,$neuezeile)
    case else
    Return $zeile
    ENDSELECT

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

    EndFunc

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit]
  • String an ein CMD Fenster senden

    • msp-holzwurm
    • 12. November 2008 um 22:06

    kannst Du mit "tail" was anfangen, das gibts auf Unix und kann die letzten 10 Zeilen von ner Textdatei anzeigen.
    Mit der Option -f (Beispielhaft)
    tail -f ulli99.log
    wird ein Fenster geöffnet, das aktuelle (alle paar Sekunden aktuallisiert) die letzten 10 Zeilen des Protokolles ulli99.log anzeigt, während das Programm ulli99 dort reinprotokolliert.

    Sowas geht mit ner gui und nem Edit-Fenster, aber in der CMD führ ich irgendwelche Kommandos ala: ipconfig, tree /f, nbtstat -RR oder net view ... aus

    Falls Dir mit nem tail in Autoit gedient ist, hab ich schon ein paar mal programmiert.

    Grüße

    German

  • Autoit lernen.

    • msp-holzwurm
    • 12. November 2008 um 21:58

    Hallo!

    wollte nicht immer einen Entwickler brauchen und hatte gemerkt, daß Batch-Dateien oder z.B. gnu-Shell Scripte halt irgendwo ihre Grenzen haben.

    Bei mir wars so: suche nach neuer Version der gnu-Shell (weil ich ein neues Testprogramm für meinen Rechner im Rechenzentrum geschrieben habe: bei 80 Kunden immer ein Verzeichnis prüfen, ob dort ne bestimmte "Stördatei" drin ist).
    find im Internet einen Hinweis auf autoit, 15 Minuten später war das Testprogramm fertig mit 3 Funktionen mehr als ursprünglich gewünscht, hatte aber nur Erfahrung mit gnu-shell und unix-Shells und irgendwann mal nen 40h C-Kurs auf Firmenkosten nach Feierabend gemacht.

    Kann nach gut 2 Jahren nur sagen: keine Minute mit Autoit bereut, schreibe Software wo unsere Profis mit java und Oracle und SQL und C++ eben nicht in der Zeit können. (da manches dort eben wahnsinnig umständlich ist)

    Autoit ist sicher nicht geeignet 2 Millionen Datensätze in 1 Minute durchzuarbeiten, aber wie oft brauch ich das??
    Hat der "Normalhaushalt" eine Hilti TE90 oder einen Duss P90 Bohrhammer im Haus (um ein Bild aufzuhängen)oder ne Metabo aus dem Baumarkt????

    Grüße

    German

  • String an ein CMD Fenster senden

    • msp-holzwurm
    • 12. November 2008 um 21:48

    Hallo!


    hab Deine Frage jetzt 3 mal gelesen, was soll in dem CMD (also einer Kommand-Shell ablaufen)???

    soll dort ein Kommande laufen, mit dem Du von außen kommunizieren willst, oder ein Programm gestartet werden, daß Informationen aus nem Autoitprogrammcode bekommen soll????

    Grüße

    German

  • Array - Bestimmte Bereiche löschen

    • msp-holzwurm
    • 12. November 2008 um 20:54

    Hallo!

    hier mein kleines Muster dazu:

    Spoiler anzeigen
    [autoit]


    ; Beispiel: Einlesen der Datei in ein Array
    ; Zeilenweises abarbeiten
    ; externe Funktion zum Austausch von Werten im Array

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

    #include <Date.au3>
    #include <string.au3>
    #include <array.au3>
    #include <file.au3>

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

    $testdatei=@workingdir & "\text3.txt"
    ; Inhalt der text3.txt:
    ;Schlosser
    ;Schreiner
    ;Dreher
    ;Telefontechniker

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

    Dim $myarray
    If Not _FileReadToArray($testdatei,$myarray) Then
    MsgBox(4096,"FEHELER", " Datei " & $textdatei & " nicht gefunden, oder leer")
    Exit
    EndIf
    _arraydisplay($myarray,"das wars vorher")

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

    For $x = 1 to Ubound($myarray) -1 ; jetzt wird das array von Zeile 1 bis zur lezten Zeile eingelesen
    $Zeile=$myArray[$x]
    msgbox(0,"ich hab jetzt die Zeile mit folgendem Inhalt:", $zeile)
    _checkandreplace($zeile,$x)
    Next

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

    _arraydisplay($myarray,"das wars danach")

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

    Func _checkandreplace($zeile,$x)

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

    SELECT
    case StringRegExp($zeile,'Schreiner')
    $neuezeile=StringReplace($zeile,"Schreiner","Tischler")

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

    _arraydelete($myarray,$x)
    _arrayInsert($myarray,$x,$neuezeile)

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

    case StringRegExp($zeile,'Schlosser')
    $neuezeile=StringReplace($zeile,"Schlosser","Maschinenbauer")
    _arraydelete($myarray,$x)
    _arrayInsert($myarray,$x,$neuezeile)
    case else
    Return 0
    ENDSELECT

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

    EndFunc

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

    nützt nur nix, daß nur Abzukupfern, verstehen muß mans auch (ich hab autoit auch im Selbststudium gelernt), daher keine Fragen scheuen, ob der Code so besonders flott geht hab ich jetzt aber nicht getestet.

    Grüße

    Holzwurm
    wer mit Fein und Festool schraubt, mit Mafell hobelt --> der hackt mit AUTOIT

  • Array - Bestimmte Bereiche löschen

    • msp-holzwurm
    • 10. November 2008 um 22:28

    Hallo Korby!

    alles klar?
    Schau Dir auch mal meinen Code zum Thema StringRegExp an (von heute abend), da ist ein Mustercode drin, ein Array abzuarbeiten.

    Wenn Unklarheiten, nochmals melden.

    Grüße

    German

  • StringRegExp Flag 2

    • msp-holzwurm
    • 10. November 2008 um 22:25

    Hallo BugFix!

    nochmals danke, mein [ ] hintendran erfüllt ja auch seinen Zweck, da ja dann eben keine weitere Extension kommen kann. nur das mit dem (?!.)* war mir schleierhaft.

    Funktioniert super.

    Gruß

    German
    PS: wie kann ich das Thema jetzt auf erledigt stellen??

  • StringRegExp Flag 2

    • msp-holzwurm
    • 10. November 2008 um 21:44

    Hallo BugFix!

    genau das wars: (mein Problem) hab das zwar gerade noch etwas umgebaut, da die Zeile noch länger ist (ich war aber zu faul das alles abzutippen)

    'V(E|V)_[A-Z]*\.[A-Z][A-Z][A-Z][ ]'

    ist jetzt meine (frisch probierte Lösung, also einmal Blank hintendran)

    'V(E|V)_[A-Z]*\.TXT*(?!.)'
    ^^^^
    ist das das Zeilenende???

    Danke & Gruss

    German

  • StringRegExp Flag 2

    • msp-holzwurm
    • 10. November 2008 um 20:31

    Hallo Hackergemeinde!

    irgendwie steh ich heute auf dem Schlauch:

    bitte mal mein Muster anschauen, schaff ich es irgendwie, die Zeilen aus dem array $Futter anzeigen zu lassen ohne die Zeilen mit .sic drin, mit der Funktion _ausdruckdrin() (mit der _ausdrucknichtdrin() und dem Flag 2 geht das, ist das nur Zufall??)


    also ein negierter StringRegExp???

    (das Ganze wird schon einiges kompilzierter, nur denk ich - ist es sinnvoller hier gleich zu Zeigen was ich will und vielleicht kann der eine oder andere Neuling hier, dann auch was mit dem Code anfangen, ich weiß, daß das mit weniger Zeilen zu erstellen geht)

    Es Dankt Euch

    German


    Spoiler anzeigen
    [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    ; test_147.au3
    ; Probleme mit STringRegExp

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

    #include <string.au3>
    #include <array.au3>

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

    Dim $Futter[6]
    $Futter[0]="VV_BERTA.TXT"
    $Futter[1]="VE_BERTA.TXT.SIC"
    $Futter[2]="VV_OTTO.TXT"
    $Futter[3]="VE_OTTO.TXT.SIC"
    $Futter[4]="VV_REGINA.TXT"
    $Futter[5]="VV_REGINA.TXT.SIC"

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

    _arraydisplay($Futter,"Das ist das Testfutter")

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

    $Ergebnis_Bsp1=''
    $Ergebnis_Bsp2=''
    for $j=0 to Ubound($Futter)-1
    ; Beispiel1, ich will die Zeilen mit VV_
    _Ausdruckdrin($Futter[$j],"(VV_).")
    ; Beispiel2 ; ich will alle Zeilen ohne die .sic
    _Ausdrucknichtdrin($Futter[$j],"(\.SIC)")

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

    Next

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

    msgbox(0,"Beispiel1 ist", $Ergebnis_Bsp1)
    msgbox(0,"Beispiel2 ist", $Ergebnis_Bsp2)

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

    Func _Ausdruckdrin($zeile,$Ausdruck)

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

    if StringRegExp($zeile,$Ausdruck) then
    $Ergebnis_Bsp1=$Ergebnis_Bsp1 & @CRLF & $zeile
    ; msgbox(0,"das ist momentan", $Ergebnis)
    Endif

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

    EndFunc

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

    Func _Ausdrucknichtdrin($zeile,$Ausdruck)

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

    if StringRegExp($zeile,$Ausdruck,2) then
    $Ergebnis_Bsp2=$Ergebnis_Bsp2 & @CRLF & $zeile
    ; msgbox(0,"das ist momentan", $Ergebnis)
    Endif

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

    EndFunc

    [/autoit]
  • Dateien eines .zip Archivs öffnen

    • msp-holzwurm
    • 5. November 2008 um 21:33

    Hallo!

    wenn Du noch nicht weiterbist, dann such ich Dir meine Lösung raus. Benutze den Kommandozeilen Unzipper unzip.exe von info-zip und es funktioniert damit einwandfrei.
    Im Notfall kann der auch in einer autoit-Exe gepackt werden und beim Aufruf in das TEMP des Rechner geschrieben werden und dort kannst Du dann mit arbeiten.

    Es muß auch gehen eine EXE aus der ZIP zu holen und die später zu starten.

    Grüße

    Holzwurm
    PS: ihch hol nur eine Text-Protokolldatei raus um die anzuzeigen.

  • Ping befehl funktioniert nicht

    • msp-holzwurm
    • 4. November 2008 um 20:57

    Hallo!

    hier meine Lösung, hab da nicht allzuviel nachgedacht (außer bei der Namensfindung) --))))

    Grüße

    Holzwurm
    PS: das Programm ist für nen Kunden von mir (Krankenhaus) und hält dort künstlich ne Routerverbindung offen


    Spoiler anzeigen
    [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    ; rohrfrei.au3
    ; Verbindung zeitgesteuert aufhalten
    ;
    ; ; #######RELEASEHISTORIE
    ; 20080314 1.00 GD
    ; ######################

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

    #include <date.au3>
    #include <string.au3>
    #include <file.au3>

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

    $rohrfreiini = @SCRIPTDIR & "\rohrfrei.ini"
    $Version="1.00 14.03.2008 GD"

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

    ; so sieht die rohrfrei.ini aus
    ;[GLOBAL]
    ;Zielip=151.189.21.100
    ;Pingtime=3600

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

    If FileExists($rohrfreiini) then
    $ZielIP=IniRead($rohrfreiini,"Global","ZielIP","NotFound")
    $Pingtime=IniRead($rohrfreiini,"Global","Pingtime","NotFound")
    Else
    MsgBox(16,"Rohrfrei " & $Version,"keine INI-Datei rohrfrei.ini im Verzeichnis " & @Scriptdir ,10)
    exit
    EndIf

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

    if $ZielIP = "NotFound" then
    MsgBox(16,"Rohrfrei " & $Version, "INI-Datei ohne ZielIP",10)
    exit
    EndIf

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

    $i = 0
    While $i <= $Pingtime
    $doit=ping($ZielIP,850)
    if $doit > 0 then
    $message="PING OK"
    else
    $message="NETWORK ERROR"
    EndIf
    sleep(2500)
    TrayTip("clears any tray tip","",0)
    TrayTip("ROHRFREI", $message,5,1)
    sleep(2500)
    TrayTip("clears any tray tip","",0)
    $i = $i + 6
    WEnd

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit]
  • DriveMapAdd auf 64Bit Samba System

    • msp-holzwurm
    • 4. November 2008 um 20:40

    Hallo All!

    hab heute (leider wie immer keine Zeit, da ja noch x andere Kunden Probleme hatten) einen Versuch unternommen, einen Dienst (mit Autoit programmiert) auf nem 2003er zu installieren, der soll Daten von nem Samba-Laufwerk runter- und raufkopieren.
    Der Dienst läuft bei mindestens 30 Kunden problemlos, heute mußte ich passen, der kopiert nichts.
    Später hatte sich nochmals ein Kollege gemeldet, daß Samba des Kunden läuft auf nem 64Bit Linux unter VM-WARE.

    Hat irgendeiner damit Erfahrung, brauch ich dazu eine bestimmte Autoit-Version oder irgendeinen Schalter in der smb.conf auf der Linux???

    Es grüßt Euch und bedankt sich schon im voraus

    German

  • Array an anderen PC übergeben

    • msp-holzwurm
    • 20. März 2008 um 21:29

    Hallo!

    hab da auch so ein ähnliches Problem, momentan würde ich das array auch von PC1 auf PC2 schreiben und dort per Dienst (der ein Verzeichnis überwacht) einlesen lassen (das ist einfach zu programmieren).

    Welche Verbindung haben die 2 PCs??
    gleiches Netz, Internet, FTP???
    gleiche Domäne??

    Grüße

    German

  • Textzeile aus Datei neu zusammensetzen

    • msp-holzwurm
    • 20. März 2008 um 21:25

    Hallo!

    aber schön damit rumprobieren wenn das nicht zwischen Deinen Ohren ankommt, dann nützt das nichts.

    Wenn was unklar ist FRAGEN.

    Das geht mit weniger Code zu programmieren, aber dann versteht man als Anfänger gar nichts mehr.

    Grüße

    German

    Spoiler anzeigen
    [autoit][/autoit] [autoit][/autoit] [autoit]

    ; test_62.au3
    ; Zeilenweise einlesen und Zeilen umkonvertieren

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

    #include <array.au3>
    #include <file.au3>

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

    $Filetochange="F:\nix99\vornachname.txt" ;= die alte Datei
    $newfile="F:\nix99\fertig.txt" ;=die Zieldatei

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

    Dim $aRecords ; das ist die alte Datei
    Dim $bRecords ; das ist die neue Datei

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

    If Not _FileReadToArray($Filetochange,$aRecords) Then
    MsgBox(4096,"Error", " Error reading log to Array error:" & @error)
    Exit
    EndIf
    For $x = 1 to $aRecords[0] -1 ; lesen der Filetochange bis zur letzten Textzeile im aRecord[$x] $x ist der Zähler
    ; steht die Datei jetzt Zeilenweise
    ; das -1 sonst kommt auch noch der Zeilenumbruch der letzten Zeile!!!

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

    $line = $aRecords[$x] ;=die alte Datei Zeilenweise

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

    $newstring1=StringTrimLeft($line,4) ;von der alten Zeile die ersten 4 zeichen weg und nach $newstring1
    $newstring2=$newstring1 & "hinterndran" ;newstring1 und anfügen an die Zeile
    $aRecords[$x]=$newstring2 ;zuweisen der 2xformatierten Zeile in das array (damit die alte Zeile überschrieben wird

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

    Next

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

    _arraydisplay($aRecords,"färdich") ;anschauen, wenn Du Lust hast

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

    _FileWriteFromArray($newfile,$aRecords,1) ; rausschreiben in die Zieldatei $newfile

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


    Integrator(RS)

  • Ping absetzen

    • msp-holzwurm
    • 14. März 2008 um 20:20

    Hallo Seiwa!

    hoffe, Du hast schon die Hilfen gelesen, mußt das selbst verstehen, sonst nützt das einfach nichts.

    Hier mein Spitzenprodukt dazu namens ROHRFREI (gibt doch so schöne deutsche Wörter für alles).
    Die Mädels haben sich kaputtgelacht, als ein Kunde in der Hotline anruft und sagt: er hat noch ne Frage wegen dem Rohrfrei --)))

    Spoiler anzeigen
    [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    ; rohrfrei.au3
    ; Verbindung zeitgesteuert aufhalten
    ;
    ; ; #######RELEASEHISTORIE
    ; 20080314 1.00 GD
    ; ######################

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

    #include <date.au3>
    #include <string.au3>
    #include <file.au3>

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

    $rohrfreiini = @SCRIPTDIR & "\rohrfrei.ini"
    $Version="1.00 14.03.2008 GD"

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

    ; so sieht die rohrfrei.ini aus
    ;[GLOBAL]
    ;Zielip=151.189.21.100
    ;Pingtime=3600

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

    If FileExists($rohrfreiini) then
    $ZielIP=IniRead($rohrfreiini,"Global","ZielIP","NotFound")
    $Pingtime=IniRead($rohrfreiini,"Global","Pingtime","NotFound")
    Else
    MsgBox(16,"Rohrfrei " & $Version,"keine INI-Datei rohrfrei.ini im Verzeichnis " & @Scriptdir ,10)
    exit
    EndIf

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

    if $ZielIP = "NotFound" then
    MsgBox(16,"Rohrfrei " & $Version, "INI-Datei ohne ZielIP",10)
    exit
    EndIf

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

    $i = 0
    While $i <= $Pingtime
    $doit=ping($ZielIP,850)
    if $doit > 0 then
    $message="PING OK"
    else
    $message="NETWORK ERROR"
    EndIf
    sleep(2500)
    TrayTip("clears any tray tip","",0)
    TrayTip("ROHRFREI", $message,5,1)
    sleep(2500)
    TrayTip("clears any tray tip","",0)
    $i = $i + 6
    WEnd

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit]
  • Monitoring von autoit-Programmen

    • msp-holzwurm
    • 12. März 2008 um 19:22

    Hallo!

    Problem hat sich heute schon entspannt, liegt nicht an meiner Umgebung, Interessant wäre es zu sehen, wie schnell der Client Daten auf einem bestimmten Port liest und auch wieder zurückschreibt (Oracle-Zugriff).

    Das glint konnte ich aber beim Kunden (war dort gestern mit Chef zur "Gebetstunde") erstklassig einsetzen, man kann auch fremde Rechner damit anzapfen.

    Wenn noch einer sowas wie Glint.exe hat, daß mitschneiden kann wär ich trotzdem interessiert, da ich Software habe, die oft größere Dateien verarbeiten muß und zu Zeiten, wo ich lieber hier bei Euch in der Usergroup sitze.

    Der Mitschnitt sollte sowas wie einen Zeitstempel haben, oder von mir aus alle x-Sekunden/Minuten einen "Dump" ablegen.

    Stell die Frage schonmal auf erledigt.

    Danke & Gruss

    German

  • Monitoring von autoit-Programmen

    • msp-holzwurm
    • 11. März 2008 um 20:31

    Hallo All!

    da ich Autoit doch etwas professioneller einsetze hab ich mir im Internet und einigen Testnächten auch ein paar schnucklige Testtools rausgesucht:
    glint.exe von https://autoit.de/www.SciTechConcept.com zum Überwachen von CPU/Monitor/Dsikzugriffen usw.
    heavyload um mal die Software unter Lastbedingungen zu sehen, bzw. meine Kiste hier mal zum schwitzen zu bringen

    bräuchte mal was, mit dem ich die Auslastung in ne Datei mitschneiden könnte (glint hat zwar ne schöne Graph-Darstellung, ich kanns aber nicht abspeichern).

    Kann mir da vielleicht einer nen Tip geben.

    Es grüßt Euch

    German
    Integrator (RS)

  • Array variable has incorrect number of subscripts or subscript dimension range exceeded

    • msp-holzwurm
    • 10. März 2008 um 20:32

    Hallo Duckbone!

    Problem ist ganz einfach:
    (hab hier mal ein kleines übersichtliches Muster gezimmert, in meiner f:\nix99\vornachname.txt steht folgendeds

    Horst, Schaub
    Manfred, Zettelmeyer

    und danach ist noch ein Zeilenumbruch, sprich die Datei wird zum dritten Mal mit einer "leeren" Zeile durchgeführt und das geht nicht, da der StringSplit dann aussteigt (es gibt eben keinen Teil 1 und Teil 2)

    Bau das mal nach und setzt die beiden Zeilen, die ich Dir mit ; !!!! gekennzeichnet habe vorne auf Kommentar mit nem Strichpunkt, dann siehst Du perfekt das Problem. (2 Zeilen laufen und dann kommt die Fehlermeldung)

    (übrigens in der Praxis gefährlich, wenn irgendein Experte nur einen Vor- oder nachnamen oder mehrere Kommas in die Namenssteuerdatei eingebaut haben sollte).

    Noch nen Tip, ich nehm immer einen anderen Variablennamen also z.B.
    Zeile_gel für gelesene Zeile
    Zeile_ges (für gesamte Zeile aus Vor- und Nachnamen)
    sicher irgendwo Geschackssache aber wenn ich das Teil in 2 jahren wieder editieren muß übersichtlicher.


    Gruss aus dem Spessart


    German


    $VorNachnamefile="F:\nix99\vornachname.txt"
    Dim $aRecords

    If Not _FileReadToArray($VorNachnamefile,$aRecords) Then
    MsgBox(4096,"Error", " Error reading log to Array error:" & @error)
    Exit
    EndIf
    For $x = 1 to $aRecords[0]

    $line = $aRecords[$x]
    msgbox(0,"gelesene Zeile ist", $line,2)
    $AdUser=StringSplit($line, ",")
    if $Aduser[0] = 2 then ; !!!!!!!!!!!
    $AdUser=$AdUser[1] & "*," & $AdUser[2] & "*"
    msgbox(0,"AdUser ist", $Aduser)
    EndIf ; !!!!!!!


    Next

  • Programm läuft als Dienst

    • msp-holzwurm
    • 18. Januar 2008 um 19:42

    Hallo Ihr da:

    ein Dienst läuft mit der Bentutzerkennung SYSTEM, da gibts keine Netzlaufwerke, genauso, wenn Du versuchst mit nem at 18:45 c:\uti\tuwas.bat laufen zu lasssen.

    Der Dienst kann sich aber ein Laufwerk mappen und wieder trennen, dazu kann man in einer INI einen Benutzer anlegen, daß Paßwort sollte man aber tunlichst verschlüsselt hinterlegen.
    (am besten einen Dienst User: Backup oder sonstwas nehmen, der das Paßwort nicht ändert).

    Deine Lösung läuft nicht mehr, wenn der Benutzer administrator sein Paßwort ändert, dann mußt Du es hier auch ändern (ist bei geplanten Tasks identisch).

    Bei weiterem Interesse kann ich gerne etwas Futter posten.

    Grüße

    German

  • NTFS-Rechte auslesen

    • msp-holzwurm
    • 16. Januar 2008 um 22:02

    Hallo All!

    über das englische Forum hab ich jetzt was zu
    subinacl.exe gefunden und mir bei MS "gezerrt", gehört zum Ressource Workshop


    Werd das morgen mal testen und berichten.

    Gruss

    German

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™