Beiträge von chip

  • MSG Box am Anfang das Programmes nur beim 1. Start

    Vor Win XP hast du recht, aber seit XP wird nichtmehr die komplette Registry in den Ram geladen sondern nur die aktuell benötigten Bereiche. Von daher gehört die Aussage, dass viele Eintrage in der Registry einen Rechner langsamer macht in die Schublade der Mythen und Gerüchte. Es wird aber wie jeder Mythos weiterhin in den Köpfen der Leute verbleiben.

  • Zugriff auf XML Attribut

    Also dafür finde ich die _XMLDomWrapper.au3 für diese simple aufgabe doch etwas überladen.

    [autoit]

    #include <String.au3>

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

    main()
    Func main()
    Local $sFile = "c:\file.data"
    If FileExists($sFile) Then
    $file = FileRead($sFile)
    $wert = _StringBetween($file,'<wert3 v="','"')
    MsgBox(4096, "test", $wert[0])
    Else
    MsgBox(4096, "fehler", "not found")
    EndIf
    EndFunc ;==>main

    [/autoit]

  • Hochzählen

    Ohne {Enter} meine Meinung nach nicht möglich und in 60 Sekunden auch nicht:

    Spoiler anzeigen
    [autoit]

    Run("notepad")
    WinWait("[CLASS:Notepad]")
    WinActivate("[CLASS:Notepad]", "")
    WinWaitActive("[CLASS:Notepad]", "", 5)

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

    For $x = 1 to 10000 Step 1
    Send("Zahl " & $x)
    Send("{ENTER}")
    Next

    [/autoit]

  • Script: Netzwerkuser abmelden

    Und genau das mein ich, du wiedersprichst dir. Oben wir erklärt wie man remote eine anderen Rechenr runterfährt und du bist begeistert davon obwohl das überhaupt nicht das ist was du brauchst. Und was du unter Windows-Netzwerkverwaltung für Nutzerdaten angibst ist mir auch schleiferhaft. Normalerweiße gibts die IP/Netzwerkname des NAS an und kommst dann je nach Konfiguration direkt oder über Anmeldemaske auf das NAS. Sobald den Ordner dann wieder schließt und neu aufmachst musst dich weider neu beim NAS anmelden.

  • Meine Button funktionieren leider nicht - woran liegt es.

    Du hast

    [autoit]

    Opt("GUIOnEventMode", 1)

    [/autoit]

    vergessen


    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #Include <GUIMenu.au3>
    Opt("GUIOnEventMode", 1)
    _Main()

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

    Func _Main()
    Local $RemotedesktopID, $ShutdownID, $InternetID, $LogOffID

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

    $hForm = GUICreate("Evosoft Thin Client", 250, 175)
    $hMenu = _GUICtrlMenu_GetSystemMenu($hForm)
    _GUICtrlMenu_EnableMenuItem($hMenu, $SC_CLOSE, $MF_GRAYED, False)
    ; Erstellt die GUI (Auswahlfenster) mit Programmüberschrift

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

    $Pic = GUICtrlCreatePic(@ScriptDir & "\logo.jpg", 34, 0, 181, 65)
    ; Erstellt ein Bild in der GUI

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

    GUICtrlCreateLabel("Bitte wählen Sie aus!", 10, 75)
    ; Erstellt die Anweisung im GUI Fenster

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

    $RemotedesktopID = GUICtrlCreateButton("Remotedesktop", 10, 100, 90, 30)
    GUICtrlSetOnEvent($RemotedesktopID, "OnRemotedesktop"); Buttongröße und Ort in Pixel
    ; Erstellt den Button Remotedesktop

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

    $ShutdownID = GUICtrlCreateButton("X Shutdown X", 160, 100, 80, 30)
    GUICtrlSetOnEvent($ShutdownID, "OnShutdown") ; Buttongröße und Ort in Pixel
    ; Erstellt den Button Shutdown

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

    $LogOffID = GUICtrlCreateButton("<< LogOff >>", 160, 130, 80, 30)
    GUICtrlSetOnEvent($LogOffID, "OnLogOff") ; Buttongröße und Ort in Pixel
    ; Erstellt den Button Log Off

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

    $InternetID = GUICtrlCreatebutton("Internet", 10, 130, 90, 30)
    GUICtrlSetOnEvent($InternetID, "OnInternet"); Buttongröße und Ort in Pixel
    ; Erstellt den Button für die Internetnutzung

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

    GUISetState() ;Zeigt die GUI am Bildschirm an
    Do
    Until GUIGetMsg() = -3

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

    EndFunc ;==>_Main

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

    ;---------------- Function RDP ------------------------------
    Func OnRemotedesktop()
    MsgBox(0, "Remotedesktop", "Der Client startet nun die Remotedesktopverbindung zum Terminalserver!")
    ShellExecute ("C:\TS.rdp")
    ; Öffnet wie mit einen Doppelklick die via RDP abgespeicherte Verbindung
    EndFunc ;==>OnRemotedesktop

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

    ;---------------- Function Shutdown -------------------------
    Func OnShutdown()
    MsgBox(0, "Shutdown", "Der Client fährt sich nun herunter!")
    shutdown(9)
    ; Fährt den Computer mit 9ms Verspätung herunter!
    EndFunc ;==>OnShutdown

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

    ;---------------- Function Internet -------------------------
    Func OnInternet()
    MsgBox(0, "Internet", "Der Client startet nun den Internet Explorer!")
    ShellExecute ("C:\Program Files\Internet Explorer\iexplore.exe")
    ; Öffnet wie mit einen Doppelklick das Programm (EXE) iexplore
    EndFunc ;==>OnInternet

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

    ;---------------- Function LogOff ---------------------------
    Func OnLogOff()
    MsgBox(0, "Log off", "Der Clinet loggt sich nun aus!")
    ShellExecute ("C:\Logoff.bat")
    ; Öffnet wie mit einen Doppelklick die via BAT/CMD abgespeicherte Stapelverarbeitungsdatei
    EndFunc ;==>OnLogOff

    [/autoit]