Beiträge von autoBert

  • Start & Stop

    Hallo baris,

    ändere den Case-Zweig so ab:

    Spoiler anzeigen
    [autoit]

    Case $manuellstart
    $ok =True
    $hotkey = HotKeySet("{esc}", "_exit")
    $comboauslesen = GUICtrlRead($Combo1)
    GUICtrlSetState($selftime, $GUI_SHOW)
    GUICtrlSetState($selftime2, $GUI_SHOW)
    GUICtrlSetState($zueruck, $GUI_DISABLE)
    GUICtrlSetState($manuellstart, $GUI_DISABLE)
    GUICtrlSetState($input1, $GUI_DISABLE)
    GUICtrlSetState($Combo1, $GUI_DISABLE)
    $restwert = @HOUR & ":" & @MIN & ":" & @SEC

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

    GUICtrlSetData($selftime2, GUICtrlRead($input1))
    $ende = GUICtrlRead($input1)

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

    While 1 and $ok
    $restwert11 = @HOUR & @MIN & @SEC
    GUICtrlSetData($selftime, @HOUR & ":" & @MIN & ":" & @SEC)
    $text1 = StringReplace($ende, ":", "")

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

    If $restwert11 = $text1 Then
    _Combobox()
    EndIf
    $ok =GUIGetMsg() <> $stop

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

    Sleep(200)
    WEnd

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

    aber was hat das ganze mit dem IE zu tun?

    mfg (Auto)Bert

  • Start & Stop

    Zitat von autoBert

    Hallo baris,

    es gibt in deinem derzeitigen Skriptstand nichts zu stoppen, also erkläre, was du genau vor hast: denn auch ein folgender Auto-Login benötigt keine Schleife die man pausieren kann

    Edit: oder ist http://www.deutsche-bank.de garnicht die richtige Adresse?

    mfg autoBert

    auch bei Google gilt das gleiche, ohne Skript(-Beispiel) wo es Sinn macht ist kein Stop möglich

    mfg autoBert

  • Progressbar auslesen

    Für dein Beispiel funktioniert GuiCtrlRead, das weisst du warscheins selbst. Meine Glaskugel ist leider vom Tisch gerollt (während ich über dieses Beispiel lachen musste) also auch von ihr kein Support möglich, nenne also das Programm :cursing:

    mfg (Auto)Bert

  • VPN-Tunnel überprüfen ob steht und dann Netzlaufwerk verbinden

    Hallo ts1612 und nachfolgende Poster,

    der Threaderstellerr war seit 7.5.2010 nicht mehr online, dies ist sein einziger Thread. Er halt also nach dem Hinweis [ offen ] VPN-Tunnel überprüfen ob steht und dann Netzlaufwerk verbinden entweder sein Problem gelöst oder aufgegeben, eine weitere Diskussion ist also unnötig. Hier noch einmal die Lösung in Skriptform:

    [autoit]

    ShellExecuteWait(@ProgramFilesDir & "\Funkwerk\packetalarm SSL VPN Client\packetalarm_SSL_VPN_Client.exe", "/start /t=Zertifikat /u=" & $User & "@domain.local /pwd=" & $Password & " /cpwd=passwort")
    $ping = Ping("192.168.30.3",50000)
    MsgBox(0,"PING FOR IF",$ping)
    If $ping Then
    MsgBox(0,"PING AFTER IF",$ping)
    Sleep(2000)
    DriveMapAdd($Laufwerk, "\\SERVER\Netzlaufwerk", 0, "domain.local\" & $User, $Password)
    EndIf[

    [/autoit]

    mfg autoBert

  • Start & Stop

    Halo Baris,

    Zitat von Baris

    ich hab nichts besonderes vor, ich will nur mein Script mit ein knopf durck stoppen. aber nicht die gui schliessen.

    Es gibt nichts zu stopen_

    Zitat von autoBert

    im übrigen ist ein Stop-Button unnötig, da case $start ja nur nach anklicken ausgeführt wird und danach wartet dein Skript auf weitere Tatendrücke.


    Falls dir das Fenster deines Skriptes im Weg ist nimm den Minimier-Button,

    mfg (Auto)Bert

  • Start & Stop

    Hallo Baris,

    was soll das pushen nach 41 Minuten:

    Zitat

    Heute, 12:19 Von Baris
    Heute, 13:00 Von Baris

    dadurch bekommst du auch nicht schneller Hife, im übrigen ist ein Stop-Button unnötig, da case $start ja nur nach anklicken ausgeführt wird und danach wartet dein Skript auf weitere Tatendrücke.
    Kannst du uns erklären, was du genau vor hast,

    mfg (Auto)Bert

  • [Beispiel] SnapShot's from WebCam ver.: 0.8.1.3

    Zitat von Fabian

    @(Auto)Bert
    Hab das neue Script ausprobiert und konnte das Script problemlos 5mal hintereinander aufrufen! -> Funktioniert soweit :)


    wundert mich, denn eigentlich hatte ich ertwartet, dass du jetzt folgende Fehlermeldung bekommst:
    Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.
    dann scheint

    [autoit]

    _Singleton

    [/autoit]

    zu greifen und es wird zu einer vorgehenden (noch nicht beendeten) Instanz zurückgekehrt, das heisst SnapShot.exe müsste auch nach Beenden noch im Taskmanager zu sehen sein kannst du dass bitte prüfen

    mfg (Auto)Bert ,

  • Ungewollte Transparenz bei GUICtrlSetImage

    Hallo andygo,

    ich habe es in einem Beispiel sp gelöst:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <GuiListBox.au3>
    #include <File.au3>
    #include <array.au3>

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

    Opt('MustDeclareVars', 1)

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

    Global $msg, $message, $var, $aFiles, $idfrmMain, $sSourcePath, $sItem
    Global $szDrive, $szDir, $szFName, $szExt

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

    $idfrmMain = GUICreate("JPG-Viewer", 512, 460)
    Local $idfilemenu = GUICtrlCreateMenu("&Datei")
    Local $idfileitem = GUICtrlCreateMenuItem("Öffnen", $idfilemenu)
    GUICtrlSetState(-1, $GUI_DEFBUTTON)
    Local $idexititem = GUICtrlCreateMenuItem("Beenden", $idfilemenu)
    Local $idLB_Files = GUICtrlCreateList("", 5, 5, 502, 140)
    Local $idbtnShow = GUICtrlCreateButton("&Zeige Bild", 5, 150, 150, 25)
    Local $idPic = GUICtrlCreatePic("", 5, 180, 256, 256)
    GUISetState()
    While 1
    $msg = GUIGetMsg()
    Switch $msg
    Case $idfileitem

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

    $message = "Um mehrere Dateien auszuwählen, ist die Strg-Taste oder die Shift-Taste zu drücken."

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

    $var = FileOpenDialog($message, @MyDocumentsDir & "", "Bilder (*.jpg;*.bmp)", 1 + 4)
    If @error Then
    MsgBox(4096, "", "Keine Datei(en) ausgewählt")
    Else
    $aFiles = StringSplit($var, "|")
    If $aFiles[0] > 1 Then ;trifft nur bei Mehrfachauwal zu
    ;$aFiles[0] enthält Anzahl der Strings
    ;$aFiles[1] enthält den Pfad für alle ausgewählten Bilder
    ;$aFiles[2] enthält 1. Bild
    ;$aFiles[n+1] enthält n. Bild
    ;Rückgabe des Fileopenialogs in einzzenlne Strings für Array splitten
    ;_ArrayDisplay($aFiles) ;Array anzeigen nur zu Verständnisuwecken evtl. aktivieren
    For $i = 2 To $aFiles[0]
    _GUICtrlListBox_AddString($idLB_Files, $aFiles[1] & "\" & $aFiles[$i])
    Next
    Else
    ConsoleWrite($aFiles[1] & @CRLF)
    _GUICtrlListBox_AddString($idLB_Files, $aFiles[1])
    EndIf
    EndIf
    Case $idbtnShow
    $sItem = _GUICtrlListBox_GetText($idLB_Files, _GUICtrlListBox_GetCurSel($idLB_Files))
    If $sItem <> "" Then
    If $idPic <> 0 Then GUICtrlDelete($idPic) ;<================ löschen
    $idPic = GUICtrlCreatePic($sItem, 5, 180, 256, 256) ;<========= neu erzeugen
    EndIf
    Case $GUI_EVENT_CLOSE, $idexititem
    Exit
    EndSwitch
    WEnd

    [/autoit]

    mfg (Auto)Bert

  • Include Files erstellen?wie?

    Zitat von PCKing

    oben, direkt am anfang, falls du andere sachen includierst direkt dahinter

    Zitat von PCKing

    genau und wenn du noch andere sachen includierst würde es ungefähr so aussehen :

    [autoit]

    #include <GuiConstantsEx.au3>
    #include <EditConstants.au3>
    #include-once
    func test
    MsgBox(0,"","")
    EndFunc

    [/autoit]

    falsch siehe

    Zitat von Bemerkungen zu #include-once

    Wenn man eine Datei mehrfach einbindet und damit eine Funktion mehrfach existieren würde, wird man folgenden Fehler erhalten: "Duplicate function". Wenn man eine Include-Datei schreibt, die das verursachen könnte, muss man sicherstellen, dass die erste Zeile #include-once beinhaltet, sodass die Datei nicht mehrfach eingebunden werden kann.

    Quelle: dt. Hilfe

    mfg (Auto)Bert

  • hotkeyset problem

    Zitat von 93lucas

    ich meinte wenn man die taste a mit einem hotkey benutz ob man dann einstellen kann das die taste a ganz normal gesendet wird (nicht über autoit, sondern normal wie ohne hotkey)Und die funktion von dem hotkey angeht(kein problem 8) )


    Lies dir die Hilfe zu

    [autoit]

    HotKeySet

    [/autoit]

    genau durch, dann verstehst du auch warum HotKey's üblicherweise immer eine 2 oder gar 3-Tasten Kombination sind, dies solltest du auch machen, dabei aber berücksichtigen dass viele Kombinationen in anderen Programmen verwendet werden, die du dann ja um diese Möglichkeit beraubst.

    mfg (Auto)Bert

  • [Beispiel] SnapShot's from WebCam ver.: 0.8.1.3

    neues Update 0.8.1.3 siehe Post #1

    da es (zumindest bei @Fabian) vorkommt, dass sich das Programm nur einmal neustarten lässt habe ich Zwangsabbruch bei bereits laufender Instanz und fehlschlagender WebCam-Initialisierung eingefügt.

    @Fabian kannst du diese Version bitte testen. Falls es jetzt immer noch nicht klappt poste bitte deine relevanten Sytemdaten (BS + besonders die Eigenschaften der avicap32.dll und der user32.dll und die verwendete HW), damit ich im EN-Forum @Ludocus um Rat fragen kann,

    Zitat von PrideRage

    Jetzt klappts.
    Also ich muss sagen, super Skript. Könntest zwar noch nen Capture Button reinstecken aber das ist ja nicht so wichtig.
    Mir gefällts.

    Danke für die Blumen, aber wie du am Skript erkennen kannst, benutze ich die WebCam.AU3 von @ludocus aus dem EN-Forum, ihm gebührt also das Lob. Übrigens im gleichen Thread gibt es auch ein Script dass AVI's von der WebCam aufzeichnen kann. Die einzige Mühe die ich hatte war mit GDI+ die Zeit ins Bild zu schreiben, da ich dies äusserst selten benutze und (zumindest vom Lebensalter) dein Grossvater sein könnte (da lässt das Gedächtnis leider nach), aber dank der guten deutschen Hilfe (thanks to Tweaky, @doc & >Co) war das Problem ach nicht so gross,

    Edit3: PrideRage mit einfügen kannst du sofort einen SreenShot machen,

    mfg (Auto)Bert

  • AutoIt läuft nicht immer aus Netzwerk share

    Zitat von LGob

    Was ist an der einen Maschine anders?
    Warum klappt es auf der einen Vista und der /er Maschine nicht ?


    Ich kenne deine Maschinen und auch das Skript nicht, vermutlich Rechteprobleme auf der Freigabe, denn

    Zitat von LGob

    Kopiere ich das Script zuerst auf die Lokale HD und starte dann laufen die Scripts nach dem UAC Promt alle auf allen Maschinen durch ohne Fehler.

    Zitat von LGob

    Der Fehler der Kommt ist hier im Bild:

    Leider kein Bild zu sehen,

    mfg (Auto)Bert