Beiträge von John8

  • Datei außerhalb von autostart mit Windows starten

    Man muss 1. als Admin starten und 2. auf 64Bit überprüfen (und ggf. anpassen), dann sollte es funktionieren:
    ;)

    Beispiel
    [autoit]

    #RequireAdmin

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

    $iReturn = _SetRegAutostart('cmd', @WindowsDir & '\System32\cmd.exe') ;=>Legt CMD als Autostart Programm fest
    MsgBox(64, 'Info', 'Return : ' & $iReturn & ' | @Error : ' & @error)

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

    Func _SetRegAutostart($sName, $sPath)
    Local $iReturn, $sMainKey = 'HKLM'
    If @CPUArch = 'X64' Then
    $sMainKey = $sMainKey & '64'
    EndIf
    $iReturn = RegWrite($sMainKey & '\SOFTWARE\Microsoft\Windows\CurrentVersion\Run', $sName, 'REG_SZ', $sPath)
    SetError(@error)
    Return $iReturn
    EndFunc

    [/autoit]

  • FTP Upload

    Torni:

    Stimmt, vor Sleep sollte noch _FTP_Close, das habe ich vergessen...

    autoBert:

    Soweit ich den TE verstanden habe gibt's keine Abbruchbedingung.
    Ich weiß nicht, ob man den Login wirklich nur vor die Schleife setzen kann, da ja auch irgendwann ein Timeout eintritt, oder?
    Von daher dachte ich, dass man die Verbindung stabil halten sollte.

  • FTP Upload

    Hi,

    auch wenn eigentlich die Hilfe (mit den erforderlichen Grundlagen) ausreichen sollte und du den Code verstehen solltest,
    hier mal ein ungetestetes Beispiel:

    Beispiel
    [autoit]

    #include <FTPEx.au3>

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

    #region Settings
    Const $sServer = 'test.mymabbo.org' ; Servername
    Const $sUser = 'test234' ; Benutzername
    Const $sPassword = 'x' ; Passwort des Benutzers
    Const $sLocalFile = @ScriptDir & '\Beispiel.dat' ; Lokale Datei, die hochgeladen werden soll
    Const $sRemoteFile = 'Beispiel.dat' ; Datei auf dem Server
    #endregion

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

    Global $hFTP_Open, $hFTP_Connect

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

    _StartLoop(15)

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

    Func _StartLoop($iMin)
    Local $iMS, $iCounter = 1
    $iMS = $iMin * 60 * 1000 ; rechnet Min in MS um
    while FileExists($sLocalFile) ; Vorgang wird solange wie Datei existiert ausgeführt -> Endlosschleife
    _LogIn($sServer, $sUser, $sPassword) ; Loginvorgang
    If $hFTP_Connect = 0 Then
    MsgBox(16, 'Fehler', 'Benutzerdaten überprüfen, konnte keine Verbindung zum Server herstellen.')
    EndIf
    _FTP_FilePut($hFTP_Connect, $sLocalFile, $sRemoteFile) ; Datei $sLocalFile hochladen
    If @error Then
    MsgBox(16, 'Fehler', 'Fehler beim Upload der Datei.')
    Else
    MsgBox(64, 'Info', 'Datei erfolgreich hochgeladen (zum ' & $iCounter & '. Mal).')
    EndIf
    $iCounter = $iCounter + 1 ; optionaler Counter
    _FTP_Close($hFTP_Open)
    Sleep($iMS) ; wartet 15 Minuten
    WEnd
    EndFunc

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

    Func _LogIn($sServer, $sUser, $sPassword)
    $hFTP_Open = _FTP_Open('FTP1')
    $hFTP_Connect = _FTP_Connect($hFTP_Open, $sServer, $sUser, $sPassword)
    Return $hFTP_Connect
    EndFunc

    [/autoit]

  • Fehler Suche

    EndSwitch und wEnd fehlen am Ende...
    Das sieht man allerdings auch an der Fehlermeldung, die der Interpreter ausspuckt, wenn du den Skript ausführst.
    Ich empfehle dir die Grundlagen von AutoIt und diesen hilfreichen Thread: https://autoit.de/index.php?page=Thread&amp;threadID=13785

    Edit: Ich hoffe, dass das kein Login-Klauprogramm o.Ä. ist, dann bist du nämlich hier falsch.
    Edit2: Außerdem kann ich auch Shadowigor in allen Punkten zustimmen.
    Wenn du Hilfe erwartest, solltest du den Fehler richtig beschreiben... "Geht nicht" hilft keinem weiter.
    Auch der Titel ist absolut nicht aussagekräftig und deine Rechtschreibung...
    Edit3: Gerade ist mir auch aufgefallen, dass du in Zeile 40 deines Codes einen falschen Variablennamen nutzt, was auch zum Absturz führen kann,
    sofern "Felix" und "123" eingegeben wird.

  • Mittlere Maustaste bei HotKeySet

    Zitat von von Make-Grafik

    Oder du nimmst die _IsPressed() Funktion aus der Misc.au3. Die Misc.au3 ist schon bereits mitgeliefert.
    Einzigster Nachteil: Du musst permament nachfragen, ob die Taste gedrückt wurde.

    Um wirklich exakt den selben Effekt wie bei der normalen HotKeySet Funktion hervorzurufen würde ich schon die UDF nutzen, da _IsPressed die Taste nicht gleichzeitig blockiert.
    Das kann natürlich auch ein Nachteil sein, aber eXtensionStudio hat ja nach HotKeySet gefragt.

  • Mit Autoit .reg Datei ausführen

    Ich frage mich ehrlich gesagt noch immer, was an dem:

    [autoit]

    RegWrite('HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\Utilman.exe', 'Debugger', 'REG_SZ', 'cmd.exe')

    [/autoit]


    genau falsch war...

    Naja, du hast es ja jetzt auf eine andere Weise gelöst, von daher ist es ja jetzt egal...