Umgebungsvariable übergeben

  • Hi,

    ich habe mir folgenden quelltext aus verschiedenen Foren und wikis zusammengestellt:

    Code
    $sPassword = InputBox("Security Check", "Passwort eingeben.", "", "*")
    $objShell = ObjCreate("WScript.Shell")
    $colUserEnvVars = $objShell.Environment("User")
    $colUsrEnvVars("Passwort") = $sPassword

    In der MsgBox soll ein Passwort eingegeben werden was dann in der Umgebungsvariable "Passwort" gespeichert werden soll.
    Allerdings wird mir immer dieser Fehler ausgegeben.
    ==> Expected a "=" operator in assignment statement.:
    $colUsrEnvVars("APP_VARIABLE") = "Aktualisiert"
    $colUsrEnvVars^ ERROR

    Woran kann das liegen?

  • Hi, du hast nur einen Tippfehler!

    [autoit]

    $colUserEnvVars = $objShell.Environment("User")
    $colUsrEnvVars("Passwort") = $sPassword

    [/autoit]

    So ist es richtig :)

    [autoit]

    $colUserEnvVars = $objShell.Environment("User")
    $colUesrEnvVars("Passwort") = $sPassword

    [/autoit]

    Mfg
    Jens (McPoldy)

    Twitter: jkroeger

    Denn die Dinge, die wir erst lernen müssen, bevor wir sie tun, lernen wir beim Tun.(Aristoteles)

  • jau, besten dank, allerdings hast du in deiner antwort auch noch einen tippfehler

    [autoit]


    $colUserEnvVars = $objShell.Environment("User")
    $colUserEnvVars("Passwort") = $sPassword

    [/autoit]
  • nochmal eben schnell ne andere frage, ich habe jetzt eine msgbox für den Benutzernamen und eine für das passwort, wie kann ich die zusammen in eine basteln bzw. geht das überhaupt weil ich damit ja 2 verschiedene variablen erfrage?

    [autoit]


    $sName = InputBox("Benutzereingabe", "Benutzernamen eingeben.", "", "")
    $sPassword = InputBox("Benutzereingabe", "Passwort (Mailkennwort)", "", "*")

    [/autoit]
  • Am besten so etwas in Richtung Gui, hier mal ein schnelles Beispiel:

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $oForm = GUICreate("Anmeldung", 366, 129, 192, 124)
    $Label1 = GUICtrlCreateLabel("Username:", 16, 16, 55, 17)
    $Label2 = GUICtrlCreateLabel("Passwort:", 16, 56, 50, 17)
    $txtUser = GUICtrlCreateInput("", 88, 16, 257, 21)
    $txtPassword = GUICtrlCreateInput("", 88, 48, 257, 21, BitOR($ES_PASSWORD,$ES_AUTOHSCROLL))
    $cmdLogin = GUICtrlCreateButton("Anmelden", 48, 88, 129, 25, $WS_GROUP)
    $cmdESC = GUICtrlCreateButton("Abbrechen", 192, 88, 137, 25, $WS_GROUP)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    Local $username,$password

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $cmdESC
    Exit
    Case $cmdLogin
    $username = GUICtrlRead($txtUser)
    $password = GUICtrlRead($txtPassword)
    GUISetState(@SW_HIDE)
    ExitLoop
    EndSwitch
    WEnd

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

    ; Ab hier kannst du mit den beiden Variablen weiterarbeiten ($username, $password)

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

    MsgBox(64,'User und Passwort',$username & @LF & $password)

    [/autoit]

    Mfg
    Jens (McPoldy)

    Twitter: jkroeger

    Denn die Dinge, die wir erst lernen müssen, bevor wir sie tun, lernen wir beim Tun.(Aristoteles)

  • jau, das läuft super :thumbup:
    jetzt noch 2 Fragen, wozu bzw was ist eine gui und wie kann ich ordner umbenennen?
    habe bis jetzt nur was zu datein gefunden... :S

  • Eine GUI ist ein grafisches Benutzer Interface (Interface fällt mir grade keine Übersetzung ein, Oberfläche?) und um Ordner zu verschieben: DirMove, in der Hilfe unter Index eingeben.

    Mfg
    Jens (McPoldy)

    Twitter: jkroeger

    Denn die Dinge, die wir erst lernen müssen, bevor wir sie tun, lernen wir beim Tun.(Aristoteles)

  • Zitat

    wie kann ich ein Top als erledigt abzeichnen?

    im ersten Post editieren