Domänen-Netzlaufwerke mit einem Workgroup PC verbinden

  • Hallo zusammen,

    ich habe ein vorhandenes Script erweitert und gedacht, dass er beide Laufwerke verbindet. Aber er verbindet nur eins. Warum ?

    Danke für Antworten...

    Hier mein Script :


    #include <GUIConstants.au3>

    $err = 0

    GUICreate("Netzlaufwerk", 300, 300, 192, 125)

    $erstellen = GUICtrlCreateButton("&Erstellen", 10, 250, 75, 25, 0)
    $trennen = GUICtrlCreateButton("&Trennen", 90, 250, 75, 25, 0)
    $abbruch = GUICtrlCreateButton("&Abbruch", 170, 250, 75, 25, 0)

    $pfad = GUICtrlCreateInput("\\10.10.10.12\test", 110, 14, 131, 21)
    $pfad = GUICtrlCreateInput("\\10.10.10.12\test", 110, 44, 131, 21)
    $lwname = GUICtrlCreateInput("G:", 110, 74, 131, 21)
    $lwname = GUICtrlCreateInput("F:", 110, 104, 131, 21)
    $domain = GUICtrlCreateInput("Test", 110, 134, 131, 21)
    $benutzer = GUICtrlCreateInput("", 110, 164, 131, 21)
    $pwd = GUICtrlCreateInput("", 110, 194, 131, 21, $ES_PASSWORD)

    GUICtrlCreateLabel("Pfad zur Freigabe:", 10, 14, 90, 13)
    GUICtrlCreateLabel("Pfad zur Freigabe:", 10, 44, 90, 13)
    GUICtrlCreateLabel("Netzlaufwerkname:", 10, 74, 90, 13)
    GUICtrlCreateLabel("Netzlaufwerkname:", 10, 104, 90, 13)
    GUICtrlCreateLabel("Domainname:", 10, 134, 90, 13)
    GUICtrlCreateLabel("Benutzername:", 10, 164, 90, 13)
    GUICtrlCreateLabel("Passwort:", 10, 194, 90, 13)

    GUISetState()


    While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
    ExitLoop
    Case $msg = $erstellen
    LwVerbinden()
    Case $msg = $trennen
    LwTrennen()
    Case $msg = $abbruch
    ExitLoop
    EndSelect
    WEnd

    Func LwVerbinden()
    SplashTextOn("","Bitte Warten...",120,20,-1,-1,1)
    $map = DriveMapAdd(GUICtrlRead($lwname),GUICtrlRead($pfad),"",GUICtrlRead($domain)&"\"&GUICtrlRead($benutzer), GUICtrlRead($pwd))
    If @error Then $err = @error
    SplashOff()
    If $err <> 0 Then
    MsgBox(16,"","Das Netzlaufwerk ist bereits verbunden: "&$err)
    Else
    MsgBox(0,"","Netzlaufwerk wurde erfolgreich verbunden!")
    EndIf
    EndFunc

    Func LwTrennen()
    DriveMapDel("G:")
    DriveMapDel("F:")

    Exit
    EndFunc

  • hmmm hab's jetzt nicht getestet aber

    [autoit]

    $pfad = GUICtrlCreateInput("\\10.10.10.12\test", 110, 14, 131, 21)
    $pfad = GUICtrlCreateInput("\\10.10.10.12\test", 110, 44, 131, 21)
    $lwname = GUICtrlCreateInput("G:", 110, 74, 131, 21)
    $lwname = GUICtrlCreateInput("F:", 110, 104, 131, 21)

    [/autoit]

    2 mal die gleichen Variablen?

    änder doch mal in 2 Variablen und pass das Script an:

    [autoit]

    $pfad1 = GUICtrlCreateInput("\\10.10.10.12\test", 110, 14, 131, 21)
    $pfad2 = GUICtrlCreateInput("\\10.10.10.12\test", 110, 44, 131, 21)
    $lwname1 = GUICtrlCreateInput("G:", 110, 74, 131, 21)
    $lwname2 = GUICtrlCreateInput("F:", 110, 104, 131, 21)

    [/autoit]
    Zitat

    Laughing Man

    "I thought, what I'd do was, I'd pretend I was one of those deaf-mutes"

  • aber wie schreibe ich das hier rein...?

    Func LwVerbinden()
    SplashTextOn("","Bitte Warten...",120,20,-1,-1,1)
    $map = DriveMapAdd(GUICtrlRead($lwname),GUICtrlRead($pfad),"",GUICtrlRead($domain)&"\"&GUICtrlRead($benutzer),

    Gruß

  • wenn Du beide Laufwerke mapen möchtest musst du auch den Befeh DriveMapAddl zweimal geben. Momentan wird er ja auch nur einmal ausgeführt. Und mit den gleichnamigen Variablen klappt das bestimmt auch nicht!

    ---
    In "Independence Day" konnten die Windows-Erdcomputer problemlos mit denen der Außerirdischen kommunizieren. Was sagt uns das über unseren lieben Bill Gates? :D
    ---

  • [autoit]

    DriveMapAdd(GUICtrlRead($lwname1),GUICtrlRead($pfad1),"",GUICtrlRead($domain)&"\"&GUICtrlRead($benutzer)
    DriveMapAdd(GUICtrlRead($lwname2),GUICtrlRead($pfad2),"",GUICtrlRead($domain)&"\"&GUICtrlRead($benutzer)

    [/autoit]
    Zitat

    Laughing Man

    "I thought, what I'd do was, I'd pretend I was one of those deaf-mutes"