Beiträge von toto2468

Hey,

ich hatte ein Script für WIndows 7, welches den Monitor zu bestimmten zeiten an und ausschaltet, dies funktionierte mit

;===============================================================================
; Function Name: _MonitorOn()
; Description: Schaltet den Monitor ein.
;===============================================================================
Func _MonitorOn()
Local $mo_Opt = Opt("WinTitleMatchMode", 4)
Local $mo_Handle = WinGetHandle("classname=Progman")
Sleep(500)
DllCall("user32.dll", "int", "SendMessage", "hwnd", $mo_Handle, "int", 274, "int", 61808, "int", -1)
Return Opt("WinTitleMatchMode", $mo_Opt)
EndFunc ;==>_MonitorOn

;===============================================================================
; Function Name: _MonitorOff()
; Description: Schaltet den Monitor ein.
;===============================================================================
Func _MonitorOff()
Local $mo_Opt = Opt("WinTitleMatchMode", 4)
Local $mo_Handle = WinGetHandle("classname=Progman")
Sleep(500)
DllCall("user32.dll", "int", "SendMessage", "hwnd", $mo_Handle, "int", 274, "int", 61808, "int", 2)
Return Opt("WinTitleMatchMode", $mo_Opt)
EndFunc ;==>_MonitorOff

Nun wollte ich dieses Script unter windows 8 laufen lassen, jedoch schaltet sich der Bildschirm nicht wieder an, das selbe script läuft auf jeder win7 maschine ohne probleme. Ich habe auch schon im internet geschaut und die meinten Wohl das in der user32.dll unter Windows 8 einiges anders ist nur leider hab ich von dlls kein plan

Habt ihr eine Idee wie ich das Problem lösen kann und ich mein Bildschirm sowohl auf Windows 7 als auch auf Windows 8 wieder an bekomme?

MfG
Toto2468

Gibt es denn die Möglichkeit zwischen zwei zahlen zu schauen ob die jetzige Uhrzeit wahr ist?

Denn wenn es 1500 UHr ist dann liegt dies Zwischen 1400 (An) und 2200(Aus) und wenn man definieren kann das er ab 2400 wieder bei 0 beginnen soll wäre zb 1000 auch zwischen 2200 und 1400.. gibt es da denn eine Möglichkeit?

Okay aber selbst wenn ich die 1400 und 2200 nehme, bleibt das Problem damit wenn ich mein Display Nachts von 22:00 bis 14:00 Uhr laufen haben möchte

Edit:

Durch das OR werden nun aber auch zeiten wie 16:00 Uhr an und 18:00 Uhr aus wieder als Korrekt dargestellt

also so funkitoniert es ja anscheinend:

$OnTime="14:35"
$OffTime="22:38"
$offDay="DO"

$sysTime=@HOUR & ":" & @MIN

MsgBox(4096, "", $sysTime & _WeekDay())

If $sysTime>=$OnTime AND $sysTime<=$OffTime AND _WeekDay()<>$offDay Then
MsgBox(4096, "", "Display an! Heute ist " & _WeekDay & )

else
MsgBox(4096, "", "Display aus! " & $sysTime)
EndIf

Func _WeekDay()
Switch @WDAY
Case 1
Return "SO"
Case 2
Return "MO"
Case 3
Return "DI"
Case 4
Return "MI"
Case 5
Return "DO"
Case 6
Return "FR"
Case 7
Return "SA"
Case Else
MsgBox(4096, "", "- Wochentag konnte nicht ermittelt werden. - Exit")
Exit
EndSwitch
EndFunc ;==>_WeekDay

nur wie vergleicht er die Werte? Als Strings? warum funktioniert es dann?

EDIT:

Nun sehe ich schon ein Problem: Wenn ich mein Monitor um 22 Uhr Anschalten will und es um 16 Uhr ausgehen soll funktioniert dies nicht, da die OnTime größer als die Systemzeit ist.

Also der Fehler war das ist ein "AND" statt "&" brauchte. den Doppelpunkt brauch ich eig nicht, jedoch werden die Zahlen aus einer Generierten XML gelesen und für den Kunden ist es mit dem Doppelpunkt einfacher zu lesen.

If $sysTime>=$OnTime AND $sysTime<=$OffTime Then
MsgBox(4096, "", "Display an! " & $sysTime)

else
MsgBox(4096, "", "Display aus! " & $sysTime)
EndIf

So sieht es zur zeit aus, scheint auch zu funktionieren, jedoch bin ich mir nicht sicher wie Autoit wie du schon sagtest den Doppelpunkt interpretiert da es so ja zb "If 14:50>=14:00" heißt wäre es gut zu wissen ob er erkennt das es eine Zeitangabe ist oder ob er den Doppelpunkt ignoriert und 1450 draus macht oder wie auch immer.

Desweiteren möchte ich dort auch Wochentage einbeziehen:

$OnTime="14:35"
$OffTime="14:38"
$offDay="4"

$sysTime=@HOUR & ":" & @MIN

MsgBox(4096, "", $sysTime & _WeekDay())

If $sysTime>=$OnTime AND $sysTime<=$OffTime AND Not @WDAY=$offDay Then
MsgBox(4096, "", "Display an! " & $sysTime)

else
MsgBox(4096, "", "Display aus! " & $sysTime)
EndIf

dies funktioniert auch noch nicht so richtig

Naja ich möchte das Script in einer Geplanten Aufgabe von Windows laufen lassen, somit wird das Script alle 30min ausgeführt.

Meine erste überlegung war :

$OnTime="15:00"
$OffTime="22:00"

$sysTime=@HOUR & ":" & @MIN

MsgBox(4096, "", $sysTime)

If $sysTime>$OnTime & $sysTime<$OffTime Then
MsgBox(4096, "", "Display an! " & $sysTime)

else
MsgBox(4096, "", "Display aus! " & $sysTime)
EndIf

leider stimmt was an der If Bedingung noch nicht. Aber vom Prinzip würde er dieses Programm durch die Aufgabenplanung alle 30min starten, nachschauen wie spät es ist und dann ggf. Monitor an oder ausschalten

Hey!

Ich möchte ein Autoit script ausführen, welches eine XML mit an und ausschaltzeit für ein Monitor ausliest.
in der XML habe ich z.B. on=06:00 und off 22:00, somit soll mein Monitor um 06:00Uhr eingeschaltet werden und um 22:00 Uhr dementsprechend ausgeschaltet. Dies soll unter der Aufgabenplanung eingerichtet sein und sich alle 30min starten. Nun wird die XML eingelesen und die zeiten Geprüft, ob es grade die Uhrzeit ist. Leider weiß ich nicht so recht wie ich das machen soll.. Zurzeit hatte ich das Skript durchgehend im hintergrund laufen mit einer While schleife und dann eben "If $OnTime == @HOUR & ":" & @MIN Then _MonitorOn()" "If $OffTime == @HOUR & ":" & @MIN Then _MonitorOff()" und danach immer noch ein Sleep(1000), jedoch möchte ich das Programm nicht durchgehend laufen haben sondern wie gesagt nur jede Std als Aufgabe und es soll prüfen ob die Zeit wo es Startet eine Zeit zwischen der An- und ausschaltzeit ist.

Danke für die Hilfe
Toto2468

Hey,

ich würde gern eine von meinem Autoit script erstelle .bat datei starten, warten bis sie fertig ist und dann den Script fortführen, habe dies mit

RunWait("batch.bat","",@SW_MINIMIZE)

versucht, jedoch startet er die .bat erst garnicht.. die batch.bat liegt im selben verzeichnis wie das script
In meiner .bat nutze ich nur ein batchbefehl für TextAloud, ansonsten steht nur das @echo on oben drüber.

Danke für die Hilfe
Toto2468

Habe nunj die ganze zeit Probiert aber ich komme doch mit meiner anderen XML nicht klar.

<?xml version="1.0" encoding="ISO-8859-1"?>
<data>
	<Subtitles>
		<text>Hofansicht</text>
		<text>Südansicht mit Pool</text>
		<text>Ansicht im Hof</text>
                <text>Pool</text>
                <text>Südansicht</text>
                <text>Kamin</text>
                <text>Eingangsbereich</text>
                <text>Heizungsanlage</text>
                <text>Rad mit Blumen am Vorbau der Südseite</text>
                <text>Scheune mit Fachwerk</text>
                <text>Gründungsstein</text>
                <text>Südansicht</text>
	</Subtitles>
  <TextAloud>
    <text>Weinberg mit gepflegtem Rebstockbestand, Südhang, einem massiven Haus, ein Holzhaus, ein gepflasterter Grillplatz, ein gemauerter Grill, Wasser-/ Abwasser- und Stromanschluss vorhanden, 2/3 Hangfläche, 1/3 ebenerdige Fläche</text>
  </TextAloud>
</data>

so sieht meine andere XML aus, nun möchte ich mir nacheinander die einzelnen textelemente Ausgeben lassen, da diese später nacheinander in eine Datei geschrieben werden.

Es gibt pro Objekt eine solche XML.

Bisher habe ich:

$sNamenXML = FileRead('Videos' & $aTmp[$j] & 'content.xml')

$sResult = StringRegExp($sNamenXML, "<Subtitles>(?s)(.*?)</Subtitles>", 3, 1)

Dim $sTextA[1]

For $i = 0 To UBound($sResult) - 1
Dim $sText[1]

$sText = _StringBetween($sResult[$i], "<text>", "</text>")
_ArrayDisplay($sText)
$sTextA[UBound($sTextA) - 1] = $sText[0]
_ArrayDisplay($sTextA)

ReDim $sTextA[UBound($sTextA) + 1]
Next
ReDim $sTextA[UBound($sTextA) - 1]

Da ich dieses mal ja keine zwei Werte habe sondern nur den einen habe ich nur Dim $sTextA[1] gemacht.
Dann sollte er ja eigentlich meine texte einzeln in $sText schreiben welches er mir ja auch anzeigt. Nun muss ich ja diese EInzelnen werte in ein anderes Array bringen welches ich dann auslesen kann oder?
Array war noch nie so meine stärke

Danke im vorraus

EDIT:

Okay hat sich erledigt,

$sNamenXML = FileRead('Videos' & $aTmp[$j] & 'content.xml')

$sResult = StringRegExp($sNamenXML, "<Subtitles>(?s)(.*?)</Subtitles>", 3, 1)

For $x = 0 To UBound($sResult) - 1
Dim $sText[1]

$sText = _StringBetween($sResult[$x], "<text>", "</text>")

Next

und dann mit $sText[x] ausgeben

Danke für eure hilfe

Hey danke für die Schnelle hilfe, ja mit arrays hatte ich immer schon meine Probleme und bin ja auch nur ein Azubi der Zweckentfremdet wurde hehe.
Jetzt läuft es, er erstellt mir die richtigen Pfade für die einzelnen Kunden und diese konnte ich auch verarbeiten

Das array habe ich durch dein letzen Script endlich vom aufbau verstanden
Ich versuche mal auf diese Art eine andere XML einzulesen

Danke erstmal für die Hilfe

hey danke,

mit deiner lösung komme ich aber irgendwie nur Bis zum ersten KUnden und dann kommt der Fehler
"Array variable has incorrect number of subscripts or subscript dimension range exceeded.:"

steht bei $aCustomers[i$][1] die 1 für den ersten Kunden?
könnte ich mir bei diesem Array jetzt auch zb nur die Eine Nummer vom Kunden und dann Extra den Kunden dazu ausgeben, falls ich anders mit der Variable arbeiten möchte?

müsste ich bei "1 to UBound($aCustomers) - 1" nicht eigentlich hochzählen? Ich sage ihm doch das er von 1 bis "Größe des Arrays" zb 10 hochzählen soll aber das -1 würde ihn doch gleich am anfang von 1 auf 0 setzen oder?

Danke für die hilfe!

EDIT:
Okay nun funktioniert es, ist die zweite FOR Schleife nicht überflüssig? Ich habe doch oben die selbe schleife

For $i = 1 To UBound($aCustomers) - 1

$aTmp=$aCustomers[$i][1]

For $j = 1 To UBound($aTmp) -1

Dadurch "kopiere" ich doch eigentlich nur das Array
die 2. und 3. Frage bleiben bestehen

wie genau muss dann die For schleife aussehen? Habe bisher noch nicht mit einer For schleife Gearbeitet

Ah okay mit FileRead geht es nun, das Array gibt er mir nun auch aus.
Wie kann ich nun die Anzahl meiner Objekte insgesamt zählen? Da ich eine while schleife habe, welche solange läuft, wie Objekte da sind

Anbei der Autoit script, wo ich eine BAT datei erstelle, genau wie ich zuvor die Avisynth datei erstellt habe mit der selben txt datei und stringsplit.

#include <File.au3>
#include <Array.au3>
#include <String.au3>

$BatFileInfoVideo = FileOpen('video.txt', 0)
$BatFileInfoVideoArray = StringSplit(FileReadLine($BatFileInfoVideo), ";")
$BatarrayZahlVideo = 1
$BatarrayZahlVideoAll=UBound($BatFileInfoVideoArray)
$BatarrayZahlVideoAll=$BatarrayZahlVideoAll-1
$BatFile = FileOpen('avsmp4.bat', 2)

FileWrite($BatFile,'@echo on' & @CRLF)

while $BatarrayZahlVideo <= $BatarrayZahlVideoAll

$Batfolder = "Videos" & $BatFileInfoVideoArray[$BatarrayZahlVideo] & ""
$BatarrayZahlVideo=$BatarrayZahlVideo+1
$Batfolder=$Batfolder & $BatFileInfoVideoArray[$BatarrayZahlVideo] &""

FileWrite($BatFile,' ' & @CRLF)
FileWrite($BatFile,'for %%a in ("' & $Batfolder & '*.avs") do ffmpeg -i "%%a" -c:v libx264 -tune Film -crf 28 -preset Fast "' & $Batfolder & '%%~na.mp4"' & @CRLF)

$BatarrayZahlVideo=$BatarrayZahlVideo+1

WEnd

FileWrite($BatFile,' ' & @CRLF)

Hier möchte ich nun die Lösung von i2c einbauen mit einer XML Datei die Pfade zu bestimmen, leider scheitere ich schon an meiner while schleife, wo ich die menge der Objekte wissen muss.

Tut mir leid für die vielleicht blöde frage, aber wie lese die XML datei ein sodass er mit arbeiten kann?
In der einen Version steht der Inhalt der XML ja fest im script, über "FIleOpen" öffnet er meine XML nicht

Danke erstmal für die Antworten!

Also ich versuche nochmal mein Vorhaben zu erklären:

Ich möchte mit dem Autoit script eine Avisynth Datei automatisch erzeugen.
Mir liegt eine XML Datei vor, in der Kundendaten (wie beschrieben, Kunden und Objekte) drin sind. Diese generiert ein Kollege über eine Datenbank, somit weiß ich nie, wie viele einträge die XML haben wird und wie viele Objekte die einzelnen Kunden haben, somit muss ich die XML immer neu auslesen können.
Die werte der XML datei sollen zu meinem Pfad werden, welchen ich mittels des selben Scripts anlegen möchte. Zurzeit arbeite ich mit txt files welche ich mit stringsplit verarbeite, diese txt files muss ich aber selbst erstellen, da mein kollege produktiv nur XML files erzeugen kann.

zurzeit beziehe ich mein Pfad immer aus dem Stringsplit und dann beziehe ich daraus mein Pfad:

$Txtfile = FileOpen('video.txt', 0)

$Txtarray = StringSplit(FileReadLine($Txtfile), ";")

$folder = "Videos" & $Txtarray[$arrayZahlVideo] & ""
$arrayZahlVideo=$arrayZahlVideo+1
$folder=$folder & $Txtarray[$arrayZahlVideo] &"\Images"

somit baut mir Autoit den Pfad $folder aus dem ersten Teil des arrays und dem zweiten zusammen (in meiner txt file wäre dies "peter;12345" somit ist nun in der Variable $folder "Videos\peter\12345\Images"

Da ich diese txt files nicht händisch erstellen möchte sondern die XML Datei von meinem Kollegen nutzen möchte, benötige ich eine möglichkeit die XML Datei auszulesen und daraus meine Pfade automatisch zu generieren um damit zu arbeiten.

Ich hoffe dies war einigermaßen verständlich geschrieben.

MfG
Toto2468

Oder könnte mir wenigstens jemand ein Beispiel zum einlesen einer XML Datei geben? Ich habe eine XML Datei wo immer

<video>
<Kunde>Klaus</kunde>
<Objektnummer>12345</Objektnummer>
<Objektnummer>54815</Objektnummer>
</video>
<video>
<Kunde>Peter</kunde>
<Objektnummer>45678</Objektnummer>
</video>

vorkommt, also Pro kunde können mehrere Objektnummern vorkommen.
Nun möchte ich die XML so einlesen, das ich die Objektnummer und den Kundenname in eine Variable speichere sodass ich z.B. ein Pfad aus /klaus/12345/ und /klaus/54815/ generieren kann, den in diesem Pfad sind immer Pro Objekt jedes Kunden Bilder hinterlegt, welche weiter verarbeitet werden sollen, da diese Pfade automatisch angelegt werden je nachdem Welches Objekt der Kunde hat, benötige ich hier den automatismus das die XML immer ausgelesen wird und er mir die neuen Pfade generiert.
Ich hoffe das war einigermaßen verständlich
Danke für die Hilfe

MfG
Toto2468

Also im Endeffekt habe ich mit autoit ein Script geschrieben, welches eine AVS datei schreibt (AVISynth), da ich für verschiedene Objekte mehrere Bilder zu einem Video zusammenfügen will.
Derzeit habe ich das Problem mit einer .txt-Datei und Stringsplit gelößt, jedoch ist es mit einer XML schöner und man hat mehr möglichkeiten zum aufbau.
Wie gesagt ich möchte die Inhalte der XML als Pfad haben, sodass ich zb Kunde1/12345 als pfand aus der XML anhand von zwei einträgen zusammen bauen kann, da ich viele Verschiedene Kunden mit jeweils mehreren Objekten habe, und da diese sich immer je nach Objektnummer ändern brauche ich hier eine XML (oder zurzeit txt) Datei die ich auslesen kann, um zu wissen welche Objekte neu sind und verarbeitet werden müssen (die XML bzw TXT datei erstelle ich derzeit händisch)

Hey,

bin neu hier im Forum und weiß noch nicht genau wo das hier rein gehört.
Ich benutze autiit erst seit kurzem und würde nun gerne eine XML-Datei einlesen, um z.B. den inhalt als Variablen weiter zu verwenden.

Meine XML-Datei sieht so aus:

<?xml version="1.0" encoding="UTF-8" standalone="no"?>
<xml>
<video>
  <Kundenindex>Kunde1</kundenindex>
  <Objektnr>12345</Objektnr>
</video>
<video>
  <Kundenindex>Kunde2</kundenindex>
  <Objektnr>56789</Objektnr>
</video>
</xml>

Nun möchte ich diese XML Datei einlesen und die Werte als Pfade bestimmen, denn ich benutze z.B. den Arbeitspfad /Kunde1/12345/Images, da ich aber mehrere Kunden habe und auch diese Mehrere Objekte wollte ich es in Form eine XML Datei einlesen, da das ganze später automatisiert laufen soll.
Normales einlesen aus Textdateien ist ja kein Problem für mich nur ich habe schwierigkeiten das er jeden Wert einzelnt als Variable speichern soll und am ende Sozusagen den Pfad "hochzählen" soll, sodass er den nächsten Pfad nimmt und die Prozedur wiederholt.

Ich hoffe das alles ist nicht zu verwirrend und jemand wüsste vielleicht einen ansatz.
Für Fragen stehe ich gern zur Verfügung
MfG
Toto2468