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. jNizM

Beiträge von jNizM

  • brauche hilfe bei meinem Updater

    • jNizM
    • 27. Dezember 2012 um 14:03

    Probiers mal damit:
    Geh in den Überordner, wo der Order mit deim Update erscheinen soll, mit Rechter Maustaste in die Eigenschaften --> Sicherheit und geb dir (dem Benutzer) die benötigten vollen Rechte.

    Alternativ dazu:
    Bei Sicherheit unten auf Erweitert --> Berichtigungen --> Berichtigungen ändern --> 1. Haken entfernen (auf Hinzufügen klicken wenn Popup erscheint) --> 2. Haken setzen und auf Übernehmen

  • Erweiterung Crypt.au3 um SHA2

    • jNizM
    • 27. Dezember 2012 um 13:33

    jup hast recht... hab mich vertan..
    funktioniert ab WinXP SP3

    http://msdn.microsoft.com/en-us/library/…9(v=vs.85).aspx

  • Erweiterung Crypt.au3 um SHA2

    • jNizM
    • 27. Dezember 2012 um 12:52

    joa danke für link.. hab eins eröffnet

  • Erweiterung Crypt.au3 um SHA2

    • jNizM
    • 27. Dezember 2012 um 10:35

    Warum ist in der Include <Crypt> kein SHA2 integriert?


    Hab das ganze mal erweitert

    <Crypt.au3> | SHA 2 Erweiterung

    [autoit]


    [...}
    Global Const $CALG_SHA_256 = 0x0000800c
    Global Const $CALG_SHA_384 = 0x0000800d
    Global Const $CALG_SHA_512 = 0x0000800e
    [...]

    [/autoit]

    _Crypt_HashData.au3 | Helpfile Erweiterung

    Spoiler anzeigen
    [autoit]


    #include <Crypt.au3>
    #include <ComboConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WinAPI.au3>
    #include <WindowsConstants.au3>

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

    Global $bAlgorithm = $CALG_SHA1, $iInputEdit = -1, $iOutputEdit = -1

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

    GUICreate("Realtime Hashing", 400, 320)
    $iInputEdit = GUICtrlCreateEdit("", 0, 0, 400, 150, $ES_WANTRETURN)
    $iOutputEdit = GUICtrlCreateEdit("", 0, 150, 400, 150, $ES_READONLY)
    Local $iCombo = GUICtrlCreateCombo("", 0, 300, 100, 20, $CBS_DROPDOWNLIST)
    GUICtrlSetData(-1, "MD2|MD4|MD5|SHA1|SHA256|SHA384|SHA512", "SHA1")
    GUIRegisterMsg($WM_COMMAND, "WM_COMMAND")
    GUISetState(@SW_SHOW)

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

    _Crypt_Startup() ; To optimize performance start the crypt library.

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

    While 1
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    Exit

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

    Case $iCombo ; Check when the combobox is selected and retrieve the correct algorithm.
    Switch GUICtrlRead($iCombo) ; Read the combobox selection.
    Case "MD2"
    $bAlgorithm = $CALG_MD2

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

    Case "MD4"
    $bAlgorithm = $CALG_MD4

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

    Case "MD5"
    $bAlgorithm = $CALG_MD5

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

    Case "SHA1"
    $bAlgorithm = $CALG_SHA1

    Case "SHA256"
    If (@OSVersion = "WIN_2000") Or (@OSVersion = "WIN_XPe") Then
    MsgBox(16, "Error", "Sorry, this algorithm is not available. Windows XP SP3+ only.") ; Show an error if the system is not Windows XP SP3+.
    ContinueLoop
    EndIf
    $bAlgorithm = $CALG_SHA_256

    Case "SHA384"
    If (@OSVersion = "WIN_2000") Or (@OSVersion = "WIN_XPe") Then
    MsgBox(16, "Error", "Sorry, this algorithm is not available. Windows XP SP3+ only.") ; Show an error if the system is not Windows XP SP3+.
    ContinueLoop
    EndIf
    $bAlgorithm = $CALG_SHA_384

    Case "SHA512"
    If (@OSVersion = "WIN_2000") Or (@OSVersion = "WIN_XPe") Then
    MsgBox(16, "Error", "Sorry, this algorithm is not available. Windows XP SP3+ only.") ; Show an error if the system is not Windows XP SP3+.
    ContinueLoop
    EndIf
    $bAlgorithm = $CALG_SHA_512
    EndSwitch

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

    Local $sRead = GUICtrlRead($iInputEdit)
    If StringStripWS($sRead, 8) <> "" Then ; Check there is text available to hash.
    Local $bHash = _Crypt_HashData($sRead, $bAlgorithm) ; Create a hash of the text entered.
    GUICtrlSetData($iOutputEdit, $bHash) ; Set the output box with the hash data.
    EndIf
    EndSwitch
    WEnd

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

    _Crypt_Shutdown() ; Shutdown the crypt library.

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

    Func WM_COMMAND($hWnd, $iMsg, $wParam, $lParam)
    #forceref $hWnd, $iMsg, $lParam

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

    Switch _WinAPI_LoWord($wParam)
    Case $iInputEdit
    Switch _WinAPI_HiWord($wParam)
    Case $EN_CHANGE
    Local $bHash = _Crypt_HashData(GUICtrlRead($iInputEdit), $bAlgorithm) ; Create a hash of the text entered.
    GUICtrlSetData($iOutputEdit, $bHash) ; Set the output box with the hash data.
    EndSwitch
    EndSwitch
    EndFunc ;==>WM_COMMAND

    [/autoit]

    Bilder:

    Spoiler anzeigen


    incl SHA2 (SHA 256, SHA 384 & SHA 512)
    [Blockierte Grafik: http://img4.fotos-hochladen.net/uploads/20121227101rv26w78smh.jpg]
    Fehler wenn Betriebssystem für die Funktion veraltet ist
    [Blockierte Grafik: http://img3.fotos-hochladen.net/uploads/20121227103eit6nupo73.jpg]

  • Lieblings MP-Maps

    • jNizM
    • 1. Oktober 2012 um 12:32

    Man muss aber auch den gleichen Modus hernehmen.:
    z.B. in CoD4
    S&D (Suchen und Zerstören) mit dem in den Ligen und Cups gespielten Mod Promod (aktuell 2.11)
    - 2 Teams (Def / Att)
    - Def =
    --- Att auf 0 dezimieren oder
    --- verhindern das die Bombe in der vorgegebenen Zeit geplantet wird und/oder
    --- Bombe entschärfen
    - Att =
    --- Def auf 0 dezimieren oder
    --- Bombe in der vorgegebnen Zeit planten und verteidigen
    - 2 Maps (jedes Team hat eine Map) optional 3te Map
    - im 5on5 wird mr12 gespielt
    - 1ne Runde dauert max. 2:45 min
    - Timeout (jedes Team hat pro Map pro Seite 1 Timeout = max 4 pro Team)

    Alles andere sind vom Admin (Pub) selbsterstellte Server-configs mit seinen eigenen Settings
    oder andere Modie wie TDM, DM, HQ, CTF, ...

  • Lieblings MP-Maps

    • jNizM
    • 1. Oktober 2012 um 11:58

    Ich bin aktiver CoD4-Spieler & CoDJumper (CoD2 gelegentlich) und kann dir daher nette CoD4 Maps nennen

    CoD4 Custom-Map's:

    • mp_cluster
    • mp_hideout
    • mp_dahman
    • mp_marketcenter

    Wobei man aber beachten muss, das CoD (vorallem CoD4) ein wesentlich schnelleres Spiel (zb im 5on5 ist) als die CS-Serie. Alleine schon wegen der Quake-Engine und der Möglichkeit des Rennens und der Quake-Engine-Bugs wie Strafejumps, Wallspeed & usw.

  • Montage (nicht der Wochentag=)

    • jNizM
    • 27. September 2012 um 07:48

    Ich trag mal was zum Offtopic bei :D

    In meinen ruhigen Minuten spiel ich abunan Call of Duty am PC.
    Ein Mate mit dem ich öfters spiel hat sein neues Movie fertig (hat vor 3 Jahren damit angefangen =) und nennt sich 8it (8-Bit).

    Youtube
    Youtube HD

    Was sagt ihr dazu?
    Ich find es richtig gelungen, gute effekte und tolle features... mal nicht so standard wie man sonst auf Youtube sieht

  • Autovervollständigung im GUICtrlCreateInput

    • jNizM
    • 24. September 2012 um 11:00

    deswegen ja meine frage ;)

  • Autovervollständigung im GUICtrlCreateInput

    • jNizM
    • 24. September 2012 um 10:56

    ich dachte da eher an eine andere möglichkeit

    [Blockierte Grafik: http://img5.fotos-hochladen.net/uploads/20120924105btqix3fj8m.jpg]

  • Autovervollständigung im GUICtrlCreateInput

    • jNizM
    • 24. September 2012 um 09:57

    Kann man eine Autovervollständigung in einem Input Feld einrichten?

    [autoit]


    GUICtrlCreateLabel("Benutzername:", 20, 10)
    Global $cInput_1 = GUICtrlCreateInput("", 20, 25, 200, 20)

    [/autoit]

    Dort sollen sich dann vordefinierte Benutzer automatisch vervollständigen
    zb. Peter, Hans, Thomas, usw

    Optimal wäre es, wenn mit dem Buchstaben 'P' das 'eter' in grau angezeigt wird (oder anders leicht in den Hintergrund stellen)

    Danke im Voraus

  • mstsc / rdp tool

    • jNizM
    • 21. September 2012 um 12:43

    da hab ich meine 2 rdps auf meim rechner
    das script is ja mehr für andere die auf virtuelle connecten um was zu machen/testen

  • mstsc / rdp tool

    • jNizM
    • 21. September 2012 um 09:17

    jup.. habs jez so gelöst:

    [Blockierte Grafik: http://img5.fotos-hochladen.net/uploads/20120921091epc4dlgzsk.jpg]

    Spoiler anzeigen
    [autoit]


    #cs ----------------------------------------------------------------------------

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

    AutoIt Version...: 3.3.8.1
    Author...........: jNizM
    Version..........: 1.0
    Datum............: 2012-09-19
    Script Function..: Remotedesktop starten...

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

    #ce ----------------------------------------------------------------------------

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

    #include <array.au3>
    #include <file.au3>
    #include <ComboConstants.au3>
    #include <GuiConstantsEx.au3>
    #include <GUIConstants.au3>

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

    ; ##############################################################################
    ; SCRIPT START
    ; ##############################################################################

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

    Global $hFile = FileOpen("Z:\irgendwo\rdp\rdp.log", 1)
    Global $sStartDatei
    Global $rdpDirectory = "Z:\irgendwo\rdp\"
    Global $aServerFiles = _FileListToArray($rdpDirectory,"*.rdp",1)

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

    GUICreate(".rdp", 250, 200)

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

    GUICtrlCreateLabel("Benutzername:", 20, 10)
    Global $cInput_1 = GUICtrlCreateInput("", 20, 25, 200, 20)

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

    GUICtrlCreateLabel("Server:", 20, 60)
    $cProgram = GUICtrlCreateCombo("", 20, 75, 200, 20, BitOR($CBS_DROPDOWNLIST, $CBS_AUTOHSCROLL))
    If $aServerFiles <> 0 Then
    $sData = ""
    For $i=1 To $aServerFiles[0]
    $sData &= $aServerFiles[$i] & "|"
    Next
    GUICtrlSetData($cProgram,StringTrimRight($sData,1),$aServerFiles[1])
    EndIf

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

    GUICtrlCreateLabel("Grund:", 20, 110)
    Global $cInput_3 = GUICtrlCreateInput("", 20, 125, 200, 20)

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

    Global $cSave = GUICtrlCreateButton("Starten", 20, 160, 80, 25)
    Global $cExit = GUICtrlCreateButton("Beenden", 140, 160, 80, 25)

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

    GUISetState()

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

    While 1
    If GUICtrlRead($cInput_1) <> "" And GUICtrlRead($cProgram) <> "" And GUICtrlRead($cInput_3) <> "" Then
    If BitAND(GUICtrlGetState($cSave), $GUI_DISABLE) Then GUICtrlSetState($cSave, $GUI_ENABLE)
    Else
    If BitAND(GUICtrlGetState($cSave), $GUI_ENABLE) Then GUICtrlSetState($cSave, $GUI_DISABLE)
    EndIf

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

    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    FileClose($hFile)
    Exit
    Case $cSave
    $sTime = @YEAR & "-" & @MON & "-" & @MDAY & "/" & @HOUR & ":" & @MIN & ":" & @SEC
    FileWriteLine($hFile, $sTime & ":" & @TAB & GUICtrlRead($cInput_1) & @TAB & GUICtrlRead($cProgram) & @TAB & GUICtrlRead($cInput_3))
    Run ("mstsc.exe " & $rdpDirectory & GUICtrlRead ($cProgram))
    Case $cExit
    FileClose($hFile)
    Exit
    EndSwitch
    WEnd

    [/autoit]

    Alle rdp dateien liegen in einem Ordner, der von der Combobox ausgelesen wird.
    Starten lässt sich das ganze nur wenn alle Felder ausgefüllt sind.
    Ebenfalls werden alle Felder incl Datum mitgeloggt.

    [Blockierte Grafik: http://img5.fotos-hochladen.net/uploads/20120921092rqmhbx1ta4.jpg]

    danke an alle helfer

  • Userpics von euch :)

    • jNizM
    • 21. September 2012 um 08:57

    8|

    Spoiler anzeigen
    Spoiler anzeigen
    Spoiler anzeigen
    Spoiler anzeigen
    Spoiler anzeigen
    Spoiler anzeigen
    Spoiler anzeigen
    Spoiler anzeigen
    Spoiler anzeigen
    Spoiler anzeigen

    :whistling:

  • mstsc / rdp tool

    • jNizM
    • 20. September 2012 um 15:08

    nich so ganz...
    den parameter kann man nicht mitgeben:

    Code
    username:s:

    und einige andere auch nicht

  • mstsc / rdp tool

    • jNizM
    • 19. September 2012 um 17:25

    gmmg:
    es sind nicht nur server auf die ich per rdp connecte

    misterspeed:
    ich schaus mir morgen mal an, allerdings sollte es übers erste script laufen.. muss ich mir dann noch zusammenfriemeln

  • mstsc / rdp tool

    • jNizM
    • 19. September 2012 um 13:45
    Spoiler anzeigen
    [autoit]


    #cs ----------------------------------------------------------------------------

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

    AutoIt Version...: 3.3.8.1
    Author...........: ich
    Version..........: 0.2
    Datum............: 2012-09-19
    Script Function..: Remotedesktop starten...

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

    #ce ----------------------------------------------------------------------------

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

    #include <ComboConstants.au3>
    #include <GuiConstantsEx.au3>
    #include <GUIConstants.au3>

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

    ; ##############################################################################
    ; SCRIPT START
    ; ##############################################################################
    Global $hFile = FileOpen("Z:\irgendwo\rdp\log\rdp.log", 1)
    Global $sStartDatei

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

    GUICreate(".rdp", 250, 200)

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

    GUICtrlCreateLabel("Benutzername:", 20, 10)
    Global $cInput_1 = GUICtrlCreateInput("", 20, 25, 200, 20)

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

    GUICtrlCreateLabel("Server:", 20, 60)
    Global $cProgram = GUICtrlCreateCombo("", 20, 75, 200, 20, BitOR($CBS_DROPDOWNLIST, $CBS_AUTOHSCROLL))
    GUICtrlSetData(-1, "Test1|Test2|Test3")

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

    GUICtrlCreateLabel("Grund:", 20, 110)
    Global $cInput_3 = GUICtrlCreateInput("", 20, 125, 200, 20)

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

    Global $cSave = GUICtrlCreateButton("Starten", 20, 160, 80, 25)

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

    Global $cExit = GUICtrlCreateButton("Beenden", 140, 160, 80, 25)

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

    GUISetState()

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

    While 1
    If GUICtrlRead($cInput_1) <> "" And GUICtrlRead($cProgram) <> "" And GUICtrlRead($cInput_3) <> "" Then
    If BitAND(GUICtrlGetState($cSave), $GUI_DISABLE) Then GUICtrlSetState($cSave, $GUI_ENABLE)
    Else
    If BitAND(GUICtrlGetState($cSave), $GUI_ENABLE) Then GUICtrlSetState($cSave, $GUI_DISABLE)
    EndIf

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

    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    FileClose($hFile)
    Exit
    Case $cSave
    $sTime = @YEAR & "-" & @MON & "-" & @MDAY & "/" & @HOUR & ":" & @MIN & ":" & @SEC
    FileWriteLine($hFile, $sTime & ":" & @TAB & GUICtrlRead($cInput_1) & @TAB & GUICtrlRead($cProgram) & @TAB & GUICtrlRead($cInput_3))
    Run ($sStartDatei)
    Case $cProgram
    Switch GUICtrlRead($cProgram)
    Case "Test1"
    $sStartDatei = "mstsc.exe Z:\irgendwo\rdp\test1.rdp"
    Case "Test2"
    $sStartDatei = "mstsc.exe Z:\irgendwo\rdp\test2.rdp"
    Case "Test3"
    $sStartDatei = "mstsc.exe Z:\irgendwo\rdp\test3.rdp"
    EndSwitch
    Case $cExit
    FileClose($hFile)
    Exit
    EndSwitch
    WEnd

    [/autoit]


    da ich das script ja als exe compiliere und es abunan neue rdp's hinzukommen, wie kann ich den ordner auslesen wo die rdp's sind, sodass er die selbständig zur Combobox hinzufügt
    sodass ich dann wie hier

    Spoiler anzeigen
    [autoit]


    #include <GUIConstantsEx.au3>

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

    $Form1 = GUICreate("RDP Session", 222, 116, 212, 116)
    $Combo1 = GUICtrlCreateCombo("", 24, 24, 145, 25)
    $Button1 = GUICtrlCreateButton("Start", 24, 72, 75, 25, 0)
    $Button2 = GUICtrlCreateButton("Cancel", 120, 72, 75, 25, 0)
    GUICtrlSetData ($Combo1, "Server1|Server2|Server3", "Server1")
    GUISetState(@SW_SHOW)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    Run ("%SystemRoot%\system32\mstsc.exe /v:" & GUICtrlRead ($Combo1))
    Exit
    Case $Button2
    Exit
    EndSwitch
    WEnd

    [/autoit]


    mir die "run" einträge einzeln sparen kann

  • Input Felder, OK-Butten, Email, ...

    • jNizM
    • 7. August 2012 um 12:25

    Am Anfang des Startens wird überprüft ob ich eine neue Version zu Verfügung gestellt hab,
    wenn ja: updaten (.exe austauschen)
    wenn nein: weiter gehts

  • Input Felder, OK-Butten, Email, ...

    • jNizM
    • 7. August 2012 um 12:15

    ich Dank die vielmals für die Hilfe =)

    und die Update Funktion passt die soweit?
    am liebsten wär mir ja nur eine .exe, die die Update-Funktion einschließt

    version.txt

    Code
    [versionsection]
    versionskey=versionsname 1.2


    Update.exe

    [autoit]


    Tooltip("Update",0,0)
    FileCopy("D:\test1\runas.exe", "D:\test2\runas.exe", 1)
    MsgBox(0,"","Update abgeschlossen - starte programm")
    Exit Run("D:\test2\runas.exe")

    [/autoit]


    Funktion im Scirpt

    [autoit]


    $version = "versionsname 1.0"

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

    If FileExists(@ScriptDir & "\Update.exe") Then
    FileCopy("D:\test1\version.txt", "D:\test2\version.txt", 1)
    $aktuelle_version = IniRead("D:\test2\version.txt","versionsection","versionskey","")
    FileDelete("D:\test2\version.txt")
    IF $aktuelle_version <> $version Then
    MsgBox(0,"","Update nötig")
    Exit Run("D:\test2\Update.exe")
    Else
    MsgBox(0,"","Kein neues Update")
    Endif
    Else
    MsgBox(0,"Warnung","Update.exe nicht gefunde")
    EndIf

    [/autoit]
  • Input Felder, OK-Butten, Email, ...

    • jNizM
    • 7. August 2012 um 12:03

    der Fehler lag bei mir.... musste das If G...Read ins While 1 setzten.. und davor wars außerhalb =)

    gibts sonst irgendwie Verbesserungsvorschläge oder sowas =)

  • Input Felder, OK-Butten, Email, ...

    • jNizM
    • 7. August 2012 um 11:53

    wasn 8|

    Spoiler anzeigen
    [autoit]


    #include <ComboConstants.au3>
    #include <GuiConstantsEx.au3>
    #include <GUIConstants.au3>

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

    ; update-funktion

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

    GUICreate("Test", 250, 200)

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

    GUICtrlCreateLabel ("Benutzername:", 20, 10)
    Global $cInput_1 = GUICtrlCreateInput("", 20, 25, 200, 20)

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

    GUICtrlCreateLabel ("Programm:", 20, 60)
    Global $cInput_2 = GUICtrlCreateCombo("Firefox", 20, 75, 200, 20, BitOR($CBS_DROPDOWNLIST,$CBS_AUTOHSCROLL))
    GUICtrlSetData(-1, "Chrome|IE")

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

    GUICtrlCreateLabel ("Grund:", 20, 110)
    Global $cInput_3 = GUICtrlCreateInput("", 20, 125, 200, 20)

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

    Global $cSave = GUICtrlCreateButton("Speichern", 80, 160, 80, 25)

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

    GUISetState()

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

    Global $hFile = FileOpen(@DesktopDir & "\Test.txt", 1)
    Global $sUserName = "benutzer"
    Global $sDomain = "domäne"
    Global $sPassword = "passwort"

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

    While 1
    If GUICtrlRead($cInput_2) = "Firefox" Then
    $sStartDatei = "C:\Program Files (x86)\Mozilla Firefox\firefox.exe"
    ElseIf GUICtrlRead($cInput_2) = "Chrome" Then
    $sStartDatei = "C:\Users\Thomann\AppData\Local\Google\Chrome\Application\chrome.exe"
    ElseIf GUICtrlRead($cInput_2) = "IE" Then
    $sStartDatei = "C:\Program Files\Internet Explorer\iexplore.exe"
    EndIf

    If GUICtrlRead($cInput_1) <> "" And GUICtrlRead($cInput_2) <> "" And GUICtrlRead($cInput_3) <> "" Then
    If BitAND(GUICtrlGetState($cSave), $GUI_DISABLE) Then GUICtrlSetState($cSave, $GUI_ENABLE)
    Else
    If BitAND(GUICtrlGetState($cSave), $GUI_ENABLE) Then GUICtrlSetState($cSave, $GUI_DISABLE)
    EndIf

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

    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    FileClose($hFile)
    Exit
    Case $cSave
    $sTime = @YEAR & "-" & @MON & "-" & @MDAY & "/" & @HOUR & ":" & @MIN & ":" & @SEC
    FileWriteLine($hFile, $sTime & ":" & @TAB & GUICtrlRead($cInput_1) & @TAB & GUICtrlRead($cInput_2) & @TAB & GUICtrlRead($cInput_3))
    RunAs($sUserName, $sDomain, $sPassword, 0, $sStartDatei)
    ;RunAs($sUserName, $sDomain, $sPassword, 0, @AutoItExe & ' /AutoIt3ExecuteLine "ShellExecute(''' & $commands[$i] & ''')"', @SystemDir)
    ;RunAsWait($sUserName, $sDomain, $sPassword, 0, $sStartDatei)
    EndSwitch
    WEnd

    [/autoit]

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™