Diskussion:CapturePlugin - ProgDVB

Da ich ein deutsches Windows habe geht "/sc once" nicht sondern muss "/sc EINMAL" heisen.

Wie es aussieht gibt es für WinTV2k ab Version 4.4 (bitte erst testen) einen neuen Parameter "-exitr". Dieser beendet WinTV2k nach einer Aufnahme. So habe ich das Skript einwenig umgeschrieben:

-- alles andere bleibt gleich.

Parameter für TV Browser (Aufnahme-Parameter)

c:\progdvb\timer.vbs %SH %SMI %SD %SMO %SY  %CNU %UP %UN %T2 %LS 

Das Skript: timer.vbs

Set ArgObj = WScript.Arguments

   starthh = ArgObj(0)
  startmin = ArgObj(1)
  startday = ArgObj(2) 
startmonth = ArgObj(3)
 startyear = ArgObj(4)
   channal = ArgObj(5)
  password = ArgObj(6)
      user = ArgObj(7)
  taskname = ArgObj(8)
  sekunden = ArgObj(9)  
  
    
startdate = startday & "/" & startmonth & "/" & startyear
starttime = starthh & ":" & startmin & ":00"

startprog = """C:\Programme\WINTV\WinTV2K.EXE -c"& channal &" -ntod -startr:" & name  &"_" & 
startday & "," & startmonth & "," & startyear & "###.mpg -qvcd  -limit:" & sekunden & " -mute
-exitr"""
set task = wscript.CreateObject("wscript.Shell")

task.run("%systemroot%\system32\schtasks.exe /create /sc EINMAL /st " & starttime & " /sd " & 
startdate & " /ru " & user & " /rp " & password & " /tn " & taskname & " /tr "& startprog ),1
wscript.sleep 200
task.run ("%systemroot%\System32\waketask.exe 1 " & taskname),1

Das Skipt: deltimer.vbs

Dim taskname
Set ArgObj = WScript.Arguments
taskname = ArgObj(0)

set task = wscript.CreateObject("wscript.Shell")
task.run ("%systemroot%\system32\schtasks.exe /delete /f /tn " & taskname),1