Beiträge von FireFlyer

  • Konvertertool - Ordner übergreifend sauber Dateien suchen und auflisten

    und es wird auch nix angezeigt was während des speicherns passiert und danach nicht mehr da ist?

    Dann würde mir als letzte Methode nurnoch einfallen in einer Schleife zu prüfen ob sich die Dateigröße noch ändert, ich gehe jetzt mal von dem Ansatz aus:
    Man klickt auf Speichern, es rappelt und tut und die datei wird im sekunden takt immer größer und größer...
    Das kann man abfragen vllt irgendwie so:?

    Spoiler anzeigen
    [autoit]

    ;Hier kommt noch alles vornedran also das klicken im fenster und so
    $begin = TimerInit()
    Local $old_size
    while 1
    $size = FileGetSize($file)
    if $size > $old_size Then
    $begin = TimerInit()
    else
    if TimerDiff($begin) > 5000 Then ExitLoop ;hier die Zeit in Milisekunden einstellen wie lange die Datei die selbe größe haben darf
    EndIf
    $old_size = $size
    WEnd
    ;AB hier kommt die nächste datei!
    ;als test:
    MsgBox(0, "Test", "Der Speichervorgang wurde beendet!")

    [/autoit]

    Ich hoffe das geht so... ansonsten bitte jemand korrigieren :)

  • Inhalte der ini-Dateien ersetzten ?

    nein der aufbau einer Ini ist wie folgt:

    [Section]
    Key=Value
    Key=Value
    Key=Value
    Key=Value
    [Section]
    Key=Value
    Key=Value
    Key=Value

    und so weiter... d.h. eine section ist ein bereich wo sich keys bzw. values befinden... wenn du den section namen nicht weisst und auch nicht wissen willst benutze die funktion StringReplace
    Wenn du ihn wissen willst: (is jetzt grade in meinem kopf entstanden also keine garantie das es geht!)

    Spoiler anzeigen
    [autoit]

    Func inigetsection($file, $key, $value = 0)
    $section = IniReadSectionNames($file)
    Dim $output[1][2]
    For $i = 1 To Ubound($section)-1

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

    $read = IniRead($file, $section[$i], $key, "DEFAULTVALUE")
    if $value <> 0 AND $read = $value Then
    Redim $output[Ubound($output)+1][2]
    $output[$i-1][0] = $section[$i]
    $output[$i-1][1] = $read
    ElseIf $value = 0 AND $read <> "DEFAULTVALUE" Then
    Redim $output[Ubound($output)+1][2]
    $output[$i-1][0] = $section[$i]
    $output[$i-1][1] = $read
    EndIf

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

    Next
    Return $output
    EndFunc

    [/autoit]

  • Maus-Meter

    @ greenhorn

    Das mit der WMI hatte ich auch mal gefunden nur bei mir hat es an 3 von 5 rechnern eine höhere Auflösung als Objekt gegeben als in den Einstellungen der Graka... aber ich weiss leider nicht warum und hab auch keine Lösung gefunden... Ich hab grade nochmal an meinem Rechner hier im Büro geschaut, da scheint es zu stimmen.

  • Installationsskript

    naja silent parameter sind optionen mit dem du eine installation starten kannst z.b. bei winrar (ist jetzt ein beispiel wird nicht funktionieren!)

    du machst start --> ausführen und tippst z.b. folgendes ein:

    C:\winrar_setup.exe -dir "C:\Programme\WinRAR\" -h -a

    wenn du das ausführst würde z.b. kein fenster zu sehen sein wenn der parameter:

    -dir = Installationsort
    -h = hide also installation läuft im hintergrund
    -a = Installationsoption: Für alle benutzer Installieren

    Ist alles erfunden aber so ähnlich funktioniert die ganze sache und in autoit dann halt einfach so ;)

    [autoit]

    Run('C:\winrar_setup.exe -dir "C:\Programme\WinRAR\" -h -a')

    [/autoit]

  • Konvertertool - Ordner übergreifend sauber Dateien suchen und auflisten

    ich kann nur raten, aber funktionierts vllt so?

    Spoiler anzeigen
    [autoit]

    While $x <= $y

    $datei = $aFiles[$x]
    If @error Then
    MsgBox(48, "", "Fehler", 2)
    ExitLoop
    EndIf

    $dateiarray = _PathSplit($datei, $szDrive, $szDir, $szFName, $szExt) ; Pfad zerlegen
    $Datei_name = $dateiarray[3] & $dateiarray[4]


    $Datei_oE = $datei
    $Datei_oE = StringTrimRight($datei, 3)

    Sleep (2000)
    ShellExecute ($datei)

    While WinActive("Technobox CAD6", $aFiles[$x]) = 0
    WinActivate("Technobox CAD6", $aFiles[$x])
    WEnd

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

    Sleep (1000)
    Send ("{F12}") ;F12 Befehl für Speichern unter
    sleep (2000)

    While WinActive("Zeichnung speichern unter") = 0
    WinActivate("Zeichnung speichern unter")
    WEnd
    Send("{ALTDOWN}") ;Alt + S Befehl für Speichern
    Sleep (500)
    Send("s")
    Sleep (500)
    Send("{ALTUP}")
    Sleep (2000)

    While WinActive("DWG Export") = 0
    WinActivate("DWG Export")
    WEnd
    Send("{ENTER}") ;Enter Befehl für Ok
    Sleep (2000)

    Send("{CTRLDOWN}")
    Sleep (500)
    Send("{F4}") ;Strg + F4 Befehl für aktuelle Fenster vom Programm schliessen
    Sleep (500)
    Send("{CTRLUP}")
    sleep (2000)

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


    $x += 1

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

    WEnd

    [/autoit]

    Und bitte in Zukunft den Spoiler benutzen (Button links neben dem AutoIt Tag)

    EDIT: Wenn ich das richtig verstanden habe, bei jedem durchlauf öffnet sich also nochmal das Fenster? Also quasi wenn du 10 durchläufe hast hast du auch 10 offene Fenster? Mach einfach vor die Zeile $x += 1 ein WinClose() von dem Fenster das geschlossen werden soll ;)

  • Installationsskript

    es gibt für die meisten Programme / Installationen sogar noch was viel besseres:

    Silent Parameter!!!

    mit ihnen brauchst du garkeine oberfläche mehr ;)

    Ansonsten würde ich dir empfehlen dir die Funktion ControlClick anzuschauen und dich ein bisschen mit dem Autoit Window Info Tool zu befassen

  • Konvertertool - Ordner übergreifend sauber Dateien suchen und auflisten

    versuch das mal so ;)

    Spoiler anzeigen
    [autoit]

    While $x <=$y

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

    $datei = $aFiles[$x]
    If @error Then
    MsgBox(48, "", "Fehler", 2)
    ExitLoop
    Else

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

    $dateiarray = _PathSplit($datei, $szDrive, $szDir, $szFName, $szExt) ; Pfad zerlegen
    $Datei_name = $dateiarray[3] & $dateiarray[4]

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

    ;Datei_oE: Datei ohne Endung
    $Datei_oE = $datei
    $Datei_oE = StringTrimRight($datei, 3)

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

    ShellExecute($datei)
    ;Send ( "keys" [, flag] )
    Sleep (3000)

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

    ;If WinActive( "Technobox CAD6", $aFiles) then ;soll schon ne variable sein oder?
    While WinActive("Technobox CAD6") = 0
    WinActivate("Technobox CAD6")
    WEnd
    ;WinWaitActive ( "Technobox CAD6", $aFiles)
    Send ("{F12}")
    sleep (2000)
    ;EndIF

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

    ;If WinActive ("Zeichnung speichern unter") then
    ;WinWaitActive ("Zeichnung speichern unter")
    While WinActive("Zeichnung speichern unter") = 0
    WinActivate("Zeichnung speichern unter")
    WEnd
    Send("{ALTDOWN}")
    Send("s")
    Send("{ALTUP}")
    Sleep (2000)
    ;EndIf

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

    ;If WinActive ( "DWG Export", "") then
    ;WinWaitActive ("DWG Export", "")
    While WinActive("DWG Export") = 0
    WinActivate("DWG Export")
    WEnd
    Send("{ENTER}")
    Sleep (2000)
    ;EndIf

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

    ;If WinActivate ( "Technobox CAD6", $filesearch) then
    While WinActive("Technobox CAD6") = 0
    WinActivate("Technobox CAD6")
    WEnd
    Send("{CTRLDOWN}")
    Send("{F4}")
    Send("{CTRLUP}")
    sleep (2000)
    ;EndIF

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

    $x = $x +1 ; das kannst du auch so schreiben: $x += 1
    EndIf ;muss das hier nicht noch rein?!
    WEnd

    [/autoit]

    Keine Garantie dass das so funktioniert ist jetzt einfach mal so ausm Kopf raus (mach net wirklich viel mit den Win-Funktionen)

  • Limit möchte nicht arbeiten (GUICtrlSetLimit)

    ich hab mal noch eine allgemeine frage zu dem ganzen
    Das Tweakys beispiel ohne Probleme funktioniert ist mir klar nur:
    Gibt es bei inputs, genau wie bei den Comboboxen nicht auch irgendeine Methode mit GUIRegisterMsg?
    Das fände ich mal schön :) Quasi das man dann bei jeder änderung (inhalt) der inputbox etwas ausführen kann
    Ich habe da schon ein bisschen nach gesucht aber wo kriegt man denn sowas raus? Bei der ComboBox stehts in der Hilfe funktioniert auch wunderbar, nur das ganze auf eine Inputbox abzuändern hat bei mir nicht geklappt :(

    Kurz: Selber effekt wie z.b. bei HTML: onChange(funktion) erzeugen mit GUIRegisterMsg

  • Verbindung mit einem Server

    @DJ Basslord
    Ich selber wäre sogar sehr glücklich wenn man mit einem Programm wie AutoIt auf eine Websvr MySQL DB kommt. Es gibt entsprechende UDFs die funktionieren wunderbar, genau wie die SQLite UDF

    NUR

    Wie ich bereits sagte, die meisten Webserver die man "mietet" haben in ihren SQL setting beim Zugriff: local stehen, heisst nur ein script das auf dem Server liegt kann auf die DB zugreifen und hier liegt das Problem, man müsste PHP als "Schnittstelle" für AutoIt und MySQL nehmen und da wird es zwar nicht umbedingt sehr kompliziert aber meiner meinung nach ist es nicht sehr sicher...

    @bluelamp
    Ich würde aber anstatt $_GET, $_REQUEST nehmen und per autoit die seite mit der postmethode öffnen