📄 video_geturl.asp
字号:
<!-- #include file="include/no_cache.asp" -->
<%
dim vurl,vgenre
vurl=session("play_video_url")
vgenre=session("play_video_genre")
if isnull(vgenre) then vgenre=""
select case lcase(vgenre)
case "real"
session("play_video_genre")="real2"
vgenre="real2"
case "real2"
if lcase(left(vurl,7))="rtsp://" then
session("play_video_genre")="real3"
vgenre="real3"
else
vgenre="OK"
session.Contents.Remove("play_video_genre")
end if
case "real3"
vgenre="OK"
session.Contents.Remove("play_video_genre")
case else
session.Contents.Remove("play_video_url")
end select
if vurl="" or isnull(vurl) then
%>
<script language=javascript>
<!--
alert("错误信息:\n\n请勿向本站提交非法信息!RM 地址现为加密状态!");
//location.href="./";
window.close();
-->
</script>
<%
end if
'response.redirect vurl
response.write vurl
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -