Beiträge von subzero007

  • DefaultUsername auslesen

    Ich hoffe ich stelle nicht zu viele fragen nicht das ich unangenehm auffalle?

    Was mache ich falsch?

    Ziel ist es dir Physikalische Adresse also MAC ins $input1 einzutragen kann eine oder mehrere enthalten.

    Danke für die Hilfe

    Physikal. Adresse Transportname
    =================== =====================================================
    00-1A-6B-D0-98-77 \Device\Tcpip_{4F7590E5-03B4-4CE4-8257-872B2CE23952}
    00-13-E8-B8-59-37 Medien ausgeworfen
    42-AE-90-C8-57-F6 \Device\Tcpip_{29131384-23C8-4B9B-A7CE-BBCB9F3A190D}
    00-50-56-C0-00-01 \Device\Tcpip_{C94789A4-37BE-4EA5-BBD1-DC64B7164536}
    00-50-56-C0-00-08 \Device\Tcpip_{CE9777B6-BBF7-434F-AA78-49D7FAFF5268}

    Spoiler anzeigen
    [autoit]

    Case $Verbinden
    ;Vorherrige abfrage mit Ping online ist = 0
    $var = Ping("" & GUICtrlRead($cnameinput) & "",250)
    If $var Then ; also possible: If @error = 0 Then ...
    Msgbox(0,"Status"," " & GUICtrlRead($cnameinput) & " ist Online " )
    Else
    Msgbox(0,"Status"," " & GUICtrlRead($cnameinput) & " ist Offline " )
    EndIf

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

    $var = RegRead("\\" & GUICtrlRead($cnameinput) & "\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\winlogon", "Defaultusername")
    GUICtrlSetData($input2, $var)
    Run(@ComSpec & " /c " & 'getmac.exe -s ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
    GUICtrlSetData($input1, )

    [/autoit]

  • DefaultUsername auslesen

    soweit so gut lokal geht es ja auch bei mir kann es auch in input feld reinschreiben und die vari bale welcher pc ausgelesen wird klappt auch aber mit dem remote nicht so richtig

    Hier ein gehversuch von einem anfäger ,-)

    was mache ich falsch?

    $var = RegRead("\\ GUICtrlRead($cnameinput),\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\winlogon", "Defaultusername")
    GUICtrlSetData($input2, $var)

  • DefaultUsername auslesen

    habe jetzt ein problem mit der syntax

    Ich weiss es ist falsch aber was mache ich genau falsch kannst du es mir erklären?

    Case $Verbinden
    $var = RegRead("\\ GUICtrlRead($cnameinput),\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\winlogon", "Defaultusername")
    GUICtrlSetData($input2, $var)

  • DefaultUsername auslesen

    Danke für den Hinweis ;)


    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <GuiIPAddress.au3>
    #include <GUIListBox.au3>
    #include <StaticConstants.au3>
    #include <TabConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=d:\eyup\entwicklung\09-05-09.kxf
    $Form1 = GUICreate("Helper", 884, 523, 204, 127)
    GUISetIcon("D:\005.ico")
    GUICtrlCreateTab(16, 48, 820, 432)
    GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
    $Tabsheet1 = GUICtrlCreateTabItem("Remote")
    $Verbinden = GUICtrlCreateButton("Verbinden", 736, 104, 97, 33, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $STATUS = GUICtrlCreateButton("STATUS", 736, 72, 97, 33, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    GUICtrlSetBkColor(-1, 0x00FF00)
    $VNC = GUICtrlCreateButton("VNC", 736, 136, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $RemoteAssitance = GUICtrlCreateButton("RemoteAssitance", 736, 160, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $RDP = GUICtrlCreateButton("RDP", 736, 184, 97, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $C = GUICtrlCreateButton("C", 736, 208, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button1 = GUICtrlCreateButton("Button1", 736, 232, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $cnameinput = GUICtrlCreateInput("", 24, 98, 121, 22)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $macinput = GUICtrlCreateInput("", 184, -78, 129, 22)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Computername = GUICtrlCreateLabel("Computername", 184, -166, 96, 20)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    $IP = GUICtrlCreateLabel("IP", 184, -54, 12, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $MAC = GUICtrlCreateLabel("MAC", 184, -94, 27, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $userinput = GUICtrlCreateInput("", 184, -117, 121, 22)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Username = GUICtrlCreateLabel("Username", 184, -133, 53, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $IPAddress1 = _GUICtrlIpAddress_Create($Form1, 184, -37, 122, 21)
    _GUICtrlIpAddress_Set($IPAddress1, "0.0.0.0")
    $Input1 = GUICtrlCreateInput("", 26, 175, 129, 22)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label1 = GUICtrlCreateLabel("Computername", 26, 79, 96, 20)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    $Label3 = GUICtrlCreateLabel("MAC", 26, 159, 27, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Input2 = GUICtrlCreateInput("", 26, 136, 121, 22)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label4 = GUICtrlCreateLabel("Username", 26, 120, 53, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $RCMD = GUICtrlCreateButton("RCMD", 736, 256, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $RemoteReg = GUICtrlCreateButton("RemoteReg", 736, 280, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Admin = GUICtrlCreateTabItem("Admin")
    $Rollout = GUICtrlCreateTabItem("Rollout")
    $OnlineCheck = GUICtrlCreateTabItem("OnlineCheck")
    $List1 = GUICtrlCreateList("", 32, 128, 121, 305)
    $ListeLaden = GUICtrlCreateButton("ListeLaden", 32, 448, 123, 25, 0)
    $Computerliste = GUICtrlCreateLabel("Computerliste", 32, 104, 67, 17)
    $List2 = GUICtrlCreateList("", 168, 128, 121, 305)
    $ExportOnline = GUICtrlCreateButton("ExportOnline", 168, 448, 123, 25, 0)
    $Online = GUICtrlCreateLabel("Online", 168, 104, 34, 17)
    $List3 = GUICtrlCreateList("", 304, 128, 121, 305)
    $ExportOffline = GUICtrlCreateButton("ExportOffline", 304, 448, 123, 25, 0)
    $Offline = GUICtrlCreateLabel("Offline", 304, 104, 34, 17)
    $Check = GUICtrlCreateButton("Check", 32, 80, 123, 25, 0)
    GUICtrlCreateTabItem("")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $VNC
    Run(@ComSpec & " /c " & 'vnc\vncstart.bat ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
    case $c
    Run(@ComSpec & " /c " & 'explorer\rmc.bat ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
    case $RemoteAssitance
    Run(@ComSpec & " /c " & 'vnc\remass.bat ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
    case $RemoteReg
    Run(@ComSpec & " /c " & 'remote\remoteregxp.exe ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
    case $ListeLaden
    FileOpenDialog("Öffnen", "C:\", "Text Dateien (*.txt)| Excel (*.csv)| Text Dateien(*.txt)")
    Case $Verbinden
    $var = RegRead("\\GUICtrlRead($cnameinput), \HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\winlogon", "Defaultusername")
    GUICtrlSetData (-1,"$input2"), $var)
    EndSwitch
    WEnd

    [/autoit]

  • DefaultUsername auslesen

    habe entwender einen denk oder verständnis Problem

    Also rechte habe ich aus zielrechner

    würde mich freuen wenn jemand meine Code anschauen würde zeile 93-95

    Danke

    Spoiler anzeigen

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <GuiIPAddress.au3>
    #include <GUIListBox.au3>
    #include <StaticConstants.au3>
    #include <TabConstants.au3>
    #include <WindowsConstants.au3>

    #Region ### START Koda GUI section ### Form=d:\eyup\entwicklung\09-05-09.kxf
    $Form1 = GUICreate("Helper", 884, 523, 204, 127)
    GUISetIcon("D:\005.ico")
    GUICtrlCreateTab(16, 48, 820, 432)
    GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
    $Tabsheet1 = GUICtrlCreateTabItem("Remote")
    $Verbinden = GUICtrlCreateButton("Verbinden", 736, 104, 97, 33, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $STATUS = GUICtrlCreateButton("STATUS", 736, 72, 97, 33, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    GUICtrlSetBkColor(-1, 0x00FF00)
    $VNC = GUICtrlCreateButton("VNC", 736, 136, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $RemoteAssitance = GUICtrlCreateButton("RemoteAssitance", 736, 160, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $RDP = GUICtrlCreateButton("RDP", 736, 184, 97, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $C = GUICtrlCreateButton("C", 736, 208, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button1 = GUICtrlCreateButton("Button1", 736, 232, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $cnameinput = GUICtrlCreateInput("", 24, 98, 121, 22)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $macinput = GUICtrlCreateInput("", 184, -78, 129, 22)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Computername = GUICtrlCreateLabel("Computername", 184, -166, 96, 20)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    $IP = GUICtrlCreateLabel("IP", 184, -54, 12, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $MAC = GUICtrlCreateLabel("MAC", 184, -94, 27, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $userinput = GUICtrlCreateInput("", 184, -117, 121, 22)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Username = GUICtrlCreateLabel("Username", 184, -133, 53, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $IPAddress1 = _GUICtrlIpAddress_Create($Form1, 184, -37, 122, 21)
    _GUICtrlIpAddress_Set($IPAddress1, "0.0.0.0")
    $Input1 = GUICtrlCreateInput("", 26, 175, 129, 22)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label1 = GUICtrlCreateLabel("Computername", 26, 79, 96, 20)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    $Label3 = GUICtrlCreateLabel("MAC", 26, 159, 27, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Input2 = GUICtrlCreateInput("", 26, 136, 121, 22)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label4 = GUICtrlCreateLabel("Username", 26, 120, 53, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $RCMD = GUICtrlCreateButton("RCMD", 736, 256, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $RemoteReg = GUICtrlCreateButton("RemoteReg", 736, 280, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Admin = GUICtrlCreateTabItem("Admin")
    $Rollout = GUICtrlCreateTabItem("Rollout")
    $OnlineCheck = GUICtrlCreateTabItem("OnlineCheck")
    $List1 = GUICtrlCreateList("", 32, 128, 121, 305)
    $ListeLaden = GUICtrlCreateButton("ListeLaden", 32, 448, 123, 25, 0)
    $Computerliste = GUICtrlCreateLabel("Computerliste", 32, 104, 67, 17)
    $List2 = GUICtrlCreateList("", 168, 128, 121, 305)
    $ExportOnline = GUICtrlCreateButton("ExportOnline", 168, 448, 123, 25, 0)
    $Online = GUICtrlCreateLabel("Online", 168, 104, 34, 17)
    $List3 = GUICtrlCreateList("", 304, 128, 121, 305)
    $ExportOffline = GUICtrlCreateButton("ExportOffline", 304, 448, 123, 25, 0)
    $Offline = GUICtrlCreateLabel("Offline", 304, 104, 34, 17)
    $Check = GUICtrlCreateButton("Check", 32, 80, 123, 25, 0)
    GUICtrlCreateTabItem("")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $VNC
    Run(@ComSpec & " /c " & 'vnc\vncstart.bat ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
    case $c
    Run(@ComSpec & " /c " & 'explorer\rmc.bat ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
    case $RemoteAssitance
    Run(@ComSpec & " /c " & 'vnc\remass.bat ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
    case $RemoteReg
    Run(@ComSpec & " /c " & 'remote\remoteregxp.exe ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
    case $ListeLaden
    FileOpenDialog("Öffnen", "C:\", "Text Dateien (*.txt)| Excel (*.csv)| Text Dateien(*.txt)")
    Case $Verbinden
    $var = RegRead("\\GUICtrlRead($cnameinput), \HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\winlogon", "Defaultusername")
    GUICtrlSetData (-1,"$input2"), $var)
    EndSwitch
    WEnd

  • DefaultUsername auslesen

    Lokal Kann ich jetzt den User auslesen und in Msg Box darstellen wenn ich auf verbinden klicke,

    aber remote Kriege ich das nicht hin wollte es variable mitgeben aus dem inputfeld "$cnameinput" und ich wollte den output nicht in MSg haben

    sondern ín $input2 dort wollte ich den output darstellen kann mir jemand helfen ?

    PS:die rechte habe ich

    Spoiler anzeigen

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <GuiIPAddress.au3>
    #include <GUIListBox.au3>
    #include <StaticConstants.au3>
    #include <TabConstants.au3>
    #include <WindowsConstants.au3>

    #Region ### START Koda GUI section ### Form=d:\eyup\entwicklung\09-05-09.kxf
    $Form1 = GUICreate("Helper", 884, 523, 204, 127)
    GUISetIcon("D:\005.ico")
    GUICtrlCreateTab(16, 48, 820, 432)
    GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
    $Tabsheet1 = GUICtrlCreateTabItem("Remote")
    $Verbinden = GUICtrlCreateButton("Verbinden", 736, 104, 97, 33, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $STATUS = GUICtrlCreateButton("STATUS", 736, 72, 97, 33, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    GUICtrlSetBkColor(-1, 0x00FF00)
    $VNC = GUICtrlCreateButton("VNC", 736, 136, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $RemoteAssitance = GUICtrlCreateButton("RemoteAssitance", 736, 160, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $RDP = GUICtrlCreateButton("RDP", 736, 184, 97, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $C = GUICtrlCreateButton("C", 736, 208, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button1 = GUICtrlCreateButton("Button1", 736, 232, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $cnameinput = GUICtrlCreateInput("", 24, 98, 121, 22)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $macinput = GUICtrlCreateInput("", 184, -78, 129, 22)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Computername = GUICtrlCreateLabel("Computername", 184, -166, 96, 20)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    $IP = GUICtrlCreateLabel("IP", 184, -54, 12, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $MAC = GUICtrlCreateLabel("MAC", 184, -94, 27, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $userinput = GUICtrlCreateInput("", 184, -117, 121, 22)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Username = GUICtrlCreateLabel("Username", 184, -133, 53, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $IPAddress1 = _GUICtrlIpAddress_Create($Form1, 184, -37, 122, 21)
    _GUICtrlIpAddress_Set($IPAddress1, "0.0.0.0")
    $Input1 = GUICtrlCreateInput("", 26, 175, 129, 22)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label1 = GUICtrlCreateLabel("Computername", 26, 79, 96, 20)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    $Label3 = GUICtrlCreateLabel("MAC", 26, 159, 27, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Input2 = GUICtrlCreateInput("", 26, 136, 121, 22)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label4 = GUICtrlCreateLabel("Username", 26, 120, 53, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $RCMD = GUICtrlCreateButton("RCMD", 736, 256, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $RemoteReg = GUICtrlCreateButton("RemoteReg", 736, 280, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Admin = GUICtrlCreateTabItem("Admin")
    $Rollout = GUICtrlCreateTabItem("Rollout")
    $OnlineCheck = GUICtrlCreateTabItem("OnlineCheck")
    $List1 = GUICtrlCreateList("", 32, 128, 121, 305)
    $ListeLaden = GUICtrlCreateButton("ListeLaden", 32, 448, 123, 25, 0)
    $Computerliste = GUICtrlCreateLabel("Computerliste", 32, 104, 67, 17)
    $List2 = GUICtrlCreateList("", 168, 128, 121, 305)
    $ExportOnline = GUICtrlCreateButton("ExportOnline", 168, 448, 123, 25, 0)
    $Online = GUICtrlCreateLabel("Online", 168, 104, 34, 17)
    $List3 = GUICtrlCreateList("", 304, 128, 121, 305)
    $ExportOffline = GUICtrlCreateButton("ExportOffline", 304, 448, 123, 25, 0)
    $Offline = GUICtrlCreateLabel("Offline", 304, 104, 34, 17)
    $Check = GUICtrlCreateButton("Check", 32, 80, 123, 25, 0)
    GUICtrlCreateTabItem("")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $VNC
    Run(@ComSpec & " /c " & 'vnc\vncstart.bat ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
    case $c
    Run(@ComSpec & " /c " & 'explorer\rmc.bat ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
    case $RemoteAssitance
    Run(@ComSpec & " /c " & 'vnc\remass.bat ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
    case $RemoteReg
    Run(@ComSpec & " /c " & 'remote\remoteregxp.exe ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
    case $ListeLaden
    FileOpenDialog("Öffnen", "C:\", "Text Dateien (*.txt)| Excel (*.csv)| Text Dateien(*.txt)")
    Case $Verbinden
    $var = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\winlogon", "Defaultusername")
    MsgBox(4096, "Program files are in:", $var)
    EndSwitch
    WEnd

    danke

  • in Listview TXT CSV Laden

    Habe soweit mein grundgerüst fertig werde es noch weiter aufbauen so jetzt hänge ich am online check das durchsuchen fenster habe ich auch bereits öffnet sich auch kann die Txt auch auswählen aber wie komme ich es jetzt in die listbox computerliste reinlade?


    dann fehlt mir noch die idee mit ping errorlevel auslesen in online oder offline jeweils den PC namen kopieren eine idee ?

    Spoiler anzeigen
    [autoit]

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <GuiIPAddress.au3>
    #include <GUIListBox.au3>
    #include <StaticConstants.au3>
    #include <TabConstants.au3>
    #include <WindowsConstants.au3>

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

    #Region ### START Koda GUI section ### Form=d:\eyup\entwicklung\09-05-09.kxf
    $Form1 = GUICreate("Helper", 884, 523, 204, 127)
    GUISetIcon("D:\005.ico")
    GUICtrlCreateTab(16, 48, 820, 432)
    GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
    $Tabsheet1 = GUICtrlCreateTabItem("Remote")
    $Verbinden = GUICtrlCreateButton("Verbinden", 736, 104, 97, 33, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $STATUS = GUICtrlCreateButton("STATUS", 736, 72, 97, 33, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    GUICtrlSetBkColor(-1, 0x00FF00)
    $VNC = GUICtrlCreateButton("VNC", 736, 136, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $RemoteAssitance = GUICtrlCreateButton("RemoteAssitance", 736, 160, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $RDP = GUICtrlCreateButton("RDP", 736, 184, 97, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $C = GUICtrlCreateButton("C", 736, 208, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button1 = GUICtrlCreateButton("Button1", 736, 232, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $cnameinput = GUICtrlCreateInput("", 24, 98, 121, 22)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $macinput = GUICtrlCreateInput("", 184, -78, 129, 22)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Computername = GUICtrlCreateLabel("Computername", 184, -166, 96, 20)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    $IP = GUICtrlCreateLabel("IP", 184, -54, 12, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $MAC = GUICtrlCreateLabel("MAC", 184, -94, 27, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $userinput = GUICtrlCreateInput("", 184, -117, 121, 22)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Username = GUICtrlCreateLabel("Username", 184, -133, 53, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $IPAddress1 = _GUICtrlIpAddress_Create($Form1, 184, -37, 122, 21)
    _GUICtrlIpAddress_Set($IPAddress1, "0.0.0.0")
    $Input1 = GUICtrlCreateInput("", 26, 175, 129, 22)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label1 = GUICtrlCreateLabel("Computername", 26, 79, 96, 20)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    $Label3 = GUICtrlCreateLabel("MAC", 26, 159, 27, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Input2 = GUICtrlCreateInput("", 26, 136, 121, 22)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Label4 = GUICtrlCreateLabel("Username", 26, 120, 53, 18)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $RCMD = GUICtrlCreateButton("RCMD", 736, 256, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $RemoteReg = GUICtrlCreateButton("RemoteReg", 736, 280, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Admin = GUICtrlCreateTabItem("Admin")
    $Rollout = GUICtrlCreateTabItem("Rollout")
    $OnlineCheck = GUICtrlCreateTabItem("OnlineCheck")
    $List1 = GUICtrlCreateList("", 32, 128, 121, 305)
    $ListeLaden = GUICtrlCreateButton("ListeLaden", 32, 448, 123, 25, 0)
    $Computerliste = GUICtrlCreateLabel("Computerliste", 32, 104, 67, 17)
    $List2 = GUICtrlCreateList("", 168, 128, 121, 305)
    $ExportOnline = GUICtrlCreateButton("ExportOnline", 168, 448, 123, 25, 0)
    $Online = GUICtrlCreateLabel("Online", 168, 104, 34, 17)
    $List3 = GUICtrlCreateList("", 304, 128, 121, 305)
    $ExportOffline = GUICtrlCreateButton("ExportOffline", 304, 448, 123, 25, 0)
    $Offline = GUICtrlCreateLabel("Offline", 304, 104, 34, 17)
    $Check = GUICtrlCreateButton("Check", 32, 80, 123, 25, 0)
    GUICtrlCreateTabItem("")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $VNC
    Run(@ComSpec & " /c " & 'vnc\vncstart.bat ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
    case $c
    Run(@ComSpec & " /c " & 'explorer\rmc.bat ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
    case $RemoteAssitance
    Run(@ComSpec & " /c " & 'vnc\remass.bat ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
    case $RemoteReg
    Run(@ComSpec & " /c " & 'remote\remoteregxp.exe ' & GUICtrlRead($cnameinput), "", @SW_HIDE)
    case $ListeLaden
    FileOpenDialog("Öffnen", "C:\", "Text Dateien (*.txt)| Excel (*.csv)| Text Dateien(*.txt)")

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

    EndSwitch
    WEnd

    [/autoit]

    Edit Oscar: AutoIt-Tags gesetzt.

  • Tabsheet

    Hallo Habe folgedes Problem habe tabsheets erzeugt will dort ein inputfeld haben nur aber auf tabsheet 1 also bei "remote" die Bottons schein zu funktionieren aber leider nicht mit den input und labelfeld was muss ich dabei bedenken?


    danke für die hilfe

    Spoiler anzeigen

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <GuiIPAddress.au3>
    #include <StaticConstants.au3>
    #include <TabConstants.au3>
    #include <WindowsConstants.au3>

    #Region ### START Koda GUI section ### Form=F:\autoit\entwicklung\09-05-09.kxf
    $Form1 = GUICreate("Helper", 871, 536, 272, 92)
    GUISetIcon("D:\005.ico")
    $cnameinput = GUICtrlCreateInput("", 24, 87, 121, 21)
    $macinput = GUICtrlCreateInput("", 24, 159, 129, 21)
    $Computername = GUICtrlCreateLabel("Computername", 24, 71, 96, 20)
    GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
    $IP = GUICtrlCreateLabel("IP", 24, 183, 14, 17)
    $MAC = GUICtrlCreateLabel("MAC", 24, 143, 27, 17)
    $userinput = GUICtrlCreateInput("", 24, 120, 121, 21)
    $Username = GUICtrlCreateLabel("Username", 24, 104, 52, 17)
    $IPAddress1 = _GUICtrlIpAddress_Create($Form1, 24, 200, 122, 21)
    _GUICtrlIpAddress_Set($IPAddress1, "0.0.0.0")
    GUICtrlCreateTab(16, 48, 820, 432)
    GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
    $Tabsheet1 = GUICtrlCreateTabItem("Remote")
    $Verbinden = GUICtrlCreateButton("Verbinden", 736, 104, 97, 33, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $STATUS = GUICtrlCreateButton("STATUS", 736, 72, 97, 33, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    GUICtrlSetBkColor(-1, 0x00FF00)
    $VNC = GUICtrlCreateButton("VNC", 736, 136, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $RemoteAssitance = GUICtrlCreateButton("RemoteAssitance", 736, 160, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $RDP = GUICtrlCreateButton("RDP", 736, 184, 97, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $C = GUICtrlCreateButton("C", 736, 208, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Button1 = GUICtrlCreateButton("Button1", 736, 232, 99, 25, 0)
    GUICtrlSetFont(-1, 8, 400, 0, "Arial")
    $Admin = GUICtrlCreateTabItem("Admin")
    $Rollout = GUICtrlCreateTabItem("Rollout")
    GUICtrlCreateTabItem("")
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

    EndSwitch
    WEnd

    abels

  • DefaultUsername auslesen

    Hallo Wiedermal ich ;)

    wollte diesen schlüssel remote auslesen und in einem eingabe feld darstellen aber nur den part %username%

    kann mir jemand helfen ?

    [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon]"DefaultUserName"="Username"

    2. und ein weiteres Problem habe ich auch noch wollte auch nur die mac also 00-30-05-7C-B1-B8 und jeweils auch in einen eingabefeldausgeben

    danke für die hilfe

    getmac /s Computer

    Physikal. Adresse Transportname
    =================== =========================================================
    00-30-05-7C-B1-B8 \Device\Tcpip_{67A81915-5C02-4EEB-90AD-BBCA31620A04}

  • Absoluter einsteiger

    Spoiler anzeigen

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <ListViewConstants.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=c:\entwicklung\form1.kxf
    $Form1 = GUICreate("Helper", 634, 448, 293, 126)
    # $Edit1 = GUICtrlCreateEdit("", 16, 72, 121, 297)
    # edit feld erzeugen

    GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 0, 50)
    $ListView1 = GUICtrlCreateListView("", 16, 80, 129, 225)
    $Button1 = GUICtrlCreateButton("VNC", 16, 8, 59, 25, $WS_GROUP)
    $Button2 = GUICtrlCreateButton("Liste Laden", 16, 368, 129, 25, $WS_GROUP)
    $Button3 = GUICtrlCreateButton("User aus AD", 16, 392, 131, 25, $WS_GROUP)
    $Button4 = GUICtrlCreateButton("RemoteReg", 235, 8, 70, 25, $WS_GROUP)
    $Button5 = GUICtrlCreateButton("Remote C:\", 72, 8, 67, 25, $WS_GROUP)
    $Button6 = GUICtrlCreateButton("Remote Assistance", 138, 8, 97, 25, $WS_GROUP)


    $Input1 = GUICtrlCreateInput("", 16, 48, 121, 21)
    $Label1 = GUICtrlCreateLabel("Computername", 16, 32, 123, 17)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    Run(@ComSpec & " /c " & 'vnc\vncstart.bat ' & GUICtrlRead($Input1), "", @SW_HIDE)
    case $Button5
    Run(@ComSpec & " /c " & 'explorer\rmc.bat ' & GUICtrlRead($Input1), "", @SW_HIDE)
    case $Button6
    Run(@ComSpec & " /c " & 'vnc\remass.bat ' & GUICtrlRead($Input1), "", @SW_HIDE)
    case $Button4
    Run(@ComSpec & " /c " & 'remote\remoteregxp.exe ' & GUICtrlRead($Input1), "", @SW_HIDE)
    EndSwitch
    WEnd

    Kriege es irgendwie nicht hin wollte noch die datei auswählen können ohne das es immer die gleiche datei sein muss also z.b per durchsuchen .

    danke

  • in Listview TXT CSV Laden

    Hallo da bin ich mal wieder mit einem neuen Problem

    möchte gerne registry werte von mehreren Rechnern ändern mit RegWrite wie ich das mache weiss ich jetzt bereits aber jetzt möchte ich in eine Listbox

    die Datei auslesen die ich anwählen kann und den bestimmten Schlüssel ändern den ich in ein Eingabefeld eingebe kann mir da jemand helfen.

    Rechner die Offline sind wollte ich dann in eine seperate listbox auswerfen lassen also wollte ich es eventuell mit einem einfachen ping vorher prüfen

    danke

  • Absoluter einsteiger

    es ist ja mein ziel eine datei einzulesen die ich auswählen uber datei laden, kann und die angezeigt in einer listbox leider kriege ich das nicht hin

    hat jemand eine idee beispiel code?

    dabei wollte ich dann einzel die rechner auswählen können die als parameter übergeben werden und jeweils ein wait zwischen den aufrufen wenn mehrere clients makiert sind und am besten wenn man die rechner per ping vorher prüft ob erreichbar oder nicht ?

    danke für die hilfe

  • Absoluter einsteiger

    soweit so gut habe ich verstanden

    Spoiler anzeigen

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <ListViewConstants.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 633, 447, 293, 126)
    $ListView1 = GUICtrlCreateListView("", 48, 80, 129, 225)
    $Button1 = GUICtrlCreateButton("VNC", 48, 32, 59, 25, $WS_GROUP)
    $Button2 = GUICtrlCreateButton("Liste Laden", 48, 304, 129, 25, $WS_GROUP)
    $Button3 = GUICtrlCreateButton("User aus AD", 48, 328, 131, 25, $WS_GROUP)
    $Button4 = GUICtrlCreateButton("Computer Aus AD", 48, 352, 131, 25, $WS_GROUP)
    $Button5 = GUICtrlCreateButton("Action 1", 112, 32, 67, 25, $WS_GROUP)
    $Input1 = GUICtrlCreateInput("Input1", 112, 56, 81, 21)
    $Label1 = GUICtrlCreateLabel("Computername", 32, 56, 75, 17)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

    EndSwitch
    WEnd

    ICh möchte aber was im eingabefeld ist siehe Quellcode: das soll der parameter sein der übergeben wird bzw. der rechner der als liste geladen wird und angeklickt ist jetzt komme ich zur nächsten frage wie lade ich eine liste??

    kann mir da jemand helfen??

  • Absoluter einsteiger

    Das geht ja schnell danke

    soweit hatte ich das auch gelesen wollte es aber den computernamen aus dem eingabefeld übernehmen, bzw eine liste laden also pc.txt mit den clients wo ich die einzel makieren kann und die aktion auslössen kann

  • Absoluter einsteiger

    Danke erstmal für die schnelle antwort habe noch 2 kleine fragen.

    kannst du mir das genau erklären mit den Aktionen zu ordnen z.b wenn ich dem Computernamen als Parameter übergeben will

    also der call sollte z.b. lauten wenn man den vnc Bothon drücke "vnc.cmd computername" den ich aus der liste anklicke die ich geladen habe bzw. den Parameter aus dem Eingabefeld?

    siehe Anhang.

    mit besten dank im Voraus

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <ListViewConstants.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 633, 447, 293, 126)
    $ListView1 = GUICtrlCreateListView("", 48, 80, 129, 225)
    $Button1 = GUICtrlCreateButton("VNC", 48, 32, 59, 25, $WS_GROUP)
    $Button2 = GUICtrlCreateButton("Liste Laden", 48, 304, 129, 25, $WS_GROUP)
    $Button3 = GUICtrlCreateButton("User aus AD", 48, 328, 131, 25, $WS_GROUP)
    $Button4 = GUICtrlCreateButton("Computer Aus AD", 48, 352, 131, 25, $WS_GROUP)
    $Button5 = GUICtrlCreateButton("Action 1", 112, 32, 67, 25, $WS_GROUP)
    $Input1 = GUICtrlCreateInput("Input1", 112, 56, 81, 21)
    $Label1 = GUICtrlCreateLabel("Computername", 32, 56, 75, 17)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

    EndSwitch
    WEnd

  • Absoluter einsteiger

    Hey,

    bin absoluter Neuling brauche eine einsteige Hilfe meine GUI.au3 die ich haben will habe ich eingefügt.

    Ich habe viel im batch und kix früher gemacht aber leider komme ich langsam an meine grenzen kann mir jemand helfen oder

    mir die ersten schritte zeigen brauche es für meine tägliche arbeit

    wenn ich mal ein kleineres Rollout machen möchte würde gerne Funktionen hinter die knöpfe legen als Batch die im Hintergrund aufgerufen wird

    und der Parameter der Computername übergeben wird oder Funktion so das der Client den ich aus dem Ad lade oder die Computerliste als Parameter übergeben wird bzw. das ich den einzelnen Client den ich markiert habe mit action1 die Aktionen ausführen kann.

    hoffe das ich mein Problem gut erklären konnte würde mich über jede Hilfe freuen.

    Danke


    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <ListViewConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 633, 447, 293, 126)
    $ListView1 = GUICtrlCreateListView("", 48, 80, 129, 225)
    $Button1 = GUICtrlCreateButton("VNC", 48, 56, 59, 25, $WS_GROUP)
    $Button2 = GUICtrlCreateButton("Liste Laden", 48, 304, 129, 25, $WS_GROUP)
    $Button3 = GUICtrlCreateButton("User aus AD", 48, 328, 131, 25, $WS_GROUP)
    $Button4 = GUICtrlCreateButton("Computer Aus AD", 48, 352, 131, 25, $WS_GROUP)
    $Button5 = GUICtrlCreateButton("Action 1", 112, 56, 67, 25, $WS_GROUP)
    GUISetState(@SW_SHOW)


    #EndRegion ### END Koda GUI section ###

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

    EndSwitch
    WEnd