Beiträge von s.koni

Falls jemand an der Lösung meines Problems interessiert ist:

Vorschlag von MojoeB war Goldrichtig!

OBS installiert, Bei den Scripten gibt es bereits vorinstalliert eine Analoge Uhr. IN OBS unter Werkzeuge Scripte kann man das Script clock-source.lua hinzufügen und dann bei Quellen das Script direkt aufrufen (Virtuelle Kamera dann noch starten). Super schöne Analoge Uhr wird angezeigt. Genau das was ich gesucht habe. Habe es in Teams ausprobiert, man kann einfach die Virtuelle Webcam auswählen und dann wir die Uhr angezeigt. Denke dass es genauso bei Zoom geht.

Bin happy!

s.koni

Danke MojoeB,

OBS hab ich mir angesehen aber ist sehr mächtig. Mit OBS kann man auch auf eine Web-Site verweisen und anzeigen lassen. Es gibt eine Seite im INet, auf der die Aktuelle Uhrzeit angezeigt wird. Den Link hab ich eingefügt.

Am liebsten hätte ich halt was eigenes geschrieben. Aber ich hab keine Ahnung, wie ich ein Gerät in den Gerätemanager einfügen kann geschweige denn, wie ich das dann entsprechend ansteure. Daher werde ich wohl nicht über die Lösung mit OBS rumkommen.

Vielen Dank für deinen Tip mit OBS.

s.koni

OK, dann etwas Kontext: ich möchte an einem Laptop an dem ich an einer Zoom Konferenz teilnehme anstelle eines Kamerabildes die Uhrzeit einblenden lassen.

So ist in der Zoom Konferenz ein "Fenster" in dem die Uhrzeit angezeigt wird. Ziel ist, dass demjenigen der in der Konferenz einen Vortrag hält in der Ansicht der Teilnehmer einen Hinweis hat, wie lange er für seinen Part noch Zeit hat.

Hallo,

ich hab da eine Idee, mir fehlt aber der Ansatz wie ich es in AutoIt umsetzen könnte.

Ich würde gerne eine Virtuelle Webcam "erstellen" in der ich nur die aktuelle Uhrzeit anzeigen lasse anstelle des "Kamerabildes".

Hab schon gesehen, dass es kein Problem ist auf eine bestehende Kamera zuzugreifen, sie ein/ausschalten usw. Aber habt ihr einen Ansatz wie man das mit einer virtuellen machen könnte?

Wäre für Vorschläge und Ratschläge dankbar. Die Umsetzung traue ich mir dann schon zu.

lg

s.koni

Hallo ProGramm,

also mit ContinueLoop wird eine Schleife fortgefürht - aber in deinem Script ist ja gar keine Schleife, die weitergemacht werden kann...

Also ich würde dir vorschlagen folgenden Denkansatz weiter zu verfolgen.

#include <MsgBoxConstants.au3>

; Damit man das Script auch mal beenden kann würde ich einen HotKeySet einsetzen
HotKeySet("{PAUSE}", "Terminate") ; Wenn die Rollen Taste gedrückt wird, wird die Funktion Terminate ausgeführt



Global $LogedIn = 0 ; Variable die auch in Unterfunktionen gelesen und geschrieben werden kann

; Du musst zunächt eine Schleife machen, die dauernd läuft,


Global $hTimer = TimerInit() ; Beginnt den Timer speichert das Handle in einer Variable.

While 1 ; Schleife läuft ewig (also bis zum beenden des Programms)

    If $LogedIn = 0 Then ; Ist die Variable = 0 dann

        DoLogIn() ; Ruft die Unterfunktion DoLogIn() auf
        $hTimer = TimerInit() ; Beginnt den Timer speichert das Handle in einer Variable.
    Else ; Hier wird reingesprungen, wenn die Variable gesetzt wurde
        Local $fDiff = Round(TimerDiff($hTimer), 0) ; Hier wird die Zeit errechnet die seit der Initiierung des Timers vergangen ist. Es sird auf 0 Nachkommastellen gerundent
        If $fDiff > 10000 Then ; Sind mehr als 10000 Millisekunden vergangen (echt alle 10 Sekunden nachfragen??????)
            If Ask4LogOut() = 1 Then ; Wird von der FUnktion Ask4LogOut() eine 1 zurückgegeben, dann  ist NICHT OK-Abmelden angeklickt worden, also
                $hTimer = TimerInit() ; Timer neue starten
            Else ; Es wurde nicht 1 zurückgegeben, daher
                Exit ; Script beenden!
            EndIf
        EndIf
    EndIf

WEnd

Func DoLogIn()

    While Not WinExists("Anmelden/Abmelden") ; So lange das Fenster ...  nicht da ist, soll es aufgerufen werden (Kann ja sein, dass es beim ersten mal nicht klappt

        ; -> hier muss noch der Aufruf des Programms für das LogInFenster hin oder zumindest eine WinActivate

        Send("!y")

        Sleep(10)

        Sleep(10)

        Send("l")

        Sleep(10)
    WEnd

    If WinExists("Anmelden/Abmelden") Then

        Send("admin")

        Sleep(100)

        Send("{TAB}")

        Sleep(100)

        Send("gfSv1S1on")

        Sleep(100)

        Send("{enter}")

        Sleep(200)

    EndIf
    $LogedIn = 1 ; Variable wird auf 1 gesetzt

EndFunc   ;==>DoLogIn

Func Ask4LogOut()

    If MsgBox(1, "logoff", "ausloggen?") = $IDOK Then ; Wurde OK geklickt, dann -> ausloggen
        While Not WinExists("Anmelden/Abmelden") ; So lange das Fenster ...  nicht da ist, soll es aufgerufen werden

            ; -> hier muss noch der Aufruf des Programms für das LogInFenster hin oder zumindest eine WinActivate

            Send("!y")

            Sleep(10)

            Send("l")

            Sleep(100)
        WEnd

        If WinExists("Anmelden/Abmelden") Then

            Send("operator")

            Sleep(100)

            Send("{TAB}")

            Sleep(100)

            Send("operator")

            Sleep(100)

            Send("{enter}")

            Sleep(200)

        EndIf

        Return 0 ; Beendet die Funktion und gibt 0 zurück

    EndIf

    Return 1 ; Beendet die Funktion und gibt 1 zurück
EndFunc   ;==>Ask4LogOut

Func Terminate()
    Exit
EndFunc   ;==>Terminate

lg

s.koni

einfach super!

Hallo djbeatstar,

deine Idee klingt sehr interessant, allerdings kann ich mir auch nicht vorstellen, dass es sooo einfach gehen würde die Daten im richtigen Format und Syntax zu erstellen.

Was ich schon öfter gemacht habe ist, dass ich die Daten mit AutoIt gesammelt habe und in einem Array geschrieben. Dass Array dann in einem Schritt in eine Excel geschrieben und dann im Excel ein VBA-Script gestartet das die Daten in die richtige Form bringt.

Ich denke in die gleiche Richtung geht auch BugFixs Überlegung. VBA kriegst du ziemlich einfach hin, wenn du mit AutoIt programmieren kannst hast du schon das meiste Wissen. In Excel finde ich die Markoaufzeichnung sehr hilfreich. Einmal das was du willst von Hand machen und dann in VBA automatisieren.

Trotzdem werde ich mir das mal gemauer ansehen, wie die Syntax in Excel ist. Danke für die Idee!

lg

s.koni

Hallo presenter-test,
ist echt komisch, wenn das Script schon mal funktioniert hat.

Auf den ersten Blick sieht dein Script auch gut aus. Würde nur die Schleife vor die Functions setzen und die Sleep Time nicht soooooo hoch setzen.

Keine Ahnung ob das nun geht, probier es einfach aus.

#include <Constants.au3>


HotKeySet("{PGUP}", "wave")
HotKeySet("{PGDN}", "wood")


While 1
	Sleep(30000) ; 30 Sekunden
WEnd




Func wave()
	$coords = MouseGetPos()
	MouseClick("left", 1038, 704, 1, 1)
	MouseClick("left", $coords[0], $coords[1], 1, 1)
EndFunc   ;==>wave


Func wood()
	$coords = MouseGetPos()
	MouseClick("left", 1012, 707, 1, 1) ;
	MouseClick("left", $coords[0], $coords[1], 1, 1)
EndFunc   ;==>wood

Du schreibst auch, dass es funktioniert, wenn du die Tasten an der Tastatur drückst, also funktioniert dein Script ja prinzipiel. Ich würde den Fehler eher beim Presenter suchen. Hast du da was geändert? Neuer Treiber? Kann man bei dem Presenter irgendwas einstellen? Vielleicht ist da ja was verstellt?

Hoffe du kriegst es hin!

mfg
s.koni

Hallo IvanE,

probier doch mal dem Fenster einen Namen zu verpassen -> WinSetTitle. Probier es mal aus, wenn es klappt, dann hat das Fenster nicht länger keinen Titel und du kannst es viel leichter ansprechen und focus setzen usw.

mfg
s.koni

Hallo mmk1988,

bekommst du die Daten als csv-Datei? Musst du die Daten in Excel haben? Ich habe die csv Datei mal eingelsen mittels _FileReadToArray eingelsen. So würdest du dir das Einlesen der Daten evtl. erleichtern.
Aus dem Array nimmst du die Daten die du brauchst und schreibst sie in eine neues Array, in der reihenfolge wie du sie in Excel dann haben willst. Dann kannst du eine neue leere Excel Datei erstellen lassen und die benötigten Daten per _Excel_RangeWrite eintragen.

Einen schnelleren Weg wüsste ich jetzt nicht.

#include <File.au3>
local $a
_FileReadToArray(@ScriptDir & "\Temporäre Minflow-Werte.csv",$a,$FRTA_COUNT,";")
_ArrayDisplay($a)

Eine Möglichkeit für die optische Anpassungen wäre ein VBA-Script, in der Excel Tabelle, die beim Starten der Excel Datei ausgeführt wird - auch aus dem Gesichtspunkt der geschwindigkeit - das du nachdem du die Daten übertragen hast aus AutoIt heraus anstößt.

BugFix : Stimmt, das mit den Dimensionen im Array muss nicht sein, ist aber oft sehr hilfreich! Aber eine Grundsatzdiskussionen würde ich dazu nicht anfangen. Es ist halt so, wie der Anwender oder Benutzer leichter klar kommt.
Für jemand der mit Arrays anfängt zu arbeiten ist es eine gute Hilfe. Wenn man sicherer ist mir Arrays kann man die Dimensionen mit UBound gezielt abfragen. Beides geht, beides ist erlaubt und beides hat seine Vor- und Nachteile.

lg
Steffen

Hallo mmk1988,

hast da ja schon ein ganz ordentliches Script fabriziert!

Grundsätzlich: Es ist recht schwierig dein Script zu analysieren, da eben nicht alle Daten einsehbar sind, also was wie und wo in der Excel Liste steht, also sei nicht enttäuscht, wenn nicht so viel Hilfe gegeben wird.

Zu deinem 1.Problem: Für mich sieht es korrekt aus. Wie gesagt, kann man es aber nicht nachvollziehen was genau geschieht, das nicht alle Daten verfügbar sind.
Frage 1: Sehe ich es richtig, du hast eine INI Datei, aus der du Werte liest? Kennst du den Befehl INIRead? Damit kann man geziehlt Werte aus eine INI Datei lesen, das ganze mit der Schleife kannst du dir dadurch erleichter.

local $PAR[9]
$PAR[0] = 8	;	Gewöhn dir am besten gleich an, die Dimensionen des Arrays im Array selbst zu speichern, so geht es viel leichter mit schleifen usw.
$PAR[1] = "BM-Nummer" ;			Stüli
$PAR[2] = "Stückliste"; 		Steller
$PAR[3] = "E-Steller";			Chipsatz
$PAR[4] = "Chip" ;			Minflow Soll Kg/h
$PAR[5] = "Minflow in Kg/h";	Minflow Soll Volt
$PAR[6] = "Minflow in Volt";	Maxflow Soll Volt
$PAR[7] = "Maxflow Soll Volt";	Minflow Kg/h Toleranz
$PAR[8] = "Minflow Toleranz"
Global $WertArray[9]
local $file= "C:\Küstermann-Messung_Ohne_Event19\Küstermann-Messung_Ohne_Event19\config.ini"
for $s = 1 to $PAR[0]
	  $WertArray[$s] = IniRead($file,"[Hier musst den Section Name eintragen, den kenn ich so nicht]",$PAR[$s],"")
next

Zu deinem Problem 2: Lös erst mal Problem 1, dann kannst du Problem 2 angehen

Spaß beiseite,
Auch hier würde ich eher mit Arrays arbeiten, also den gesamten Bereich den du ab zwischen Zeile 12 und 34 machst in ein Array lesen und dann mit ArraySearch oder Schleifen das Array durcharbeiten.
Du kannst dann deine gesuchten Werte auch in ein Array schreiben und auf einmal in die Excel Tabelle schreiben - geht viel schneller als mit einer schleife jeden Wert einzeln zu schreiben.

Was hältst du davon dich zunächst mal mit den Arrays zu beschäftigen, denn ich glaube, da liegt die Lösung für deine beiden Probleme.

Was mir sehr gefällt ist, dass du schon einiges kommentierst - das ist wirklich wichtig!

lg
s.koni

Hallo Schnieker,

das Element ist SysListView32 Control. Schau dir mal diesen beitrag an, da wollte auch jemand ein SysListView32 auslesen.
Namen und Position der Desktopsymbole ermitteln

Bei dem Control hast du recht gute Chancen zumindest den Text zu erhalten. Ich kanns leider nicht ausprobieren.

Viel Erfolg
s.koni

Vielen Dank für eure Antworten.

Ich werde mal weiter testen, was für mich die einfachste Lösung ist. Wenn ich soweit bin gebe ich eine info.

Lg
Steffen Konheisner

Gesendet von iPad mit Tapatalk

Ok, dann seherisch mir Java nochmal genauer an.

Nochmal zu meiner eigentlichen Frage: hat schon jemand mal ein AutoIt Script auf einem Rechner ausgeführt und diesen dann per Teamviewer gesteuert? Hat jemand noch einen Vorschlag wie ich das machen könnte (ohne das Programm komplett neun zu programmieren).
Hat jemand Erfahrungen mit Citrix und AutoIt gemacht?

Über Tipps und Erfahrungen wäre ich dankbar.
Lg
S.koni

Gesendet von iPad mit Tapatalk

- Listviewelemente, Wo reagiert wird, wenn eine zeilenangeklickt wird
- Export Funktion bei der Daten nachvexcel ausgegeben werden (Schnittstelle zu excel im autoIt ist super gelöst)
- vier- und entschlüsseln der Daten die
Per php übertragen wurden.

Warum? Die Daten sind ja in der Datenbank verschlüsselt, also nicht nur die Übertragung und der Login, die eigentlichen Daten.
Außerdem würde mich das mit dem fernbedienen des Skriptes interessieren, nicht das Script selbst. Klar dass man das irgendwie dekompelieren kann, aber ich denke da auch das Script nicht jeder einfach so bekommt ist die Gefahr beherrschbar.

Danke Kanashius,

Das ganze in einer anderen Sprache neu aufzuziehen - das wird wohl nicht klappen. Die Funktionalität die autoIt bietet in Java oder Php abzubilden stelle ich mir sehr schwer vor! Gab es mir scho. Mal angesehen, bin aber nicht weitergekommen.
Das Programm ist in Grunde ein Frontend auf eine sql Datenbank in der verschlüsselte Daten liegen.
Mittels sql Kommunikation werden die Daten übertragen und dann im Script entschlüsselt und angezeigt. Die Datensicherheit ist mir sehr wichtig, da personenbezogene Daten in der DB stehen.
Was
Meinst du zu der Idee mittels teamviewer auf eine. PC zuzugreifen und dort das script laufen zu lassen?

Lg
Steffen

Hallo liebe Mitstreiter,

Ich habe ein Programm geschrieben, dass nun von einigen Anwendern eingesetzt wird (soll später Europaweit eingesetzt werden). Nicht alle haben allerdings ein Windows System, sondern würden das Programm gerne auf einem Mac laufen lassen.
Auch fände ich es einfach super, wenn das Programm auch vom Tablet aus gesteuert werden könnte.

Es ist mir klar, dass ich ein kompiliertes Script nicht einfach auf einem iPad oder Android Tablet aufrufen kann. Ich dachte eher an so etwas wie virtuelle PCs die ich mit Teamviewer anspreche, dort das Programm starte und vom Tablet aus fernbediente.

Was mich interessieren würde: hat so was schon jemand mal ausprobiert? Gibt es eine bessere Lösung oder Idee? Wäre eine Citrix Lösung denkbar?

Auf dem "PC" müsste das AutoIt Script und excel laufen.

Bin gespannt was ihr dazu zu sagen habt.

Vielen Dank schon mal,fürs lesen und evtl. für einen Beitrag.
s.koni

Hallo,

du könntest auch das Array mit

ArrayToString ( Const ByRef $aArray [, $sDelim_Col = "|" [, $iStart_Row = -1 [, $iEnd_Row = -1 [, $sDelim_Row = @CRLF [, $iStart_Col = -1 [, $iEnd_Col = -1]]]]]] )

das Array in einen String umwandeln. Datebei musst du nur $sDelim_Row = "|" setzen, dann müsste der String so aussehen:

$derString = "3915547-3915549| 3915553-3921459| 3921490-3931753| 3931764-3976050"

nun könntest du mit $derString = StringReplace($derString,"3931753|","3921491|3921494-3931753")

Dann mit StringSplit($derString,"|") den String wieder in ein Array wandeln

lg
s.koni

Hallo habenureinproblem,

schau dir mal das UDF OwnTab.au3 an. Findest du z.B. hier: http://www.autoitscript.com/forum/topic/10…owntab-control/. Nutze das sehr gerne und ohne Probleme (auch mit LV-Controls).

mfg
Steffen