您的位置: 视频、mp3、电影路径加密组件
视频、mp3、电影路径加密组件
1、 说明：有效的加密视频、mp3等播放路径，播放路径通过组件后台解密，安全可靠，客户端可自行在浏览器下载并安装此控件，对服务器无害,目前只支持windows媒体播放器,请客户端要安装window媒体播放器9.0。 字串4
2、 下载压缩包，解开压缩包，里面包括：XuAn.RAR、XuAn.CAB、No.mp3（moto演唱）、两个示例文件.htm及说明文档,可以直接点击.htm查看控件效果，如果提示安装，请安装！
XuAn.RAR里面包含了 四个文件，如果客户不能从浏览器自动安装控件，那么下载此压缩包，双击Reg.bat，对控件注册。注册后，请不要删除和移动该文件夹。只需注册一次。双击UnReg.bat，对控件反注册。反注册后，将不能点播。建议服务器使用自动安装，即浏览器自动下载安装。 字串2
3、XuAn.CAB是自动安装压缩包，使用在浏览器上，客户端只需按提示确定安装就可以。（也可以你自己用winrar解压，查看里面的内容）
调用XuAn.CAB可自动安装的写法是：
第一种：
<Body>
<OBJECT ID="Xuan" CLASSID="CLSID:8F351F8B-6469-4BB6-8539-C186ED4E24BE" CODEBASE="XuAn.CAB#version=1,0,0,35"
width=0 height=0></OBJECT>
</Body>
也可以这样 – 以下没有带ID
第二种：
<Body>
<OBJECT CLASSID="CLSID:8F351F8B-6469-4BB6-8539-C186ED4E24BE" CODEBASE="XuAn.CAB#version=1,0,0,35" width=0 height=0></OBJECT>
</Body>
4、“CODEBASE”是设置XuAn.CAB的下载路径，及他的版本号，目前是version=1,0,0,2 勿修改！
5、“CLASSID” 是设置控件的唯一标识号，请勿修改，可能导致控件无法运行！
控件函数：
<!--vbscript的写法
<script language="vbscript">
set object = CreateObject("xuan.play")
object. Url_Show(字符串,媒体对象，1) ---- 解密路径
字串8
object. Url_Hidden(字符串) ----加密路径
</script> 字串9
<!—第二钟vbscript的写法,如果定义了<OBJECT>里的ID的话，那么这样写
<OBJECT ID="Xuan" CLASSID="CLSID:8F351F8B-6469-4BB6-8539-C186ED4E24BE" CODEBASE="XuAn.CAB#version=1,0,0,35" width=0 height=0></OBJECT>
<script language="vbscript">
Xuan.Url_Show(字符串,媒体对象，1) -----解密路径
Xuan.Url_Hidden(字符串) 加密路径
</script>
字串9
<!—Asp的写法-->
<%
set object=server.createobject("xuan.play")
object. Url_Show(字符串,媒体对象，1) --------解密路径
object. Url_Hidden(字符串) 加密路径
%>
事例：请用asp写法加密数据到数据库里，然后使用vbscript脚本写法解密asp加密的数据！
比如：
<%
set object=server.createobject("xuan.play")
path = object. Url_ Hidden("http://www.sina.com.cn")
Conn.execute("insert into table(playpath) values('"&path&"')")
%> <!—将加密路径写入数据库-->
----------以下表示已经从数据库里读取，仅示范如果解密asp传来的数据，并传送给媒体播放器。-------
<%
path = rs("path")
%>
<script language="vbscript">
function play(vbpath)
set xuan=CreateObjcet("xuan.play")
xuan.Url_Show(vbpath,WM,1) ‘记住这里WM是媒体播放器的ID号
end function
call play(<%=path%>) 字串2
</script>
这样就完成了 asp加密的数据 被 vbscript解密 的操作了。
如果现在页面有windows媒体播放器存在，比如目前调用window媒体播放器9.0，我们定义它的名称为“WM”，
怎样让媒体播放器得到路径呢，那么上面的vbsript脚本，我们看一下：
<OBJECT CLASSID="CLSID:8F351F8B-6469-4BB6-8539-C186ED4E24BE" CODEBASE="XuAn.CAB#version=1,0,0,35" width=0 height=0></OBJECT> <!—组件注册->
<OBJECT classid="clsid:6BF52A52-394A-11D3-B153-00C04F79FAA6" id="WM" style="LEFT: 0px; TOP: 0px" VIEWASTEXT>
<PARAM NAME="rate" VALUE="1">…………………………………………省略中,此为媒体播放器
</OBJECT>
<script language="vbscript">
function play(vbpath)
set xuan=CreateObjcet("xuan.play")
xuan.Url_Show(vbpath,WM,1) '记住这里的WM是媒体播放器的ID号,这里直接将路径给了媒体播放器 字串6
end function
call play(<%=path%>)
</script>
本人建议，<script></script>脚本最好放到页面代码的最后！
这样媒体就可以获取路径并播放了！
下载地址：http://bbs.tech.ccidnet.com/read.php?tid=150381&page=e&#a
字串4
Tags：加密 组件 路径 电影 媒体播放器 安装 控件 解密
来源：您的评论
·本站管理人员有权在不通知用户的情况下删除不符合规定的评论信息或留做证据
·请客观的评价您所看到的资讯，提倡就事论事，杜绝漫骂和人身攻击等不文明行为