根据多次测试..远古在点播时.都是通过服务器转发影射出*das.和.tfs后缀的文件,其中tfs就是主要的调用文件串,
要通过捉包可以看到.其调用串一般为 xxxx.xxx.xxx:80/wevlivd.tfs?uuid=xxx=prog_id=xxx........而那些uuid.prog_id等等
都是通过客户端和认正关通过验证后产生的..所以一般情况下就没法写入VirtualWall的防盗参数了..那怎么办呢?
经几天的不断测试和研究,居然让我发现在远古代的player.ASP文件中的WebPlayer.Session = ""; //"";这个是在数据库的
UUID用户唯一标记变量来的.如果这个值是空值时.远古就会自动帮他给予一个值..但如果我们设定这个值为
WebPlayer.Session = "11223344"; //""; 时.那么用户的在线表中的用户UUID值就是这个11223344了.通过捉包.
xxxx.xxx.xxx:80/wevlivd.tfs?uuid=xxx=prog_id=xxx........就会为
xxxx.xxx.xxx:80/wevlivd.tfs?uuid=11223344=prog_id=xxx........所以通过改写WebPlayer.Session = ""; //"";就可以把
VirtualWall的vsid=<%=getvsid()%>写入到远古代软件中去了~
写成WebPlayer.Session = "vsid=<%=getvsid()%>"; //"";
然后打开你的VirtualWall软件.在你的VOD资源站点上加上.tfs文件的防盗.
其它操作就按一般的防软件下载来加入就可以了..
哈哈怎样..成功了吧~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
值得注意的是:
一在主验证的服务器。也就是在你的IIS管理器上有WebMedia虚拟目录的那个站点在IIS加入域名如vod.5913bbs.com
一点是要在远古网站的后台开放服务器映射~把外网地址的地址改为修改好的域名地址vod.5913bbs.com
远古VOD5.0连续节目更新情况自动分析函数
以前发的远古VOD5.0点播页不显示集数而显示文件名(
http://bbs.wglm.net/read.php?tid=28113&u=24744)里提到过,dbend.inc.asp相当于是个远古VOD的函数库,所有的模版都有这个文件并且都没做什么修改。
现在你再在这个文件里加个连续节目更新情况自动分析函数。
这个函数在你的asp里的调用方式为:
<!--#i nclude file="../common/dbcon.inc.asp" -->
<%i=GetNewProgramName("连续剧",30)
response.write i
%><!--#i nclude file="../common/dbend.inc.asp" -->
上面的这个GetNewProgramName("连续剧",30)里的"连续剧"的意思就是连续剧的更新情况,可可以是动画片或其他的有更新的类别,30是指最近30天的更新情况。
更新的情况是以最后一次更新的来显示的,同一节目不会同时显示多次的更新情况的。
把下面的代码加在你的dbend.inc.asp就可以。
注意:下面代码用于SQL,如果你用的是ACCESS,要把DateDiff(Day,JoinTime,Getdate()) 改成DateDiff(Day,JoinTime,now())
function GetNewProgramName(iTypeName,iRule) '获得连载节目的更新
szSQL_Type = "SELECT Type_ID FROM TypeInfo where Type_ID>=21 And TypeName='" & iTypeName & "'"
set rsData_Type = Server.CreateObject("ADODB.Recordset")
rsData_Type.Open szSQL_Type,con,1,3
if not rsData_Type.EOF Then
iTypeID=rsData_Type("Type_ID")
rsData_Type.Close
else
GetNewProgramName="没找到类别" & iTypeName & "!"
rsData_Type.Close
exit function
End if
szSQL_Name = "SELECT ProgName,Prog_ID,Part_No,JoinTime FROM ProgInfo where Type_ID=" & iTypeID & " And DateDiff(Day,JoinTime,Getdate()) < " & iRule & " order by JoinTime desc "
set rsData_Name = Server.CreateObject("ADODB.Recordset")
rsData_Name.Open szSQL_Name,con,1,3
if not rsData_Name.EOF Then
MaxProgName=""
OutPutNew=""
do while not rsData_Name.EOF
MaxProgName0=rsData_Name("ProgName")
MaxPart_No0= rsData_Name("Part_No")
MaxTime0=Month(rsData_Name("JoinTime")) & "月" & Day(rsData_Name("JoinTime")) & "日"
MaxProgID0=rsData_Name("Part_No")
if Instr(MaxProgName,MaxProgName0) <> 0 then
rsData_Name.MoveNext
else
szSQL_Part = "SELECT Prog_ID,ProgName,Part_No,JoinTime FROM ProgInfo where ProgName='" & MaxProgName0 & "'"
set rsData_Part = Server.CreateObject("ADODB.Recordset")
rsData_Part.Open szSQL_Part,con,1,3
do while not rsData_Part.EOF
MaxPart_No= rsData_Part("Part_No")
if MaxPart_No > MaxPart_No0 then
MaxPart_No0=MaxPart_No
MaxProgName0=rsData_Part("ProgName")
MaxTime0=Month(rsData_Part("JoinTime")) & "月" & Day(rsData_Part("JoinTime")) & "日"
end if
rsData_Part.MoveNext
if rsData_Part.EOF then exit do
loop
OutPutNew0="<a href='progmain.asp?ProgID=" & rsData_Name("Prog_ID") & "'><font color='#008000'>" & MaxTime0 & MaxProgName0 & "更新到第" & MaxPart_No0 & "集</font></a><br>"
OutPutNew=OutPutNew & OutPutNew0
rsData_Part.Close
MaxProgName=MaxProgName & MaxProgName0
rsData_Name.MoveNext
end if
if rsData_Name.EOF then exit do
loop
OutPutNew= "近" & iRule & "天" & iTypeName & "更新:<br>" & OutPutNew
OutPutNew="<marquee direction='up' height='163' onmouseout='this.start()' onmouseover='this.stop()' scrollAmount='1' scrollDelay='100' align='left'>" & OutPutNew & "</marquee>"
GetNewProgramName=OutPutNew
else
GetNewProgramName= "近" & iRule & "天无" & iTypeName & "更新"
End if
rsData_Name.Close
set rsData_Type=nothing
set rsData_Part=nothing
set rsData_Name=nothing
end function
如果你自己搞不明白,可以下载下面的附件,把dbend.inc.asp覆盖原来的(在webmedia/common里),把p.asp放到/WebMedia/oemui/vod下,然后
http://ip/webmedia/oemui/vod/p.asp就能见到效果了,你可以把p.asp用iframe的方式嵌入到的需要显示更新情况的页面里。
替换完模板影片原来的图片都不显示了~~这是个初级错误~~模板的原作者把上传目录改了。修正办法:common里的upload.inc.asp里的上传目录搞成download了~~下次修改的时候一并修改过来好了~
不显示影片图片的修改方法:
用记事本打开common/upload.inc.asp,然后搜索szDownloadPath = "../../download/" 然后把download改成vodjpg就可以了,如果在download里有图片的话,把图片全部复制到vodjpg目录
下就可以了。。但是原来的图片不要删,因为图片的路径已经记录在数据库里了。但是以后添加的***图片都会在VODJPG目录里了!