<%@ Language=VBScript CODEPAGE=65001 %> <%on Error Resume Next if Request.Form("hOpt")=0 then Response.Write("You chose To Cancel The Creation Of The New Encoder")%>

Return To The Statistics Page <%else Path=Request.Form("tPath") EncName=Request.Form("tName") set AgentLoc=Session("AgentLocSess") if Err.number <> 0 then ErrorNum=1 ErrorDesc=Err.description Err.Clear end if MchName=Session("MchNameSess") set EncAgent=AgentLoc.GetAgent(MchName) if Err.number <> 0 then ErrorNum=1 ErrorDesc=Err.description Err.Clear end if set Session(EncName)=EncAgent.CreateEncoder(EncName) if Err.number <> 0 then ErrorNum=1 ErrorDesc=Err.description Err.Clear end if set Encoder=EncAgent.GetEncoder(EncName) Encoder.Load Path Encoder.Name=EncName if Err.number <> 0 then ErrorNum=1 ErrorDesc=Err.description Err.Clear end if Encoder.PrepareToEncode(True) if Err.number <> 0 then ErrorNum=1 ErrorDesc=Err.description Err.Clear end if if ErrorNum<>0 then set Session(EncName)=nothing%> <%else Response.Write("Encoder Sucessfully Created") end if%>

Return To The Statistics Page <%end if%>