Script für Funktionserweiterung von LightsOut (Upd:14.12.09)

[JuMi]

Ich probiere gerade das Script aus und beim Lesen Deiner Anleitung kommen mir folgende Fragen:

1. In den Features steht dass WHS nicht ausgeht solange eine Aufnahme läuft und zusätzlich ein Task angelegt wird.

Wird der Task angelegt um die Aufnahme nicht zu unterbrechen oder sind das 2 Eigenschaften ???

Ich habe es so verstanden dass das Script Einträge in den Lightsout Kalender hinzufügt.
Das Script im Autostart macht jetzt was genau ??? Bin total durcheinander.
Eigentlich brauche ich das Script nur um zu verhindern dass während einer Aufnahme der Rechner runtergefahren wird.
Das Aufwachen zum Sendebeginn macht bei mir hervorragend das MP Power Sheduler Plugin

[larry]

In den LightsOut Kalender wird nicht eingetragen.

Der Autostart des Scripts sorgt dafür, dass es dauerhaft im Hintergrund läuft.
Sobald eine Aufnahme läuft wird in LightsOut die Aktion nach x Minuten auf "nichts tun" umgestellt. Erst nach der Aufnahme wird wieder der gewünschte Eintrag für Standby oder Ruhezustand gesetzt.

Der Task, welcher angelegt wird, sorgt für das Aufwachen.

Gruß
Larry

[JuMi]

Ahhh jetzt hab ichs gerafft...klingt logisch ... Danke für die Erläuterung und das Script .... funktioniert hervorragend.

[JuMi]

Hmmm ich hab das Script verlegt und irgendwie finde ich den Download-Button hier nicht mehr
Wer kann helfen???

[Mike Lowrey]

Dateianhänger sind zur Zeit deaktiviert,deswegen findest du den Button nicht mehr.

Musst also darauf warten, dass larry die Version woanders hoch lädt oder die Dateianhänge wieder aktiv sind.

[Christoph]

Hallo,

ja, dass ist richtig, dass die Anhänge zur Zeit deaktiviert sind. Wir wollen schauen, ob dies eine Auswirkung auf die Fehler am Board hat.

Danke für das Verständnis,

Christoph

[cschmidt]

Ich habe jetzt plötzlich ein kleines Problem mit dem Skript und hoffe jemand hier kann mir helfen:

Ich starte das Skript über den Taskplaner beim Systemstart, was auch prima funktioniert. Es arbeitet dann problemlos und hält meinen WHS wach, wenn eines meiner Internet-Radios (per IP) noch aktiv ist. Ein paar Tage später schaue ich dann auf den Server und das Skript läuft einfach nicht mehr - leider findet sich im Log auch keinerlei Hinweis auf den Grund der Beendigung - hat jemand vielleicht eine Idee, wie ich herausfinden kann, warum das Skript plötzlich beendet wird?

Danke und Gruß

Chris

[larry]

Schau mal in die Lasche "Einstellungen" des geplanten Tasks, welches das Script startet.
Wenn du nichts geändert hast ist dort die Standardeinstellung von "beenden nach 72 Stunden" aktiv.
Einfach hier den Haken entfernen.

Gruß
Larry

[cschmidt]

Super - genau das war es. Danke für die Hilfe - ich wusste nicht, dass bei den Tasks ein solcher Default-Wert drin ist ...

Gruß

Chris

[torg]

Hallo lArry,

Seit PP3 habe ich jetzt schon ein paar mal Fehlermeldungen daß kein Zugriff auf die Datenbank erfolgen konnte und damit das Script abgebrochen wurde.
(Fehlermeldung erfolgt zur Zeile 82). Ärgerlich, da dann kein weiteres aufwachen erfolgt.
Gibt es eine Möglichkeit, daß das Script es nach einiger Zeit wieder versucht?


Ich werde das mal beobachetn und beim nächsten mal die Meldung kopieren. Im log wird sowas leider nicht vermerkt.

Beste Grüße,

[larry]

Es ist schon machbar, dass das Script dann trotzdem weiter läuft.
Poste aber bitte erst mal einen Screenshot. Bei mir hatte ich bisher mit PP3 keine Probleme.

Wenn der Fehler nicht behebbar ist, dann sende ich dir ein paar Zeilen Code zum einfügen.

Gruß
Larry

[Nubbsi]

Hallo

auch ich habe das Script bei mir im Taskplaner hinterlegt. Läuft alles wunderbar.

Ich hätte eine kleine Ergänzung für Clients die ständig laufen (ein ping auf diese Clients bedeutet der Homeserver ist immer an.) und nur manchmal auf den Homeserver via Netzwerkfreigaben zugreifen wie z.B. ein Sonos, Squeezbox, IPhone / IPod oder irgend ein anderes Gerät ohne installierbarem LightsOut Client. Bei mir Zuhause läuft ein Sonos ZP 90 und ein Iphone (ezFiles) über die ich auf die Freigaben zugreifen kann.

Einfach das Script um folgenden Eintrag ergänzen:
cmdline "net files","The command completed successfully."

und schon bleibt der Homeserver auch dann an wenn jemand einfach nur Files über die Netzwerkfreigabe im Zugriff hat.

Viel Spaß damit.

[torg]

Wie nach Murphy üblich tritt der Fehler jetzt natürlich nicht auf.
(Vorher hatte ich ihn insgesamt 4 mal innerhalb einer Woche)

Sobald er auftritt mache ich dann einen Screenshot.


Beste Grüße,

[torg]

Irgendwie weiss ich jetzt nicht mehr weiter:

Seit dem PP3 Update / aktuellen MP SVN hängt sich das script auf:

Der WHS wird über den Task-Plaber gestartet, jedoch scheint lightsout nach der entsprechenden time-out periode den Rechner wieder schlafen zu legen.

Als Ergebnis wird kein neuer Task zum aufwecken mehr angelegt (ich sehe immer noch den letzten Weckzeitpunkt im Taskplaner; hier war es 7:45)

09.12.2009 02:16:29 --- Start ---
09.12.2009 02:16:29 Taskplaner = 01.01.2020
09.12.2009 02:16:29 Set LightsOut = 0 (keine Aktion)
09.12.2009 02:21:29 --- Start ---
09.12.2009 02:21:29 Taskplaner = 01.01.2020
09.12.2009 02:21:29 Set LightsOut = 0 (keine Aktion)
09.12.2009 02:26:29 --- Start ---
09.12.2009 02:26:29 Taskplaner = 01.01.2020
09.12.2009 02:26:29 Set LightsOut = 0 (keine Aktion)
09.12.2009 02:31:29 --- Start ---
09.12.2009 02:31:29 Taskplaner = 01.01.2020
09.12.2009 02:31:29 Set LightsOut = 0 (keine Aktion)
09.12.2009 02:36:29 --- Start ---
09.12.2009 02:36:29 Set Taskplaner: 09.12.2009 07:45:00
09.12.2009 02:36:30 Set LightsOut = 1
09.12.2009 07:45:01 --- Start ---

hier endete der Log. Nach 21min gings wieder in den Standy (Timeout im Lightsout wenn kein Client da)

Natürlich wird MP_Aufnahmen nicht mit einer neuen Zeit versehen, da ja der letzte Zeitpunkt noch nicht erreicht wurde und nun in der Vergangenheit liegt.

Hat da jemand Ideen (Larry?)

Danke,
Torg


Noch eine Anmerkung: eventuell waäre es gut wenn MP Aufnahmen durch MP_LO_Erw den nächsten Termin bekommt falls der aktuelle in der Vergangenheit liegt (löst aber wohl leider nicht das Problem mit dem Standby)

Anscheinend ist zeitgleich auch der besagte Script-Fehler wegen Probleme beim SQL Zugriff aufgetreten (gesehen erst an der Konsoloe) Screenshot attached.
Ob hier ein Zusammenhang besteht kann ich nicht sagen.

[larry]

Neue Version eingestellt.
Update nicht zwingend erforderlich.
Eine kurze Erläuterung befindet sich im ersten Beitrag.

Ein manuelles Aktualisieren kann durchgeführt werden, indem am Ende des Scripts folgendes ergänzt wird:

Code: Alles auswählen

'**************************************************************
Sub CheckFehler
'**************************************************************
if err.number<>0 then
      logdatei "Fehler:" & Err.Description
      err.clear
end if
end sub

und zusätzlich der Abschnitt zu Mediaportal ausgetauscht wird:

Code: Alles auswählen

if CheckMP=1 then
      'Task zum Aufwachen anlegen, wenn noch nicht vorhanden
      if not fso.fileexists("C:\WINDOWS\Tasks\MP_Aufnahmen.job") then
      intReturn = WshShell.Run("SCHTASKS /Create /ru "&lcase(net.computerName)&"\"&PLUser&" /RP "&chr(34)&PLPW&chr(34)&" /SC täglich /TN MP_Aufnahmen /TR C:\WINDOWS\system32\tasklist.exe /ST 00:00:00" , 1, true)
      msgbox "Der Task wurde neu angelegt. Bitte setzte bei dem automatischen Task 'MP_Aufnahmen' händisch die Option 'Computer zum Ausführen des Tasks reaktivieren'.",0,"Achtung"
      end if

      'Datenbankabfrage
      on error resume next 'Bei Fehler Script fortsetzen

      db1.Open("Driver={SQL Server};SERVER="&SQLServer&";Database="&DWH&";User ID="&SQLUser&";Password="&SQLPW)
      CheckFehler
      set rs1=db1.execute("SELECT min(Starttime) as start from " & _
                          "(     select dateadd(mi,(preRecordInterval+"&Zeitdiff&")*-1,Starttime) as starttime, dateadd(mi,PostRecordInterval+"&Zeitdiff&",Endtime) as endtime " & _
                          "      from schedule " & _
                          "      where scheduleType=0 " & _
                          "    union " & _
                          "      select dateadd(mi,datepart(mi,starttime)-(preRecordInterval) -"&Zeitdiff&" ,dateadd(hh,datepart(hh,starttime),heute)) as startime, " & _
                          "             dateadd(mi,datepart(mi,endtime)+(PostRecordInterval)+"&Zeitdiff&" ,dateadd(hh,datepart(hh,endtime),heute)) as endtime " & _
                          "      from schedule " & _
                          "               inner join (SELECT DATEADD(dd, 0, DATEDIFF(dd, 0, GETDATE())) as heute,DATEADD(dd, -1, DATEDIFF(dd, 0, GETDATE())) as gestern, DATEADD(dd, +1, DATEDIFF(dd, 0, GETDATE())) as morgen  ) as UA " & _
                          "               on 1=1 " & _
                          "      where scheduleType in(1,3,4) or (scheduleType=2 and datepart(dw,heute)=datepart(dw,starttime)) or (scheduleType=6 and datepart(dw,heute) in (1,2,3,4,5)) or (scheduleType=5 and datepart(dw,heute) in (6,7)) " & _
                          "    union " & _
                          "      select dateadd(mi,datepart(mi,starttime)-(preRecordInterval) -"&Zeitdiff&" ,dateadd(hh,datepart(hh,starttime),morgen)) as startime, " & _
                          "             dateadd(mi,datepart(mi,endtime)+(PostRecordInterval)+"&Zeitdiff&" ,dateadd(hh,datepart(hh,endtime),morgen)) as endtime " & _
                          "      from schedule " & _
                          "               inner join (SELECT DATEADD(dd, 0, DATEDIFF(dd, 0, GETDATE())) as heute,DATEADD(dd, -1, DATEDIFF(dd, 0, GETDATE())) as gestern, DATEADD(dd, +1, DATEDIFF(dd, 0, GETDATE())) as morgen  ) as UA " & _
                          "               on 1=1 " & _
                          "      where scheduleType in(1,3,4) or (scheduleType=2 and datepart(dw,morgen)=datepart(dw,starttime)) or (scheduleType=6 and datepart(dw,morgen) in (1,2,3,4,5)) or (scheduleType=5 and datepart(dw,morgen) in (6,7)) " & _
                          "    union " & _
                          "      select dateadd(mi,datepart(mi,starttime)-(preRecordInterval) -"&Zeitdiff&" ,dateadd(hh,datepart(hh,starttime),gestern)) as startime, " & _
                          "             dateadd(mi,datepart(mi,endtime)+(PostRecordInterval)+"&Zeitdiff&" ,dateadd(hh,datepart(hh,endtime),gestern)) as endtime " & _
                          "      from schedule " & _
                          "               inner join (SELECT DATEADD(dd, 0, DATEDIFF(dd, 0, GETDATE())) as heute,DATEADD(dd, -1, DATEDIFF(dd, 0, GETDATE())) as gestern, DATEADD(dd, +1, DATEDIFF(dd, 0, GETDATE())) as morgen  ) as UA " & _
                          "               on 1=1 " & _
                          "      where scheduleType in(1,3,4) or (scheduleType=2 and datepart(dw,gestern)=datepart(dw,starttime)) or (scheduleType=6 and datepart(dw,gestern) in (1,2,3,4,5)) or (scheduleType=5 and datepart(dw,gestern) in (6,7)) " & _
                          ") as ua " & _
                          "where endTime>current_timestamp")
      if err.number=0 then
          'Nur wenn kein Fehler aufgetreten ist, normales vorgehen
          if isdate(rs1("Start")) then 'Wenn Aufnahmen programmiert sind oder aktuelle eine läuft...
             if rs1("Start")<now() then
               'Es läuft gerade eine Aufnahme
               aktiv=aktiv+1
                  if "A"&WshShell.RegRead("HKCU\SOFTWARE\AxoNet Software GmbH\LightsOut\MP_Aufnahme")<>"A"&"01.01.2020" then
                     Logdatei "Set Taskplaner:  01.01.2020"
                     intReturn = WshShell.Run("SCHTASKS /change /ru "&lcase(net.computerName)&"\"&PLUser&" /RP "&chr(34)&PLPW&chr(34)&" /TN MP_Aufnahmen /ST 00:00 /SD 01/01/2020" , 1, true)
                     WshShell.RegWrite "HKCU\SOFTWARE\AxoNet Software GmbH\LightsOut\MP_Aufnahme","01.01.2020","REG_EXPAND_SZ"
                  else
                     Logdatei "Taskplaner = 01.01.2020"
                  end if
             else
               'Es ist eine Aufnahme geplant, ggf Starttask anlegen
                'wenn Task nicht schon angelegt wurde, anlegen
                  if "A"&WshShell.RegRead("HKCU\SOFTWARE\AxoNet Software GmbH\LightsOut\MP_Aufnahme")<>"A"&rs1("Start") then
                     Logdatei "Set Taskplaner: "&rs1("Start")
                     intReturn = WshShell.Run("SCHTASKS /change /ru "&lcase(net.computerName)&"\"&PLUser&" /RP "&chr(34)&PLPW&chr(34)&" /TN MP_Aufnahmen /ST "&right(rs1("Start"),8)&" /SD "&replace(left(rs1("Start"),10),".","/") , 1, true)
                     WshShell.RegWrite "HKCU\SOFTWARE\AxoNet Software GmbH\LightsOut\MP_Aufnahme",rs1("Start"),"REG_EXPAND_SZ"
                  else
                     Logdatei "Taskplaner = "&rs1("Start")
                  end if
             end if
          end if
      else  ' Fehlermeldung loggen, kein Standby
      CheckFehler
      aktiv=aktiv+1
      end if
      db1.close
      'Fehlerprüfung wieder aktivieren
      on error goto 0
end if

@Torg,

die neue Version wird dein Anmeldeproblem an sich nicht lösen. Das Script läuft allerdings weiter.
Wenn die Anmeldeprobleme nur zeitweise bestehen, dann sollte es damit funktionieren.

Gruß
Larry