Beiträge von Moombas

Moinsen,

ich melde mich mal weder mit einem kleinen Problem.

Hat jemand von euch sich schon mal damit beschäftigt in W7 per Skript eine Verknüpfung ans Startmenü anzuheften? Ich komme dort nicht weiter.

Unter XP wars ja noch easy: Verknüpfung erstellen und rein kopieren - fertig.

Win 7 stellt sich da allerdings etwas an.

Verknüpfung erstellen kein Problem (bzw. ist schon vorhanden), aber beim Anheften scheitert es.

Probiert habe ich bereits https://www.autoitscript.com/forum/topic/12…dows-7-taskbar/ aber leider ohne erfolg.

Ok, habe nun Code der funktioniert aus obigem Beitrag, allerdings muss ich dies nun noch per Remote schaffen. Da sträubt er sich noch ein wenig.

Zitat von alpines

Wenn du nur ein Thema "als gelesen markieren willst" öffne es in einem neuen Tab und schließe es nachdem es geladen ist.

Das wollte ich damit vermeiden, aber wenn das nicht möglich ist, einzustellen, geht es nur über diesen Weg. War auch nur eine Idee.

Wäre es ggf. möglich im Dashboard bei den "ungelesenen Themen" die Möglichkeit zu geben "als gelesen markieren? Entweder je Thema und/oder für alle.

Nicht alle Themen sind für alle gleich interessant und da wäre diese Möglichkeit echt nett

Kann sein, das ich hier zu "einfach" gedacht habe, da ich alles was mit GUI's zu tun hat, die mehr als nur eine Ausgabe enthalten, meist in Delphi programmiere und dort ist das "OnEnter"-Event Standardmäßig aktiv für den ausgewählten Button, was bei Autoit natürlich nicht der Fall ist.

Müsste doch aber über

; Set an accelerator key - ENTER will fire $press
Local $aAccelKeys[1][2] = [["{ENTER}", $press]]
GUISetAccelerators($aAccelKeys)

Ergänzbar sein und somit bräuchte man keine Tastenabfrage und muss nur beim starten des Timers, den Button aktivieren, der den Timer startet/ stoppt.

-entfernt-

Zitat von Tuxedo

Ich denke dieser Buzzer kann in der Systemsteuerung oder per Software so eingerichtet werden, daß bei Betätigung ein bestimmter Tastencode gesendet wird,

und diesen kannst du dann im Script auswerten(evtl per Hotkey und sonst per _IsPressed) oder wenn du es kompliziert magst geht sowas sicher auch per DLL Calls oder per WinApi.

Wenn man dem Buzzer sagen kann er soll "Enter" betätigen brauchst du nicht mal die Taste abfragen, sofern der Knopf immer ausgewählt ist.

Haste Recht, nicht bedacht Zumindest sollte dem so sein^^

Hab das mal in meinem Vorschlag für Landfloh ergänzt.

Den Vorschlag mit OpenOffice kann ich nur vor warnen, zumindest wenn man es nur für die Prüfungen machen würde.

In einer Prüfung hat man keine Zeit/Lust sich mit neuen Bedienungen und Funktionen eines anderen Programms rum zu ärgern.

Wenn man OpenOffice generell nutzen würde wäre es was anderes.

Und sonst wäre deine Alternative mit "Stecker ziehen am Switch" (sofern dieser überhaupt zugänglich ist), die von der Umsetzung einfachste Möglichkeit.

HeiWoMa: Auch eine Möglichkeit aber was wenn du (und man sollte alle Eventualitäten bedenken) sehr schlaue Schüler hast, die das raus bekommen und die host vorher sichern und in der Prüfung überschreiben? Schon ist diese "Sicherung" pfutsch.

Blöde Frage, da ich selber nicht mit Office 365 arbeite: Was wäre, wenn die Schüler Office 365 starten und du die Verbindung danach kappst?

Normalerweise müsste Office sich doch nur beim Starten wegen der Lizenz "erkundigen" und danach braucht es die Verbindung nicht mehr oder sehe ich das falsch?

Das wäre dann die einfachste und kostengünstigste Variante.

Ich würde es dann so machen:

1. Auf dem PC des Lehrers läuft ein Programm, welches einen lokalen (freigegebenen Ordner) überwacht.

2. Du hast ein Programm auf den Schüler-PC's welches Office startet

3a. Optional: Das Programm fragt den Schüler nach seinem Namen. Dieses Programm legt eine Datei (ohne Inhalt) auf dem PC des Lehrers ab, mit dem Namen des Schülers. (Gibt hierfür auch sicherlich bessere Lösungen!)

3b. Dieses Programm legt eine Datei (ohne Inhalt) auf dem PC des Lehrers ab, mit der PC-Kennung des Schüler PC's. (Gibt hierfür auch sicherlich bessere Lösungen!)

4a. Optional: Das Programm vom Lehrer schreibt ein Deaktivierungspasswort (verschlüsselt?) in die Datei. und vermerkt im Lehrerprogramm, das dieser Schüler-PC das Programm gestartet hat und das generierte Passwort wird im Programm gespeichert und kann nur (je Platz) durch ein MasterPasswort sichtbar gemacht werden. (Office soll ja nicht manuell gestartet werden).

4b. Das Programm löscht die Datei und vermerkt im Lehrerprogramm, das dieser Schüler-PC das Programm gestartet hat. (Office soll ja nicht manuell gestartet werden)

5a. Optional(4a): Das Schülerprogramm überwacht seine erstellte Datei und liest das Passwort ein (sobald vorhanden) und löscht die Datei. Danach wird die Internetverbindung gekappt (über host).

5b. Die Internetverbindung wird gekappt (über host).

6. Optional: Ggf. musst du den Taskmanager, Alt+F4 etc. auch für diese Zeit sperren, wobei die Internetverbindung ja gekappt bleibt da dein Programm nicht Ordnungsgemäß beendet wurde.

7. Das Schülerprogramm kann nur durch Eingabe eines Passwortes (Standard oder -> 4a) wieder beendet werden, da du beim Beenden des Programms die Sperre wieder aufheben würdest.

8. Nach der Abgabe der Prüfung:

- Bei generiertem Passwort: Kann der Lehrer dem Schüler das Passwort geben und dieser kann das Programm beenden -> Sperre wird aufgehoben.

- Bei "Standard" Passwort: Der Lehrer muss jeden PC einzeln selber entsperren. Ständiges Updaten für Passwortänderungen wäre hier erforderlich.

Ergänzung: Falls Office die dauerhafte Internetverbindung braucht, mal alternativ überlegt zu überwachen ob die installierten Browser gestartet werden (iexplore.exe)? Und wenn ja werden sie sofort geschlossen! Hätte den Vorteil, dass wenn ein Schüler aus versehen Office beendet, dieses auch wieder sofort starten kann. Ich gehe mal davon aus, das Schüler keine Programme installieren dürfen und somit keine unbekannten Browser vorhanden sind? Das geht aber nur zuverlässig wenn wie gesagt Alt+F4 etc. (temporär) Abgeschaltet sind.

Oscar genau das was ich suche Hab ich in der Funktionsliste wohl übersehen -.-

Hallo zusammen,

ich bräuchte mal wieder euren Rat.

Ich möchte über AutoIt eine Festplatte/Partition automatisch löschen lassen (muss über diskpart gemacht werden). Ich möchte dabei aber sicher gehen, das nicht die Systempartition erwischt wird und brauche daher die Zahl aus der Datenträgerverwaltung der "nicht Systempartition". Aktuell Frage ich den Benutzer (Er muss das in der Datenträgerverwaltung nachschauen), würde das aber gerne auslesen.

Mit den Drive-Funktionen kam ich da aktuell nicht weiter, jemand eine Idee?

#RequiereAdmin

#include <AutoItConstants.au3>


Dim $Drives, $i, $Drive

FileDelete('DPScript.txt')
$name = 'DPScript.txt'
$file = FileOpen($name, 1)

$Drive = InputBox("Datenträger", "Welche Datenträgernummer (0 oder 1) hat die Zweite Festplatte?", "1")
$text = 'select disk ' & $Drive & @CRLF & 'clean' & @CRLF & 'create partition primary' & @CRLF & 'format quick fs=ntfs label="DATEN"' & @CRLF & 'assign letter="D"'
FileWrite($file, $text)
FileClose($file)

ShellExecute("diskpart.exe",'/s DPScript.txt',@ScriptDir,'open',@SW_SHOW)

Zitat von entsel

Moombas

Wie bereits oben geschrieben - unter Win10 heißt offensichtlich alles anders ...

Mit dem Link willst Du mir aber nicht sagen, ich solle auf einem fremden Rechner !!! nicht unbedingt notwendige Einstellungen verändern!??? Der Besitzer (Ehepartner des Users) würde sich schön bedanken, würde er plötzlich andere Einstellungen auf seinem Rechner vorfinden!

Würde den Thread gern als erledigt kennzeichnen, kann aber nix diesbezügliches finden !?

entsel:

1. Machst du die Einstellung idealerweise mit dem User zusammen (so kann er/sie auch noch was lernen), so setzt man den User nicht vor vollendete Tatsachen und er/sie bekommt ggf. auch einen "Aha" Effekt und findet den Desktop ggf. sogar besser als diese "tollen" Kacheln (was deine Arbeit auch erleichtern würde den Shortcut anzulegen)

2.a. Ging es nur darum festzustellen / zu zeigen das hier wirklich das Vollbildstartmenü genutzt wird

2.b. Sollte nur dieses gewünscht sein ist natürlich das anlegen deiner Verknüpfung bzw. Kachel ein ganz anderer Aufwand: Tipp (google -> "win 10 neue kacheln erstellen" ->): https://www.giga.de/downloads/wind…eften-so-gehts/

2.c. Sagt ja keiner das du die Einstellung nicht wieder Rückgängig machen kannst (nach 2.a.)

2.d. Ein wenig Offtopic: Im Startmenü reicht ein klick, nur auf dem Desktop oder Explorer brauchst du Doppelklick, da du immer von Doppelklick geredet hast, ging ich noch eher davon aus, das du den Desktop haben willst

3. Hast du explizit nach Desktop gefragt wo man von ausgehen muss, das du auch diesen haben möchtest. Ich habe dir nur den Weg dahin mit dem Link gezeigt.

4. Heißt unter Win10 nicht alles anders, es ist halt ein Unterschied (eine andere Funktion) ob du auf den Desktop, das (Vollbild-)Startmenü oder sonst wo drauf zugreifen möchtest. Eine Hupe und ein Lenkrad sind halt nicht das gleiche.

Möchte man das nun mit AutoIt umsetzen wäre es folgendes aus meinem Verständnis:

Vollbildstartmenü:

1. Shortcut erstellen (entweder direkt im Startmenü-Ordner von Win 10 oder danach dorthin kopieren) -> FileCreateShortcut

2. Das Anheften des Shortcuts -> da weiß ich aktuell nichts aber evtl. kann dir da jemand anderes weiter helfen ob man das emulieren/ steuern kann

Desktop:

1. Shortcut erstellen (direkt auf dem Desktop) -> FileCreateShortcut

Ansonsten manuell nach z.B. oben gezeigten Link (2.b.).

Das was du da auf hast ist das Fullscreen Startmenü, NICHT der Desktop!

Tipp:

https://www.schieb.de/733732/vollbil…und-ausschalten

Bevor man sich hier weiter im Kreis dreht. Zeig uns doch mal ein Screenshot von deinem Desktop wo deine Verknüpfung auftauchen soll.

Zusätzlich: Was spricht gegen eine "Installation" über ein Autoit-Programm, welches den Ordner deines Programms an die richtige Stelle kopiert und eine Verknüpfung erzeugt? Leichter geht es für einen anderen Benutzer doch nicht mehr,

Hast du alternativ mal versucht: Rechtsklick auf den Desktop -> "Neu" -> "Verknüpfung" und dann die Felder entsprechend ausfüllen.

Meinst du wirklich Desktop oder doch Starmenüverknüpfung (Vollbildstartmenü)? Auf dem Desktop hat mein Win 10 keine Kacheln.

Funktioniert bei dir "FileCreateShortcut()" nicht?

Fehler gefunden: Es geht nicht bei WinXP Rechnern XD manmanman *KopfTisch*

Bei denen brauche ich die Abfrage auch nicht, aber das als Fehlerquelle hatte ich nicht in Erwägung gezogen. Das Problem lag also wieder zwischen den Ohren.

Daher Thanks Bitnugger und mep für eure Hilfe

Ich habe das mal separiert, da meine "Nebenfrage" doch etwas umfangreicher zu sein scheint als gedacht.

Ich hab meinen Denkfehler beim auslesen der Information zwar gefunden, es ist ja eine tabelle bzw. 2D Array, aber nach dem ersten PC (Abfrage erfolgreich) bekomme ich folgende Fehlermeldung:

Global $g_sUserName = '...', $g_sPassword = '...'

..
$IP wird festgelegt
Lizenz($IP)
$IP wird neu festgelegt //nächster PC
Lizenz($IP)
..

Func Lizenz($IP)    //Prüfung ob IP erreichbar ist, wenn ja folgende Abfrage starten
$g_aLizenzstatus = _Get_Lizenzstatus($IP, $g_sUserName, $g_sPassword)        
        if $g_aLizenzstatus[3][1] = "Lizenziert" Then
            logging("IP: " & $IP & " - ok  " & $g_aLizenzstatus[3][1], 1) //Ausgabe in die GUI und log
        Else
            logging("IP: " & $IP & " - bad " & $g_aLizenzstatus[3][1], 1) //Ausgabe in die GUI und log
        EndIf
EndFunc

Func _Get_Lizenzstatus($sComputerName = '', $sUser = '', $sPassword = '')
    Local $sCMD, $iPID, $sText, $aText,  $aSplit
    $sCMD = 'cscript.exe //Nologo //E:vbs C:\Windows\System32\slmgr.vbs ' & $sComputerName & ' ' & $sUser & ' ' & $sPassword & ' /dli'
    $iPID = Run($sCMD, '', @SW_HIDE, $STDOUT_CHILD)    If Not $iPID Then Return SetError(1, 0, False)
    ProcessWaitClose($iPID)
    $sText = StdoutRead($iPID)
    If $sText Then
        $aText = StringSplit($sText, @CRLF, 3)
        _ArrayColInsert($aText, 1)
        For $i = UBound($aText) -1 To 0 Step -1
            $aSplit = StringSplit($aText[$i][0], ': ', 3)
            If UBound($aSplit) <> 2 Then
                _ArrayDelete($aText, $i)
                ContinueLoop
            EndIf
            $aText[$i][0] = $aSplit[0]
            $aText[$i][1] = $aSplit[1]
        Next
        Return $aText
    EndIf
    Return SetError(2, 0, False)
EndFunc

Ich erhalte auch keinen Error zurück.

Jobb Gerhard sry dafür, ich werde meine Posts hierzu mal separieren, dachte das wäre eine evtl. schnelle Nebenfrage, wo ich nur nen kleinen Denkfehler habe.

Hallo,

auch von mir mal ein Lob

Allerdings kommt bei mir eine "Fehlermeldung" (kompiliert wird trotzdem; AutoIt Version 3.3.14.5):

! Invalid AutoIt3Wrapper directive Keyword:#AutoIt3Wrapper_Res_ProductName with value:MasterCode

Also ich hätte es ähnlich wie xSunLighTx3 geschrieben hat, gemacht.

Wenn die Zahlen immer um 180° gedreht sind (unterste = erste, oberste = letzte), hätte ich es so gemacht:

1. Die Zeilen der Textdatei von der letzten Zeile an nach dem ersten "# 1" suchen -> Zeilennummer in Variable

2. Die Zeilen Weiter suchen bis er kein "#" am Anfang mehr findet -> Zeilennummer in 2. Variable

3. Einen Array erstellen, der der Anzahl der gefundenen Werte entspricht (Variable 1 - Variable 2) -> 3. Variable für Schleifen Durchlauf & Arraygrößenbestimmung

4. die gefunden Werte anhand ihres Wertes (Variable 1 - Zeilennummer) in den Array an Position N schreiben

5. Die Werte aus dem Array sollten dadurch schon sortiert sein und können der Reihenfolge wieder eingefügt werden

Oder Wenn die Werte wild sind in Punkt 3 werte wild in Array einfügen und mit _ArraySort() sortieren (2D-Array)