Beiträge von x0r

  • Lokale Benutzer löschen

    Hi,

    wieso sparste dir nicht das ganze Zeug nach dem "Else" und nimmst nur

    [autoit]

    DirRemove ("C:\Dokumente und Einstellungen\" & $profil[$i], 1)

    [/autoit]


    ?

    oder bau statt dem Dateigröße-Check ein

    [autoit]

    if FileExists() then

    [/autoit]


    ein.

    Könnte mir vorstellen, dass es verreckt, wenn der Ordner nicht mehr existiert und du die Größe abfragen willst.

    €dit: Richtige Vermutung:

    [autoit]

    Until $inewsize = -1 or @error

    [/autoit]

    Dann müssts laufen :)

    €dit2: Die Erklärung:

    [autoit]

    $size = DirGetSize(@ScriptDir & "\test_delete")

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

    MsgBox(0,"",$size)

    [/autoit]

    Wenn Ordner vorhanden kommt die entsprechende Zahl.
    Wenn Ordner nicht vorhanden kommt "-1".

    Gruß
    x0r

  • Weihnachten Script Hilfe

    ...reine Spekulatius (äh, Spekulation ;)).
    Er könnte ja die "Date.au3"-Funktionen verwenden?

    -
    You can check out the functions in the "Date.au3"-include:

    e.g.

    [autoit]

    _Now()

    [/autoit]


    gives you the actual date and time

    (is mein englisch heute wieder toll...)

  • 32bit Anwendung unter 64bit OS extrem langsam

    Dann liegts wohl an allen Scripts die ich je erstellt habe...

    Sehr seltsam ;)

    €dit:

    Sogar das hier braucht zum Starten ca ne Minute:

    [autoit]

    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_outfile=x32_test.exe
    #AutoIt3Wrapper_UseX64=n
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****

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

    MsgBox(0,"","32 bit")

    [/autoit]

    Wohlgemerkt, nur in kompiliertem Zustand, im Interpreter läufts sofort.

  • Brauche hilfe bei der anpassung eines programms ( daten lesen und in Excel schreiben )

    Hi,

    ich kann es natürlich nicht testen, aber wenn ich deine Anfrage richtig verstehe, dürfte das so funktionieren:

    Spoiler anzeigen
    [autoit]

    HotKeySet("{ESC}", "_Exit")
    BlockInput (1)

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

    #include <Excel.au3>
    $sPath = @ScriptDir & "\Test1.xls"
    $oExcel = _ExcelBookOpen($sPath, 0)
    $iRow = 1

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

    While True
    $value = _ExcelReadCell($oExcel, "A" & $iRow)
    If $value = "" Then ExitLoop
    _Data($value)
    if $val1 <> "" then _ExcelWriteCell($oExcel, $val1, "B" & $iRow)
    if $val2 <> "" then _ExcelWriteCell($oExcel, $val2, "C" & $iRow
    $iRow += 1
    WEnd

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

    _ExcelBookClose($oExcel)

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

    Func _Data($value)
    ClipPut($value)
    WinActivate ( "QWS3270")
    WinWaitActive("QWS3270")
    Sleep (300)

    MouseClick("LEFT", 394, 397, 1, 0)

    Send ("^v")
    Send ("{ENTER}")
    Send ("9")
    Send ("{ENTER}")
    Sleep (300)

    MouseClick("LEFT", 360 , 394, 1, 0)
    Send("{LSHIFT down}")
    Send("{right 4}")
    Send("{LSHIFT up}")
    Send ("^c")

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

    $val1 = ClipGet()

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

    MouseClick("LEFT", 450 , 366, 1, 0)
    Send("{LSHIFT down}")
    Send("{right 4}")
    Send("{LSHIFT up}")
    Send ("^c")

    $val2 = ClipGet()
    EndFunc

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

    BlockInput (0)

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

    MsgBox (0, "Fertig", "Alle Daten in der XLS gespeichert", 2)

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

    ProcessClose("EXCEL.exe")

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

    Func _Exit()
    Exit
    EndFunc

    [/autoit]

    Gruß
    x0r

  • 32bit Anwendung unter 64bit OS extrem langsam

    64bit Prog auf 64bit OS is natürlich schnell, is nur so bei beschriebenem Fall.

    die 32bit-Anwendung braucht ziemlich lang, bis der Prozess im Taskmanager auftaucht - sobald er da is, rennts auch wieder schnell, nur eben der Startprozess dauert Jahre ;)

    €dit:

    @trollpan:

    Danke für den Tip, allerdings befinde ich mich aktuell in einer Firma und dort ist es mir nicht erlaubt irgendwas zu virtualisieren.

    Du willst aber jetz nich allen ernstes, dass ich dir den Quelltext poste, wenn es ein allgemeines Problem ist?!

    OS: "Windows Server 2008 R2 Enterprise x64"

    Normalerweise sollte es reichen wenn ich schreibe, dass eine 32bit Anwendung auf 64bit OS langsam ist (ich hab sogar geschrieben, warum das Prog zwingend 32bit haben muss...)

  • 32bit Anwendung unter 64bit OS extrem langsam

    Hi all,

    woran könnte es liegen, dass eine in 32bit kompilierte Anwendung unter einem 64bit OS ziemlich lange zum Starten braucht?
    (64bit ist nicht möglich, da ich mit Excel/Access 2003 arbeite und da die Datenbanken nicht korrekt geöffnet werden können, warum auch immer)

    Ich rede nicht von 1-2, sondern um die 30 Sekunden pro Start.

    Jemand ne Idee?

    Gruß
    x0r

  • Wie klicke ich in eine Listview oder Combobox in Windows

    wieso lässt nicht so oft "tab" drücken, bis das listview markiert is, drückst dann auf "pos1" oder "ende" (je nachdem, was näher dran ist) und lässt evtl den rest mit den pfeiltasten auswählen?

    oder muss es zwingend ein klick sein?

    €dit: übrigens, comboboxen checkboxen kannst du hervorragend mit "space" de-/aktivieren.

    Gruß
    x0r