home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 49 / cda49.iso / Share / Multi / MicrosoftWindowsMediaEncoder7 / wmencoder.exe / remoteadmin.asp < prev    next >
Encoding:
Text File  |  2000-08-04  |  35.0 KB  |  1,433 lines
  1. <%@ Language=VBScript CODEPAGE=65001 %>
  2.  
  3. <html>
  4. <head>
  5. <meta NAME="GENERATOR" Content="Microsoft FrontPage 4.0">
  6. <meta http-equiv="Content-Language" content="en-us">
  7. <meta HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8">
  8. <title>Remote Admin</title>
  9. <style>
  10.  
  11. TD.clsNgHead
  12. {
  13.     BACKGROUND-COLOR: #6699cc;
  14.     BORDER-LEFT: #99ccff 2px outset;
  15.     BORDER-RIGHT: #99ccff 2px outset;
  16.     BORDER-TOP: #99ccff 2px outset;
  17.     COLOR: #ffffff;
  18.     FONT-FAMILY: verdana;
  19.     FONT-SIZE: xx-small;
  20.     FONT-WEIGHT: bold
  21. }
  22. TD.clsNgHead A
  23. {
  24.     COLOR: #ffffff;
  25.     FONT-SIZE: 95%;
  26.     TEXT-DECORATION: none
  27.  
  28. }
  29.  
  30. TD.clsTab
  31. {
  32.     BACKGROUND-COLOR: #003366;
  33.     BORDER-BOTTOM: #99ccff 2px inset;
  34.     BORDER-LEFT: #6699cc 1px solid;
  35.     BORDER-RIGHT: #6699cc 1px solid;
  36.     BORDER-TOP: #003366 2px solid;
  37.     CURSOR: hand
  38.  
  39. }
  40. TD.clsTab A
  41. {
  42.     COLOR: #ffffff;
  43.     FONT-SIZE: 95%;
  44.     TEXT-DECORATION: none
  45. }
  46. TD.clsTab A:hover
  47. {
  48.     COLOR: #ffffff;
  49.     FONT-SIZE: 95%;
  50.     TEXT-DECORATION: none
  51. }
  52. TD.clsTab A:active
  53. {
  54.     COLOR: #ffffff;
  55.     FONT-SIZE: 95%;
  56.     TEXT-DECORATION: none
  57. }
  58. </style>
  59.  
  60.  
  61.  
  62. <script LANGUAGE="javascript">
  63. <!--
  64.  
  65. function fnTabClickTTSub( nTab )
  66.     {
  67.     event.cancelBubble=true
  68.     nTab = parseInt(nTab)
  69.         for(i = 0; i < 3 ;i++){
  70.         tabsTTSub[i].className="clsTab";
  71.         TabTable[i].style.display = "none"
  72.         }
  73.         TabTable[nTab].style.display = "block"
  74.         tabsTTSub[nTab].className="clsNgHead";
  75.         event.returnValue = false;        
  76.     }
  77.  
  78. function GetNew(){
  79.     RunEnc.Comm.value=0
  80.     WaitProcess.style.display=""
  81.     
  82.     RunEnc.submit()
  83. }    
  84. function refr_PageRefresh(){
  85.     RunEnc.Comm.value=0
  86.     WaitProcess.style.display=""
  87.     RunEnc.submit()
  88. }    
  89. function Start(){
  90.     RunEnc.Comm.value=1
  91.     WaitProcess.style.display=""
  92.     RunEnc.submit()
  93. }
  94. function Stop(){
  95.     RunEnc.Comm.value=2
  96.     WaitProcess.style.display=""
  97.     RunEnc.submit()
  98. }        
  99. function Mute(){
  100.     RunEnc.Comm.value=3
  101.     WaitProcess.style.display=""
  102.     RunEnc.submit()
  103. }
  104.  
  105. function ClearProfileList(){
  106.     var i
  107.     for (i=0;i<document.RunEnc.sProfile.options.length;i++)
  108.         RunEnc.sProfile.options.remove(i)
  109. }
  110. function AddProfileList(sName,sValue,iSelect){
  111.     var oOption=document.createElement("OPTION")
  112.     RunEnc.sProfile.options.add(oOption)
  113.     oOption.innerText=sName
  114.     oOption.value=sValue
  115.     if (iSelect==1)
  116.         {
  117.         var Len=RunEnc.sProfile.length
  118.         RunEnc.sProfile.selectedIndex=Len-1
  119.         }
  120. }        
  121. function ClearSelectList(){
  122.     var i=RunEnc.sStream.options.length
  123.     while (i>=0){
  124.         RunEnc.sStream.options.remove(i)
  125.         i=i-1
  126.         }
  127.         
  128.     //for(i=0;i< document.RunEnc.slctStream.options.length;i++)
  129.     //    RunEnc.slctStream.options.remove(i)
  130. }
  131. function AddSlectList(sName,sValue){
  132.     var oOption=document.createElement("OPTION")
  133.     RunEnc.sStream.options.add(oOption)
  134.     oOption.innerText=sName
  135.     oOption.value=sValue
  136.     RunEnc.sStream.selectedIndex=0
  137.         
  138. }            
  139. function Start_Disable(){
  140.     RunEnc.cmdStart.disabled=true
  141.     RunEnc.cmdStop.disabled=false
  142.     RunEnc.sProfile.disabled=true
  143.     RunEnc.cmdMute.disabled=false
  144.     
  145.     
  146.     
  147.     //RunEnc.bAStart.disabled=false
  148.     //RunEnc.bAstop.disabled=false
  149.     //RunEnc.bAPause.disabled=false
  150. }
  151. function Stop_Disable(){
  152.     RunEnc.cmdStart.disabled=false
  153.     RunEnc.cmdStop.disabled=true
  154.     RunEnc.sProfile.disabled=false
  155.     RunEnc.cmdMute.disabled=true
  156.     
  157.     
  158.     
  159.     RunEnc.bAStart.disabled=true
  160.     RunEnc.bAstop.disabled=true
  161.     RunEnc.bAPause.disabled=true
  162.     
  163. }
  164.  
  165. function Unable_Error(){
  166.     alert("Cant Start This Encoder No source Groups Defined or No existing sources")
  167. }
  168. function AStart(){
  169.     RunEnc.bAStart.disabled=true
  170.  
  171.     RunEnc.bAstop.disabled=false
  172.     RunEnc.bAPause.disabled=false
  173.     RunEnc.bChange.disabled=true
  174.  
  175.     RunEnc.Comm.value=4
  176.     WaitProcess.style.display=""
  177.     RunEnc.submit()
  178.  
  179. }
  180. function AStop(){
  181.     RunEnc.bAStart.disabled=false
  182.     RunEnc.bAstop.disabled=true
  183.     RunEnc.bAPause.disabled=true
  184.     RunEnc.bChange.disabled=false
  185.  
  186.     RunEnc.Comm.value=5
  187.     WaitProcess.style.display=""
  188.     RunEnc.submit()
  189. }
  190. function APause(){
  191.     RunEnc.bAStart.disabled=false
  192.     RunEnc.bAstop.disabled=false
  193.     RunEnc.bAPause.disabled=true
  194.     RunEnc.bChange.disabled=false
  195.     
  196.     RunEnc.Comm.value=6
  197.     WaitProcess.style.display=""
  198.     RunEnc.submit()
  199.  
  200. }
  201. function ArchiveStarted(){
  202.     RunEnc.bAStart.disabled=true
  203.     RunEnc.bAstop.disabled=false
  204.     RunEnc.bAPause.disabled=false
  205.     RunEnc.bChange.disabled=true
  206.     
  207. }
  208. function DisableArchive(){
  209.     RunEnc.bAStart.disabled=true
  210.     RunEnc.bAstop.disabled=true
  211.     RunEnc.bAPause.disabled=true
  212.     RunEnc.bChange.disabled=false
  213.     
  214.     }
  215. function ArchivePaused(){
  216.     RunEnc.bAStart.disabled=false
  217.     RunEnc.bAstop.disabled=false
  218.     RunEnc.bAPause.disabled=true
  219.     RunEnc.bChange.disabled=false
  220.     
  221. }
  222. function ArchiveStopped(){
  223.     RunEnc.bAStart.disabled=false
  224.     RunEnc.bAstop.disabled=true
  225.     RunEnc.bAPause.disabled=true
  226.     RunEnc.bChange.disabled=false
  227.     
  228. }
  229. function CrtEncoder(){
  230.     document.location.href="NewEncoderMain.asp"
  231.     }
  232.  
  233. function DstEncoder(){
  234.     document.location.href="DestroyEncoder.asp?SlctEnc=" + RunEnc.lstRunning.options.value
  235. }
  236.     
  237. function LoadEncoder(){
  238.     document.location.href="NewLoadEncoderMain.asp"
  239.     }    
  240. function ChangePath(){
  241.     var Ret
  242.     Ret=prompt("Enter Archive Path","C:\\temp\\foo.asf")
  243.     if ((Ret==null) || (Ret=="")){
  244.         alert("Invalid Input")
  245.         return
  246.     }
  247.     else {
  248.         RunEnc.tPath.value=Ret
  249.         RunEnc.Comm.value=7
  250.         WaitProcess.style.display=""
  251.         RunEnc.submit()
  252.     }
  253.         
  254. }    
  255. function ManualArch(){
  256.     RunEnc.Comm.value=8
  257.     WaitProcess.style.display=""
  258.     RunEnc.submit()
  259.     
  260. }
  261. function DisHint(){
  262.     if (RunEnc.sProfile.disabled==true){
  263.         Tip.style.pixelLeft=350
  264.         Tip.style.pixelTop=100
  265.         Tip.style.display=""
  266.     }    
  267. }
  268. function HideHint(){
  269. Tip.style.display="none"
  270. }
  271.  
  272.  
  273. function AddSrcGrp(sPos,sName,iStat){
  274.  
  275.     if (iStat==1){
  276.         var iButton = '<INPUT type="button" id="iSrcGrp" name="iSrcGrp" onclick="ChangeSrcGrp('+ sPos + '  )" value ="' + sName + '" style="BACKGROUND-COLOR: blue;color: white;HEIGHT: 24px; WIDTH: 76px;"><BR>'
  277.         SrcGrps.insertAdjacentHTML("BeforeEnd",iButton)
  278.         }
  279.     else{
  280.     
  281.         var iButton='<INPUT type="button" id="iSrcGrp" name="iSrcGrp"  style="HEIGHT: 24px; WIDTH: 76px;" value="' + sName +  '" onclick="ChangeSrcGrp(' + sPos + ')" ><BR>'
  282.         SrcGrps.insertAdjacentHTML("BeforeEnd",iButton)
  283.         }
  284. }
  285.  
  286. function ChangeSrcGrp(index){
  287.     RunEnc.Comm.value=9
  288.     WaitProcess.style.display=""
  289.     
  290.     for (i=0;i<RunEnc.iSrcGrp.length;i++)
  291.     {
  292.         RunEnc.iSrcGrp[i].style.backgroundColor="#d4d0c9"
  293.         RunEnc.iSrcGrp[i].style.color="black"
  294.     }
  295.     if( index < RunEnc.iSrcGrp.length )
  296.     {
  297.         RunEnc.iSrcGrp[parseInt(index)].style.backgroundColor="blue"
  298.         RunEnc.iSrcGrp[parseInt(index)].style.color="white"
  299.         RunEnc.tSrcGrp.value=RunEnc.iSrcGrp[parseInt(index)].value        
  300.     }
  301.     
  302.     RunEnc.submit()
  303.     
  304. }
  305. function SlctStream(){
  306.     RunEnc.Comm.value=10
  307.     WaitProcess.style.display=""
  308.     RunEnc.submit()
  309.  
  310. }
  311. function StreamDisplay(sStreamName){
  312.     var i=RunEnc.sStream.options.length
  313.     while (i>=0){
  314.         sStreamCurr=RunEnc.sStream.options.value
  315.         if (sStreamCurr==sStreamName){
  316.                 
  317.             RunEnc.sStream.value=sStreamCurr
  318.             return
  319.         }
  320.             
  321.         i=i-1
  322.         }    
  323.  
  324. }
  325. function ProfileDisplay(sProfileName){
  326.     var i=RunEnc.sProfile.options.length
  327.     while (i>=0){
  328.         sPrfCurr=RunEnc.sProfile.options.item(i)
  329.         if (sPrfCurr.value==sProfileName){
  330.                 
  331.             RunEnc.sProfile.value=sPrfCurr
  332.             return
  333.         }
  334.             
  335.         i=i-1
  336.         }    
  337. }
  338. function Error_Display(iNum,sDesc){
  339.     if (iNum!=0){
  340.         alert(sDesc)
  341.     }     
  342.  
  343. }
  344.  
  345. //-->
  346. </script>
  347.  
  348.  
  349.  
  350. </head>
  351. <body>
  352.  
  353.  
  354. <div id="Prop">
  355. <p>
  356. <table width="100%" align="center" bgcolor="Black" bordercolordark="Black" bordercolorlight="Black" bordercolor="Black" cellpadding="0" cellspacing="0"> 
  357.   
  358.   <tr bgcolor="Black">
  359.     
  360.     <td align="left" width="50%"><font color="White" size="3"><strong><em>Machine: <%=Session("MchNameSess")%></em></strong></font></td>
  361.     <td align="right" width="50%"><strong><font color="White" size="3"><em> </em></font></strong> </td>
  362.     
  363.   </tr>
  364.   <tr bgcolor="Gold">
  365.     
  366.     <td colspan="2" height="3">
  367.     </td>
  368.     
  369.   </tr>
  370.   
  371. </table></p><form name="RunEnc" action="RemoteRefresh.asp" target="RemoteRefresh" method="post">
  372.  
  373.  
  374.  
  375. <input type="hidden" id="tPath" name="tPath">
  376. <input type="hidden" name="Comm" value="0">
  377. <input type="hidden" id="tSrcGrp" name="tSrcGrp">
  378.     
  379.     <%
  380.     on Error Resume Next
  381.     
  382.     MchName=Session("MchNameSess")
  383.     ArchStatus="Archiving Stopped"
  384.     
  385.  
  386.     set AgentLoc=Session("AgentLocSess")
  387.  
  388.     set EncAgent=AgentLoc.GetAgent(MchName)
  389.     if Err.number <> 0 then
  390.             ErrorNum=1
  391.             ErrorDesc=Err.description
  392.             Err.Clear
  393.     end if
  394.     set EncCol=EncAgent.EncoderNamesCollection
  395.  
  396.     Cnt=EncCol.count
  397.     
  398.     if Cnt>0 then 
  399.     
  400.         Name=EncCol.item(I)
  401.  
  402.         SlctEnc=Name 
  403.  
  404.         set Enc=EncAgent.GetEncoder(SlctEnc)
  405.         if Err.number <> 0 then
  406.             ErrorNum=1
  407.             ErrorDesc=Err.description
  408.             Err.Clear
  409.         end if
  410.         set Stat=Enc.Statistics
  411.         if Err.number <> 0 then
  412.             ErrorNum=1
  413.             ErrorDesc=Err.description
  414.             Err.Clear
  415.         end if
  416.         
  417.         if Enc.Runstate <> 5 then
  418.     
  419.             State="Encoder Running"
  420.             Set Brdcst = Enc.Broadcast
  421.             Prt=Brdcst.PortNumber(1)
  422.             if Err.number <> 0 then
  423.                 ErrorNum=1
  424.                 ErrorDesc=Err.description
  425.                 Err.Clear
  426.             end if
  427.             
  428.             if Prt<>0 and  Prt<>"" then
  429.                 set NetStat=Stat.NetConnectionStats
  430.                 Connection=NetStat.ClientCount
  431.                 if Err.number <> 0 then
  432.                     ErrorNum=1
  433.                     ErrorDesc=Err.description
  434.                     Err.Clear
  435.                 end if
  436.             end if    
  437.         
  438.         else
  439.             State="Encoder Stopped"
  440.                 
  441.         end if        
  442.     
  443.         set Stat=Enc.Statistics
  444.         if Err.number <> 0 then
  445.             ErrorNum=1
  446.             ErrorDesc=Err.description
  447.             Err.Clear
  448.         end if
  449.     
  450.     
  451.             
  452.         set DisInfo=Enc.DisplayInfo
  453.         if Err.number <> 0 then
  454.             ErrorNum=1
  455.             ErrorDesc=Err.description
  456.             Err.Clear
  457.         end if    
  458.         Title=DisInfo.Title
  459.         if Err.number <> 0 then
  460.             ErrorNum=1
  461.             ErrorDesc=Err.description
  462.             Err.Clear
  463.         end if    
  464.         if Title="" then
  465.             Title="-"
  466.         end if    
  467.             
  468.         Author=DisInfo.Author
  469.             
  470.         if Author="" then 
  471.             Author="-"
  472.         end if    
  473.     
  474.         Copyright=DisInfo.Copyright
  475.     
  476.         if Copyright="" then 
  477.             Copyright="-"
  478.         end if
  479.     
  480.         Description=DisInfo.Description
  481.     
  482.         if Description="" then
  483.             Description=""
  484.         end if
  485.     
  486.         Rating=DisInfo.Rating
  487.         
  488.         if Rating="" then
  489.             Rating="-"
  490.         end if
  491.         if Err.number <> 0 then
  492.             ErrorNum=1
  493.             ErrorDesc=Err.description
  494.             Err.Clear
  495.         end if    
  496.         set SrcGrpCol=Enc.SourceGroupCollection
  497.         if Err.number <> 0 then
  498.             ErrorNum=1
  499.             ErrorDesc=Err.description
  500.             Err.Clear
  501.         end if    
  502.         
  503.         cntStream=0
  504.         
  505.         if  SrcGrpCol.Count > 0 then   
  506.         
  507.             set SrcGrp=SrcGrpCol.Active
  508.                 
  509.             SrcCnt=SrcGrp.SourceCount(2)
  510.                 
  511.             if SrcCnt >= 1  then
  512.                     
  513.                 set Aud=SrcGrp.Source(1, 0)
  514.                     
  515.                 set Vid=SrcGrp.Source(2, 0)
  516.                     
  517.                 SchemeAud=Aud.GetInput(Cstr(StrIn1Aud),Cstr(StrIn2Aud))
  518.                     
  519.                 SchemeVid=Vid.GetInput(Cstr(StrIn1Vid),Cstr(StrIn2Vid))
  520.             
  521.                 Pos=InstrRev(SchemeAud,"\")
  522.                 SchemeAud=mid(SchemeAud,Pos+1)
  523.     
  524.                 Pos=InstrRev(SchemeVid,"\")
  525.                 SchemeVid=mid(SchemeVid,Pos+1)
  526.                 
  527.                 cntStream=stat.StreamOutputCount(2, 0)
  528.                 
  529.             else
  530.                     
  531.                 set Aud=SrcGrp.Source(1, 0)
  532.                     
  533.                 SchemeAud=Aud.GetInput(Cstr(StrIn1Aud),Cstr(StrIn2Aud))
  534.                     
  535.                 Pos=InstrRev(SchemeAud,"\")
  536.             
  537.                 SchemeAud=mid(SchemeAud,Pos+1)
  538.                     
  539.                 SchemeVid="-"    
  540.                 
  541.             end if    
  542.             
  543.         else
  544.                 
  545.             SchemeAud="-"
  546.                 
  547.             SchemeVid="-"
  548.         
  549.         end if
  550.         if Err.number <> 0 then
  551.             ErrorNum=1
  552.             ErrorDesc=Err.description
  553.             Err.Clear
  554.         end if
  555.         
  556.     
  557.         ElapTime=stat.EncodingTime
  558.         
  559.         if Err.number <> 0 then
  560.             ErrorNum=1
  561.             ErrorDesc=Err.description
  562.             Err.Clear
  563.         end if
  564.         if ElapTime<>"" then
  565.             
  566.             ElapTime=ElapTime*10000
  567.             ElapTime=ElapTime\1000
  568.             if ElapTime>=60 then
  569.                 Min=ElapTime\60
  570.                 Sec=ElapTime mod 60
  571.                 if Min >=60 then
  572.                     Hr=Min\60
  573.                     Min=Min mod 60
  574.                     ElapTime=Hr& "hours " & Min & "Mins" & Sec & "Secs"
  575.                 else
  576.                     ElapTime=Min & "Mins " & Sec & "Secs"
  577.                 end if
  578.             else
  579.                 ElapTime=ElapTime & "Secs"    
  580.             end if
  581.         
  582.         else
  583.             ElapTime="0 Secs"
  584.         end if    
  585.         
  586.         
  587.                     
  588.         set OutStat=stat.WMFOutputStats
  589.         if Err.number <> 0 then
  590.             ErrorNum=1
  591.             ErrorDesc=Err.description
  592.             Err.Clear
  593.         end if
  594.         
  595.     
  596.         AvgBitrate=OutStat.AverageBitrate
  597.         AvgBitrate=AvgBitrate/1000
  598.         AvgBitrate=AvgBitrate & "kbps"
  599.         ExpBitrate=OutStat.ExpectedBitrate
  600.         ExpBitrate=ExpBitrate/1000
  601.         ExpBitrate=ExpBitrate & "kbps"
  602.         Bandwidth=AvgBitrate & "[" & ExpBitrate & "]"
  603.     
  604.         FrameRate=0
  605.         if SrcCnt>=1 then
  606.             FrameRate=OutStat.AverageSampleRate        
  607.             FrameRate=FrameRate\1000
  608.         end if
  609.         
  610.         FramesDrp=OutStat.DroppedSampleCount
  611.             
  612.         set ArchFile=Enc.File
  613.             
  614.         ArchPath=ArchFile.LocalFileName
  615.             
  616.         if  Enc.EnableAutoArchive=false then
  617.                 
  618.             ArchMode="Manual"
  619.             
  620.         else
  621.             
  622.             ArchMode="Auto"
  623.             
  624.         end if
  625.         if Err.number <> 0 then
  626.             ErrorNum=1
  627.             ErrorDesc=Err.description
  628.             Err.Clear
  629.         end if%>
  630.  
  631.         <script LANGUAGE="javascript">
  632.         <!--
  633.             RunEnc.tPath.value="<%=Server.HTMLEncode(ArchPath)%>"
  634.         //-->
  635.         </script>
  636.  
  637.         <%if Enc.RunState=2 and Enc.ArchiveState(1)=1 then
  638.             ArchStatus="Archive On"
  639.         end if
  640.         if Enc.RunState=2 and Enc.ArchiveState(1)=2 then
  641.             ArchStatus="Archive Paused"    
  642.         end if    
  643.                 
  644.         if Enc.RunState=2 and Enc.ArchiveState(1)=3 then
  645.             ArchStatus="Archive Stopped"
  646.         end if%>
  647.  
  648.  
  649.  
  650.     <p>
  651.     <table border="1" cellPadding="0" cellSpacing="0" width="100%">
  652.         <tr>
  653.             <td bgcolor="#1184d0"><font COLOR="white">Encoders</font>
  654.             </td>
  655.             <td bgcolor="#1184d0"><font COLOR="white">Sources </font>
  656.             </td>
  657.             <td bgcolor="#1184d0"><font COLOR="white">Monitor</font>
  658.             </td>
  659.         </tr>
  660.         <tr>
  661.             <td width="15%" valign="top"><select id="lstRunning" name="lstRunning" size="2" style="HEIGHT: 116px; WIDTH: 104px" onclick="GetNew()"> 
  662.             
  663.             
  664.                 <%if Cnt>=1 then
  665.             
  666.                     for I=0 to Cnt-1
  667.             
  668.                         Name=EncCol.item(I)
  669.             
  670.                         if I=0 then
  671.             
  672.                             SlctEnc=Name%>
  673.     
  674.                             <option VALUE="<%=Name%>" selected><%=Name%></option>    
  675.  
  676.                         <%else%>
  677.             
  678.                             <option VALUE="<%=Name%>"><%=Name%>    </option>    
  679.     
  680.                         <%end if
  681.                     next
  682.       
  683.                 Else%>
  684.     
  685.                     <option VALUE="No Encoders Running On That Machine"> "No Encoders Running On That Machine" </option>
  686.     
  687.                 <%end if%>
  688.             
  689.             
  690.                 </select>
  691.             </td>
  692.             <td id="SrcGrps" width="10%" valign="top">
  693.                 <%if  SrcGrpCol.Count > 0 then
  694.                 
  695.                     SrcGrpCnt=SrcGrpCol.Count
  696.                 
  697.                     for Grp=0 to SrcGrpCnt-1
  698.                 
  699.                         set SrcGrp1=SrcGrpCol.Item(Grp)
  700.                 
  701.                         If SrcGrp1.Name=SrcGrpCol.Active.Name then%>
  702.                     
  703.                             <input id="iSrcGrp" name="iSrcGrp" type="button" value="<%=SrcGrp1.Name%>" style="BACKGROUND-COLOR: blue;color: white;HEIGHT: 24px; WIDTH: 76px;" onclick="ChangeSrcGrp('<%=Grp%>')"><BR>
  704.                     
  705.                         <%else%>
  706.                     
  707.                             <input id="iSrcGrp" name="iSrcGrp" style="HEIGHT: 24px; WIDTH: 76px;" type="button" value="<%=SrcGrp1.Name%>" onclick="ChangeSrcGrp('<%=Grp%>')"><BR>
  708.                         
  709.                         <%end if
  710.                     next
  711.                 else%>
  712.             
  713.             
  714.                     <em><strong>No Source groups defined</strong></em>
  715.         
  716.         
  717.                 <%end if%>    
  718.         
  719.             </td>        
  720.         
  721.             <td width="75%">
  722.             
  723.                 <table>
  724.                     <tr>
  725.                         <td>
  726.                     
  727.                             <table  border="0" cellpadding="0" cellspacing="0" width="100%" id="TabTable" style="display:block;">
  728.                                 <tr>
  729.                                     <td>
  730.                                         <table border="1" cellPadding="1" cellSpacing="1" width="100%" bgColor="black">
  731.                                             <tr>
  732.                                                 <td width="33%" valign="top">
  733.                                                     <table border="1" cellPadding="0" cellSpacing="0" width="100%">
  734.               
  735.                                                         <tr>
  736.                                                             <td colspan="2" bgcolor="#dcdcdc"><strong>Inputs</strong>
  737.                                                             </td>
  738.                                                         </tr>
  739.               
  740.               
  741.                                                         <tr>
  742.                                                             <td bgcolor="#a0a0a0" width="20%"> <strong>Video:</strong>
  743.                                                             </td>
  744.                                                      
  745.                                                             <td id="SchemeVid" width="80%">
  746.                                                                 <font color="White"><%=SchemeVid%></font>
  747.                                                             </td>
  748.                                                         </tr>    
  749.                             
  750.                                                         <tr>
  751.                                                             <td bgcolor="#a0a0a0" width="20%"><strong>Audio:</strong>
  752.                                                             </td>
  753.                             
  754.                                                             <td id="SchemeAud" width="80%">
  755.                                                                 <font color="White"><%=SchemeAud%></font>
  756.                                                             </td>
  757.                             
  758.                                                         </tr>
  759.                         
  760.                                                     </table>
  761.                                                 </td>
  762.                     
  763.                                                 <td width="33%" valign="top">
  764.                                                     <table border="1" cellPadding="0" cellSpacing="0" width="100%">
  765.               
  766.                                                         <tr>
  767.                                                             <td colspan="2" bgcolor="#dcdcdc"><strong>Outputs</strong>
  768.                                                             </td>
  769.                                                         </tr>
  770.               
  771.               
  772.                                                         <tr>
  773.                                                             <td bgcolor="#a0a0a0" width="20%"> <strong>Archive:</strong>
  774.                                                             </td>
  775.                                                      
  776.                                                             <td id="ArchPath" width="80%">
  777.                                                                 <%Pos=InstrRev(ArchPath,"\")
  778.                                                                 ArchPath=mid(ArchPath,Pos+1)%>
  779.                                                                 <font color="White"><%=ArchPath%></font>
  780.                                                                 
  781.                                                             </td>
  782.                                                         </tr>    
  783.                             
  784.                                                         <tr>
  785.                                                             <td bgcolor="#a0a0a0" width="20%"><strong>HTTP:</strong>
  786.                                                             </td>
  787.                             
  788.                                                             <td id="Prt" width="80%">
  789.                                                                 <%Set Brdcst = Enc.Broadcast
  790.                                                                 Prt=Brdcst.PortNumber(1)%>
  791.                                                                 <font color="White"><%=Prt%></font>
  792.                                                             </td>
  793.                             
  794.                                                         </tr>
  795.                             
  796.                                                         <tr>
  797.                                                             <td bgcolor="#a0a0a0" width="20%"><strong>Connections:</strong>
  798.                                 
  799.                                                             </td>
  800.                             
  801.                                                             <td id="Connection" width="80%">
  802.                                                                 <font color="White"><%=Connection%>
  803.                                                             </td>
  804.                             
  805.                                                         </tr>
  806.                         
  807.                                                     </table>
  808.                     
  809.                                                 </td>    
  810.                     
  811.                                                 <td width="33%" valign="top">
  812.                                                     <table border="1" cellPadding="0" cellSpacing="0" width="100%">
  813.               
  814.                                                         <tr>
  815.                                                             <td colspan="2" bgcolor="#dcdcdc"><strong>Progress</strong>
  816.                                                             </td>
  817.                                                         </tr>
  818.               
  819.               
  820.                                                         <tr>
  821.                                                             <td bgcolor="#a0a0a0" width="20%"> <strong>Elapsed Time:</strong>
  822.                                                             </td>
  823.                                                      
  824.                                                             <td id="ElapTime" width="80%">
  825.                                                                 <font color="White"><%=ElapTime%></font>
  826.                                 
  827.                                                             </td>
  828.                                                         </tr>    
  829.                             
  830.                                                         <tr>
  831.                                                             <td bgcolor="#a0a0a0" width="20%"><strong>Total Time:</strong>
  832.                                                             </td>
  833.                             
  834.                                                             <td width="80%">
  835.                                                             </td>
  836.                             
  837.                                                         </tr>
  838.                             
  839.                                                         <tr>
  840.                                                             <td bgcolor="#a0a0a0" width="20%"><strong>Percent:</strong>
  841.                                 
  842.                                                             </td>
  843.                             
  844.                                                             <td width="80%">
  845.                                 
  846.                                                             </td>
  847.                                                         </tr>
  848.                                                     </table>
  849.                                                 </td>
  850.                                             </tr>
  851.                                 
  852.                                     </td>
  853.                             
  854.                             
  855.                                 </tr>    
  856.                         
  857.                         
  858.                                 <tr>
  859.                                     <td>
  860.                                         <tr>
  861.                                             <td width="100" colspan="3">
  862.                                                 <table border="1" cellPadding="0" cellSpacing="0" width="100%" style="HEIGHT: 124px; WIDTH: 620px">
  863.               
  864.                                                     <tr>
  865.                                                         <td colspan="2" bgcolor="#dcdcdc"><strong>Encoding</strong>
  866.                                                         </td>
  867.                                                     </tr>
  868.               
  869.               
  870.                                                     <tr>
  871.                                                         <td bgcolor="#a0a0a0" width="20%"> <strong>Bandwidth:</strong>
  872.                                                         </td>
  873.                                                      
  874.                                                         <td id="Bandwidth" width="80%">
  875.                                                             <font color="White"><%=Bandwidth%></font>
  876.                                                         </td>
  877.                                                     </tr>    
  878.                             
  879.                                                     <tr>
  880.                                                         <td bgcolor="#a0a0a0" width="20%"><strong>Current FPS:</strong>
  881.                                                         </td>
  882.                             
  883.                                                         <td id="FrameRate" width="80%">
  884.                                                             <font color="White"><%=FrameRate%></font>
  885.                                                         </td>
  886.                             
  887.                                                     </tr>
  888.                             
  889.                                                     <tr>
  890.                                                         <td bgcolor="#a0a0a0" width="20%"><strong>Profile:</strong>
  891.                                 
  892.                                                         </td>
  893.                             
  894.                                                         <td width="80%"> 
  895.                                                             <select id="sProfile" name="sProfile" style="HEIGHT: 22px; WIDTH: 447px" onmouseover="DisHint()" onmouseout="HideHint()"> 
  896.                                     
  897.                                                             <%if SrcGrpCol.Count > 0 then
  898.                         
  899.                                                                 set PrfCol=Enc.ProfileCollection
  900.                         
  901.                                                                 set Prf=SrcGrp.Profile
  902.                         
  903.                                                                 PrfName=Prf.Name%>
  904.                         
  905.                                                                 <option selected value="<%=PrfName%>"><%=PrfName%></option>
  906.                         
  907.                                                                 <%for each Prf in PrfCol
  908.                         
  909.                                                                     if Prf.Name<>PrfName then%>
  910.             
  911.                                                                         <option value="<%=Prf.Name%>"><%=Prf.Name%></option>
  912.                                 
  913.                                                                     <%end if 
  914.                         
  915.                                                                 next
  916.                         
  917.                                                             else
  918.                         
  919.                                                                 set PrfCol=Enc.ProfileCollection
  920.                                                                 if Err.number <> 0 then
  921.                                                                     ErrorNum=1
  922.                                                                     ErrorDesc=Err.description
  923.                                                                     Err.Clear
  924.                                                                 end if
  925.                                                                 for each Prf in PrfCol%>
  926.                         
  927.                                                                     <option><%=Prf.Name%></option>
  928.                         
  929.                                                                 <%next
  930.                         
  931.                                                             end if %>    
  932.                         
  933.                                                             </select>
  934.                                     
  935.                                 
  936.                                                         </td>
  937.                                                     </tr>
  938.                                                 </table>    
  939.                                     
  940.                                             </td>
  941.         
  942.                                         </tr>
  943.                                     </table>    
  944.         
  945.                                                 
  946.                                 
  947.                                     </td>
  948.                             
  949.                             
  950.                                 </tr>    
  951.                             
  952.                             </table>
  953.                         
  954.                         
  955.                                                                     
  956.                         </td>
  957.                     
  958.                     </tr>
  959.             
  960.             
  961.                     <tr>
  962.                         <td width="100%">
  963.                     
  964.                             <table border="0" cellpadding="0" cellspacing="0" width="100%" id="TabTable" style="display:none;" bgcolor="Black" height="300">
  965.                                 <tr>
  966.                                     <td bgcolor="#dcdcdc" colspan="2"><strong>Display information</strong>
  967.                                     </td>
  968.     
  969.     
  970.                                 </tr>
  971.     
  972.                                 <tr>
  973.                                     <td bgcolor="#a0a0a0" width="20%"> <strong> Title:</strong>
  974.                                     </td>
  975.                                     <td width="80%" id="Title">
  976.                                         <font color="White"><%=Title%></font>
  977.                                     </td>
  978.                                 </tr>
  979.                             
  980.                                 <tr>
  981.                                     <td bgcolor="#a0a0a0" width="20%"> <strong>Author:</strong>
  982.                                     </td>
  983.                                     <td width="80%" id="Author">
  984.                                         <font color="White"><%=Author%></font>
  985.                                     </td>
  986.                                 </tr>
  987.                                 
  988.                                 <tr>
  989.                                     <td bgcolor="#a0a0a0" width="20%"> <strong>Copyright:</strong>
  990.                                     </td>
  991.                                     <td width="80%" id="Copyright">
  992.                                         <font color="White"><%=Copyright%></font>
  993.                                     </td>
  994.                                 </tr>
  995.                             
  996.                                 <tr>
  997.                                     <td bgcolor="#a0a0a0" width="20%"> <strong>Rating:</strong>
  998.                                     </td>
  999.                                     <td width="80%" id="Rating">
  1000.                                         <font color="White"><%=Rating%></font>
  1001.                                     </td>
  1002.                                 </tr>
  1003.                                 
  1004.                                 <tr>
  1005.                             
  1006.                                     <td bgcolor="#a0a0a0" width="20%"> <strong>Description:</strong>
  1007.                                     </td>
  1008.                                         
  1009.                                 
  1010.                                     <td width="80%" id="Description">
  1011.                                         <font color="White"><%=Description%></font>
  1012.                                     </td>
  1013.                             
  1014.                                 </tr>
  1015.                             </table>
  1016.                     
  1017.                         </td>
  1018.                     
  1019.                     </tr >
  1020.                     <tr>
  1021.                         <td>
  1022.                             <table border="1" cellPadding="1" cellSpacing="1" width="100%" id="TabTable" style="display:none;">
  1023.   
  1024.                                 <tr>
  1025.                                     <td bgcolor="black">
  1026.                                         <font color="lime">Stream:
  1027.                                            </font> 
  1028.                                     
  1029.                                         <select id="sStream" name="sStream" style  ="HEIGHT: 22px; WIDTH: 414px">
  1030.     
  1031.                                         <%for j=0 to cntStream-1 
  1032.     
  1033.                                             DisplayText="Stream  " & j
  1034.                                     
  1035.                                             if j=0 then%>
  1036.                                      
  1037.                                                 <option selected value="<%=DisplayText%>">
  1038.                                     
  1039.                                                 <%=DisplayText%></option>
  1040.                                     
  1041.                                             <%else%>
  1042.                                     
  1043.                                                 <option value="<%=DisplayText%>">
  1044.                                     
  1045.                                                 <%=DisplayText%></option>
  1046.                                     
  1047.                                             <%end if
  1048.                                     
  1049.                                         next%>
  1050.     
  1051.                                         </select>
  1052.                                          <INPUT type="button" value="Go" id=bGo name=bGo  onclick="SlctStream()">
  1053.                                     </td>
  1054.                                 </tr>
  1055.  
  1056.  
  1057.                                 <tr>
  1058.                                     <td>
  1059.                                         <table border="1" cellPadding="1" cellSpacing="1" width="100%" bgcolor="Black">
  1060.         
  1061.                                             <tr>
  1062.                                                 <td bgcolor="#dcdcdc" colspan="3" align="center">
  1063.                                                     <strong>Encoding</strong>
  1064.                                                 </td>
  1065.                                         
  1066.                                             </tr>
  1067.                                             <tr>
  1068.                                                 <td bgcolor="#a0a0a0" width="20%" colspan="3">
  1069.                                                 <strong>Video:</strong>
  1070.                                                 </td>
  1071.                                             
  1072.                                             </tr>
  1073.                                             <tr>
  1074.                                                 <td>
  1075.                                                 </td>
  1076.                                                 <td bgcolor="#a0a0a0" width="20%" colspan="0"> 
  1077.                                                     <strong>Bandwidth:</strong>
  1078.                                                 </td>
  1079.                     
  1080.                                                 <td id="StreamBandwidthVid">
  1081.                                                     <%set SrcGrpCol=Enc.SourceGroupCollection
  1082.                                                     if Err.number <> 0 then
  1083.                                                         ErrorNum=1
  1084.                                                         ErrorDesc=Err.description
  1085.                                                         Err.Clear
  1086.                                                     end if
  1087.                                                     if  SrcGrpCol.Count > 0 then   
  1088.         
  1089.                                                         set SrcGrp=SrcGrpCol.Active
  1090.                 
  1091.                                                         SrcCnt=SrcGrp.SourceCount(2)
  1092.                 
  1093.                                                         if Enc.Runstate <> 5 then
  1094.                                                             if SrcCnt >= 1  then
  1095.                                                             
  1096.                                                                                                                 
  1097.                                                                 
  1098.                                                                 set StreamStat=Stat.StreamOutputStats(2,0,0)
  1099.                                                                 if Err.number <> 0 then
  1100.                                                                     ErrorNum=1
  1101.                                                                     ErrorDesc=Err.description
  1102.                                                                     Err.Clear
  1103.                                                                 end if                                    
  1104.                                                                 AvgBitrate=StreamStat.AverageBitrate
  1105.                                                                 AvgBitrate=AvgBitrate/1000
  1106.                                                                 AvgBitrate=AvgBitrate & "kbps"
  1107.                                                                 ExpBitrate=StreamStat.ExpectedBitrate
  1108.                                                                 ExpBitrate=ExpBitrate/1000
  1109.                                                                 ExpBitrate=ExpBitrate & "kbps"
  1110.                                                                 StreamBandwidthVid=AvgBitrate & "[" & ExpBitrate & "]"
  1111.                                                                 StreamFrameRateVid=StreamStat.AverageSampleRate
  1112.                                                                 StreamFrameRateVid=StreamFrameRateVid/1000
  1113.                                                                 set StreamStat=Stat.StreamOutputStats(1,0,0)
  1114.                                                                 AvgBitrate=StreamStat.AverageBitrate
  1115.                                                                 AvgBitrate=AvgBitrate/1000
  1116.                                                                 AvgBitrate=AvgBitrate & "kbps"
  1117.                                                                 ExpBitrate=StreamStat.ExpectedBitrate
  1118.                                                                 ExpBitrate=ExpBitrate/1000
  1119.                                                                 ExpBitrate=ExpBitrate & "kbps"
  1120.                                                                 StreamBandwidthAud=AvgBitrate & "[" & ExpBitrate & "]"
  1121.                                                                 StreamFrameRateAud=StreamStat.AverageSampleRate
  1122.                                                                 StreamFrameRateAud=StreamFrameRateAud/1000
  1123.                                                             else
  1124.                                                                 StreamBandwidthVid="-"
  1125.                                                                 StreamFrameRateVid="-"
  1126.                                                                 set StreamStat=Stat.StreamOutputStats(1,0,0)
  1127.                                                                 AvgBitrate=StreamStat.AverageBitrate
  1128.                                                                 AvgBitrate=AvgBitrate/1000
  1129.                                                                 AvgBitrate=AvgBitrate & "kbps"
  1130.                                                                 ExpBitrate=StreamStat.ExpectedBitrate
  1131.                                                                 ExpBitrate=ExpBitrate/1000
  1132.                                                                 ExpBitrate=ExpBitrate & "kbps"
  1133.                                                                 StreamBandwidthAud=AvgBitrate & "[" & ExpBitrate & "]"
  1134.                                                                 StreamFrameRateAud=StreamStat.AverageSampleRate
  1135.                                                                 StreamFrameRateAud=StreamFrameRateAud/1000
  1136.                                                             end if
  1137.                                                         else
  1138.                                                             StreamBandwidthVid="-"
  1139.                                                             StreamFrameRateVid="-"
  1140.                                                             StreamBandwidthAud="-"
  1141.                                                             StreamFrameRateAud="-"
  1142.                                                         end if
  1143.                                                     end if
  1144.                                                     if Err.number <> 0 then
  1145.                                                         ErrorNum=1
  1146.                                                         ErrorDesc=Err.description
  1147.                                                         Err.Clear
  1148.                                                     end if%>
  1149.                                                     
  1150.                                                         <font color="white"><%=StreamBandwidthVid%></font>                                        
  1151.                                             
  1152.                                                 </td>
  1153.                                     
  1154.                                             </tr>
  1155.                 
  1156.                                             <tr>
  1157.                                                 <td>
  1158.                                                 </td>
  1159.                                                 <td bgcolor="#a0a0a0" width="20%">
  1160.                                                     <strong>Current FPS:</strong>
  1161.                                                 </td>
  1162.                 
  1163.                                                 <td id="StreamFPSVid">
  1164.                                                     <font color="white"><%=StreamFrameRateVid%></font>
  1165.                                                 </td>
  1166.                 
  1167.                                             </tr>
  1168.                                             <tr>
  1169.                                                 <td bgcolor="#a0a0a0" width="20%" colspan="3">
  1170.                                                 <strong>Audio:</strong>
  1171.                                                 </td>
  1172.                                             
  1173.                                             </tr>
  1174.                                             <tr>
  1175.                                                 <td>
  1176.                                                 </td>
  1177.                                                 <td bgcolor="#a0a0a0" width="20%"> 
  1178.                                                     <strong>Bandwidth:</strong>
  1179.                                                 </td>
  1180.                                                 <td id="StreamBandwidthAud">
  1181.                                                     <font color="white"><%=StreamBandwidthAud%></font>
  1182.                                                 </td>
  1183.                                             </tr>
  1184.                                             <tr>
  1185.                                                 <td>
  1186.                                                 </td>
  1187.                                                 <td bgcolor="#a0a0a0" width="20%">
  1188.                                                     <strong>Current FPS:</strong>
  1189.                                                 </td>    
  1190.                                                 <td id="StreamFPSAud">
  1191.                                                     <font color="white"><%=StreamFrameRateAud%></font>
  1192.                                                 </td>
  1193.                                             </tr>    
  1194.                                         </table>
  1195.                                     </td>
  1196.                                 </tr>
  1197.  
  1198.                             </table>
  1199.                         </td>
  1200.                     </tr>    
  1201.                     
  1202.                 
  1203.                     <tr>
  1204.                         <td>
  1205.                         
  1206.                             <table border="0" cellpadding="0" cellspacing="0" width="100%">
  1207.                                 <tr>
  1208.                                     <td width="25%" class="clsNgHead" id="tabsTTSub" onclick="fnTabClickTTSub('0');"><a href="javascript.void()" onclick="fnTabClickTTSub('0');">General</a></td>
  1209.                                     <td width="25%" class="clsTab" id="tabsTTSub" onclick="fnTabClickTTSub('1');"><a href="javascript.void()" onclick="fnTabClickTTSub('1');">Display Infomation</a></td>
  1210.                                     <td width="25%" class="clsTab" id="tabsTTSub" onclick="fnTabClickTTSub('2');"><a href="javascript.void()" onclick="fnTabClickTTSub('2');">Stream Information</a></td>
  1211.                                     <td>
  1212.                                         <input type="button" value="Refresh" id="cmdRefresh" name="cmdRefresh" onclick="refr_PageRefresh()">
  1213.                                     </td>
  1214.                                 </tr>
  1215.                             </table>
  1216.                     
  1217.                     
  1218.                         </td>
  1219.                     
  1220.                     </tr>
  1221.                             
  1222.             
  1223.                 </table>
  1224.             
  1225.             
  1226.             
  1227.                 
  1228.  
  1229.             
  1230.             
  1231.             
  1232.         
  1233.             
  1234.             </td>            
  1235.         <tr>
  1236.             <td bgcolor="#1184d0" colspan="2">
  1237.                 <strong><font color="white">Encoder Control:</font></strong><br>
  1238.             
  1239.                 <input type="button" value="Start" id="cmdStart" name="cmdStart" onclick="Start()">
  1240.                 <input type="button" value="Stop" id="cmdStop" name="cmdStop" onclick="Stop()">
  1241.                 <input type="button" value="Mute" id="cmdMute" name="cmdMute" onclick="Mute()">
  1242.                         
  1243.                 <br>
  1244.                 <input type="button" value="New" id="bNewEnc" name="bNewEnc" onclick="CrtEncoder()">
  1245.                   <INPUT type="button" value="Remove Encoder" id=bDestroy name=bDestroy onclick="DstEncoder()">
  1246.  <INPUT type="button" value="Load" id=bLoad name=bLoad onclick="LoadEncoder()" >
  1247.             
  1248.             </td>
  1249.         
  1250.             <td bgcolor="#1184d0" valign="bottom">
  1251.                 <strong><font color="white">Archive Control:</font></strong><br>
  1252.                 <input type="button" value="Start" id="bAStart" name="bAStart" onclick="AStart()">
  1253.                 <input type="button" value="Stop" id="bAstop" name="bAstop" onclick="AStop()">
  1254.                 <input type="button" value="Pause" id="bAPause" name="bAPause" onclick="APause()">
  1255.                 <br>
  1256.                 <input type="button" value="Manual" id="bManual" name="bManual" onclick="ManualArch()"> 
  1257.                 <input type="button" value="Path" id="bChange" name="bChange" onclick="ChangePath()">
  1258.         
  1259.         <!--METADATA TYPE="DesignerControl" startspan
  1260. <OBJECT classid="clsid:61EAA0F0-4988-11D1-8C43-00A0C959BC0A" id=TimeLines1 style="LEFT: 0px; TOP: 0px">
  1261.     <PARAM NAME="TimeLine1" VALUE="refr,1">
  1262.     <PARAM NAME="TimeLine1Action1" VALUE="0,PageRefresh,1,60000,0,50,1,1,0,0"></OBJECT>
  1263. -->
  1264. <OBJECT classid=clsid:B0A6BAE2-AAF0-11D0-A152-00A0C908DB96 id=SeqMgr VIEWASTEXT></OBJECT>
  1265.  
  1266. <SCRIPT LANGUAGE="JavaScript">
  1267. <!--
  1268.     function _TimeLineObject ( seqmgr, name ) {
  1269.         this.seqmgr = seqmgr;
  1270.         this.name   = name;
  1271.     }
  1272.  
  1273.     function _TimeLine_Method_At ( time, event, loop, interval, tiebreak, threshold ) {
  1274.         if ( 2 == arguments.length )
  1275.             this.seqmgr.item(this.name).at( time, event );
  1276.         else if ( 3 == arguments.length )
  1277.             this.seqmgr.item(this.name).at( time, event, loop );
  1278.         else if ( 4 == arguments.length )
  1279.             this.seqmgr.item(this.name).at( time, event, loop, interval );
  1280.         else if ( 5 == arguments.length )
  1281.             this.seqmgr.item(this.name).at( time, event, loop, interval, tiebreak );
  1282.         else if ( 6 == arguments.length )
  1283.             this.seqmgr.item(this.name).at( time, event, loop, interval, tiebreak, threshold );
  1284.     }
  1285.  
  1286.     function _TimeLine_Method_Pause () {
  1287.         this.seqmgr.item(this.name).pause ();
  1288.     }
  1289.  
  1290.     function _TimeLine_Method_Play () {
  1291.         this.seqmgr.item(this.name).play ();
  1292.     }
  1293.  
  1294.     function _TimeLine_Method_Seek ( t ) {
  1295.         this.seqmgr.item(this.name).seek ( t );
  1296.     }
  1297.  
  1298.     function _TimeLine_Method_Stop () {
  1299.         this.seqmgr.item(this.name).stop ();
  1300.     }
  1301.  
  1302.     function _TimeLine_GetProp_PlayState () {
  1303.         return this.seqmgr.item(this.name).playstate;
  1304.     }
  1305.  
  1306.     function _TimeLine_GetProp_Time () {
  1307.         return this.seqmgr.item(this.name).time;
  1308.     }
  1309. // -->
  1310. </SCRIPT>
  1311.  
  1312.  <script language="JavaScript" FOR="SeqMgr" event="oninit">
  1313.     _TimeLineObject.prototype.at        = _TimeLine_Method_At;
  1314.     _TimeLineObject.prototype.pause     = _TimeLine_Method_Pause;
  1315.     _TimeLineObject.prototype.play      = _TimeLine_Method_Play;
  1316.     _TimeLineObject.prototype.seek      = _TimeLine_Method_Seek;
  1317.     _TimeLineObject.prototype.stop      = _TimeLine_Method_Stop;
  1318.     _TimeLineObject.prototype.playstate = _TimeLine_GetProp_PlayState;
  1319.     _TimeLineObject.prototype.time      = _TimeLine_GetProp_Time;
  1320.  
  1321.      refr = new _TimeLineObject(SeqMgr, "refr");
  1322.  
  1323.     refr.at(0.000,"refr_PageRefresh",-1,60.000);
  1324.  
  1325.     refr.play();
  1326. </script>
  1327.  
  1328. <!--METADATA TYPE="DesignerControl" endspan-->
  1329.         
  1330.         
  1331.             </td>
  1332.         </tr>
  1333.         <tr>
  1334.             <td id="ArchMode" bgcolor="#d4d0c9" colspan="2">
  1335.                 Archive Mode:<%=ArchMode%>
  1336.             </td>
  1337.                 
  1338.             <td id="State" bgcolor="#d4d0c9">
  1339.                 <%=State%>
  1340.             </td>
  1341.         </tr>
  1342.     
  1343.  
  1344.     </table></p></form>
  1345.         <%if State="Encoder Running" then%>
  1346.             <script LANGUAGE="javascript">
  1347.             <!--
  1348.                 Start_Disable()
  1349.     
  1350.             //-->
  1351.             </script>
  1352.         
  1353.         <%else%>
  1354.             <script LANGUAGE="javascript">
  1355.             <!--
  1356.                 Stop_Disable()
  1357.             //-->
  1358.             </script>
  1359.         
  1360.         <%end if
  1361.  
  1362.     
  1363.         if ArchPath<>"" then
  1364.         
  1365.             if Enc.RunState=2 and Enc.ArchiveState(1)=1 then%>
  1366.     
  1367.                 <script LANGUAGE="javascript">
  1368.                 <!--
  1369.  
  1370.                     ArchiveStarted()
  1371.                 //-->
  1372.                 </script>
  1373.             
  1374.             
  1375.             <%end if%>
  1376.     
  1377.             <%if Enc.RunState=2 and Enc.ArchiveState(1)=2 then%>
  1378.             
  1379.                 <script LANGUAGE="javascript">
  1380.                 <!--
  1381.                     ArchivePaused()
  1382.                 //-->
  1383.                 </script>
  1384.             
  1385.             <%end if%>
  1386.         
  1387.             <%if Enc.RunState=2 and Enc.ArchiveState(1)=3 then%>
  1388.             
  1389.                 <script LANGUAGE="javascript">
  1390.                 <!--
  1391.                     ArchiveStopped()
  1392.                 //-->
  1393.                 </script>
  1394.             
  1395.             <%end if%>
  1396.         
  1397.         <%else%>
  1398.             <script LANGUAGE="javascript">
  1399.             <!--
  1400.     
  1401.                 DisableArchive()
  1402.                 
  1403.             //-->
  1404.             </script>
  1405.  
  1406.  
  1407.         <%end if%>
  1408.         <%if ErrorNum<>0 then%>
  1409.             <SCRIPT LANGUAGE=javascript>
  1410.             <!--
  1411.                 Error_Display("<%=ErrorNum%>","<%=ErrorDesc%>")
  1412.             //-->
  1413.             </SCRIPT>
  1414.  
  1415.             
  1416.         <%end if    
  1417.     else
  1418.         Response.Write("No Encoders Running on the Given Machine")%>
  1419.         <BR>
  1420.         <input type="button" value="New Encoder" id="bNewEnc" name="bNewEnc" style="height=25;width=100" onclick="CrtEncoder()">
  1421.  <INPUT type="button" value="Load" id=bLoad name=bLoad onclick="LoadEncoder()" >
  1422.         
  1423.     <%end if%>    
  1424.  
  1425.  
  1426. </div>
  1427. <div id="WaitProcess" align="center" style="display:none;"><em> <font color="Red">Processing Please Wait...</font></em></div>
  1428. <div id="Tip" style="BACKGROUND-COLOR: #ffdead; FONT-FAMILY: verdana,arial; FONT-SIZE: 12px; HEIGHT: 20px; PADDING-BOTTOM: 5px; PADDING-LEFT: 5px; PADDING-RIGHT: 5px; PADDING-TOP: 5px; POSITION: absolute; TEXT-DECORATION: none;Display:none;">Stop Encoder to change Profiles</div>
  1429.                             
  1430.                         
  1431. </body>
  1432. </html>
  1433.