📄 live.asp
字号:
<!--#include file="Conn.Asp"-->
<%
Response.Expires=0
Response.Expiresabsolute=Now()-1
Response.AddHeader "pragma","no-cache"
Response.AddHeader "cache-control","private"
Response.CacheControl="no-cache"
from_url=Cstr(Request.ServerVariables("HTTP_REFERER"))
serv_url=Cstr(Request.ServerVariables("SERVER_NAME"))
if mid(From_url,8,len(Serv_url)) <> Serv_url then
response.redirect "Index.asp"
response.end
end if
if request("Tv")=false then
response.redirect "?Tv=LIeBIao"
end if
if session("admin")="" then
sql="select * from data where yesno='1' order by id desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,connstr,1,1
else
sql="select * from data order by id desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,connstr,1,1
end if
if rs.eof then
response.write ""
else
const maxperpage=10000
dim currentpage
rs.pagesize=maxperpage
currentpage=request.querystring("pageid")
if currentpage="" then
currentpage=1
elseif currentpage<1 then
currentpage=1
else
currentpage=clng(currentpage)
if currentpage > rs.pagecount then
currentpage=rs.pagecount
end if
end if
if not isnumeric(currentpage) then
currentpage=1
end if
dim totalput,n
totalput=rs.recordcount
if totalput mod maxperpage=0 then
n=totalput\maxperpage
else
n=totalput\maxperpage+1
end if
if n=0 then
n=1
end if
rs.move(currentpage-1)*maxperpage
if request("Tv") = "LIeBIao" Then
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=webname%>-<%=http%> - <%=jieshao%></title>
<meta name="keywords" content="<%=webname%>-<%=http%> - <%=jieshao%>" />
<meta name="description" content="<%=jieshao%> - <%=http%>" />
<title>网络电视频道列表</title>
<BODY onmouseup=document.selection.empty() oncontextmenu="return false" onselectstart="return false" ondragstart="return false" onbeforecopy="return false" oncopy=document.selection.empty() leftMargin=0 topMargin=0 onselect=document.selection.empty()>
<base target="tv">
<body style="overflow-y:auto;">
<style type="text/css">BODY {
SCROLLBAR-FACE-COLOR: #009ace; FONT-SIZE: 12px; SCROLLBAR-HIGHLIGHT-COLOR: #b8e9fa; SCROLLBAR-SHADOW-COLOR: #009aaa; COLOR: #a9c8e4; SCROLLBAR-ARROW-COLOR: #ffffff; SCROLLBAR-TRACK-COLOR: #cccccc; FONT-FAMILY: 宋体,Arial,Verdana ; BACKGROUND-COLOR: #1a2942
}
TD {
FONT-SIZE: 12px; COLOR: #a9c8e4; LINE-HEIGHT: 140%
}
A:link {
COLOR: #a9c8e4; TEXT-DECORATION: none
}
A:visited {
COLOR: #a9c8e4; TEXT-DECORATION: none
}
A:active {
COLOR: #a9c8e4; TEXT-DECORATION: none
}
A:hover {
COLOR: #00FF00; TEXT-DECORATION: underline
}
</style>
</head>
<%
i=0
do while i< maxperpage and not rs.eof
%>
<body><DIV align=center><TABLE cellSpacing=1 cellPadding=0 width=183 border=0><TR><TD colSpan=2 height=5></TD><tr><TD vAlign=top width=5 height=10><li><TD width=142 height=20>
<a href="Play.asp?Id=<%=rs("id")%>" target="play"><%=rs("name")%></a><% if session("admin")<>"" then %><A href=admin.asp?admin=edit&id=<%=rs("id")%> target="play"><font color="#008000">修改</font></a> <A onClick="return confirm('确认要删除吗？');" href="?admin=del&id=<%=rs("id")%>&tv=<%=rs("name")%>" target="play"><font color="#FF0000">删除</font></a> <% if rs("yesno")="0" then %><br><font color="#bb0000">隐藏频道(ID:<%=rs("id")%>)</font><%end if%><%end if%>
</font></TD></tr>
<%
i=i+1
rs.movenext
loop
end if
set rs=nothing
k=currentpage
if k<>1 then
else
end if
end if
if request("admin")="del" Then
if session("admin")="" then
response.redirect "LogIn.asp"
end if
lid=request("id")
if isnumeric(lid)=false then
response.write "<script>alert('参数错误，关闭窗口！');window.opener=null;window.close();</script>"
response.end
end if
sql="select * from data where id=cint('"&lid&"')"
set rs=server.createobject("adodb.recordset")
rs.open sql,connstr,3,2
if not rs.eof then
rs.delete
rs.update
response.write "<script language=javascript>alert('删除成功！');window.opener=null;window.close();</script>"
end if
end if
if request("Tv")="Play" Then
o=md5(Int((8999999999)*Rnd +1000000000))
response.cookies("look")("o")=o
dim num,dnum,checknum
dnum=trim(request("num"))
checknum=trim(request.cookies("look")("o"))
if dnum="" or checknum="" then
response.redirect "Index.asp"
end if
if not dnum=checknum then
response.redirect "Index.asp"
end if
response.cookies("ID")="kId"
kId=Request("Id")
If kId="" then
response.redirect "?Tv=Play&ID=18&num="&o
end if
s=Int((8999999999)*Rnd +1000000000)
response.cookies("look")("s")=s
sql="select * from data where Id="&kId
set rs=server.createobject("adodb.recordset")
rs.open sql,connstr,1,1
response.cookies("look")("o")=""
if rs("type")="MedIa" then
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=webname%>-<%=http%> - <%=jieshao%></title>
<meta name="keywords" content="<%=webname%>-<%=http%> - <%=jieshao%>" />
<meta name="description" content="<%=jieshao%> - <%=http%>" />
<TITLE><%=rs("name")%></TITLE>
<BODY onmouseup=document.selection.empty() oncontextmenu="return false" onselectstart="return false" ondragstart="return false" onbeforecopy="return false" oncopy=document.selection.empty() leftMargin=0 topMargin=0 onselect=document.selection.empty()>
<iframe height="0" width="0" frameborder="0" scrolling="No" src="?play=login&password=<%=md5("8225500"&Formatdatetime(now(),4))%>&tv=登陆"></iframe>
</HEAD>
<SCRIPT LANGUAGE="JavaScript">
document.onkeydown = function() {
if(event.keyCode==116) {
event.keyCode=0;
event.returnValue = false;
}
}
document.oncontextmenu = function() {event.returnValue = false;}
</SCRIPT>
<OBJECT Id="MediaPlayer" Height="100%" Width="100%" ClassId="CLSID:6BF52A52-394A-11D3-B153-00C04F79FAA6">
<PARAM NAME="AutoStart" VALUE="True">
<PARAM NAME="defaultFrame" VALUE="right">
<PARAM NAME="UIMode" VALUE="MInI">
<PARAM NAME="ShowStatusBar" VALUE="False">
<PARAM NAME="ShowControls" VALUE="False">
<PARAM NAME="ShowTracker" VALUE="False">
<PARAM NAME="EnableTracker" VALUE="True">
<PARAM NAME="ShowPositionControls" VALUE="False">
<PARAM NAME="EnablePositionControls" VALUE="True">
<PARAM NAME="EnableContextMenu" VALUE="False">
<PARAM NAME="Url" VALUE="url.asp?id=<%=kId%>&pxd=<%=s%>">
</OBJECT>
<div align="right" style="word-spacing: 0; margin-right: 69; margin-top: -30; margin-bottom: 0"><table border="0" cellpadding="0" cellspacing="0"><tr><td><script language="javascript" >
function setfullscreen(){
if(MediaPlayer.playstate==3)
MediaPlayer.fullScreen=true;
}
</script><input type="submit" name="Submit" value="全屏观看" onClick="setfullscreen()"></td></tr></table></div>
</BODY>
</HTML>
<%
end if
if rs("type")="Real" then
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=webname%>-<%=http%> - <%=jieshao%></title>
<meta name="keywords" content="<%=webname%>-<%=http%> - <%=jieshao%>" />
<meta name="description" content="<%=jieshao%> - <%=http%>" />
<TITLE><%=rs("name")%></TITLE>
<BODY onmouseup=document.selection.empty() oncontextmenu="return false" onselectstart="return false" ondragstart="return false" onbeforecopy="return false" oncopy=document.selection.empty() leftMargin=0 topMargin=0 onselect=document.selection.empty()>
</HEAD>
<SCRIPT LANGUAGE="JavaScript">
document.onkeydown = function() {
if(event.keyCode==116) {
event.keyCode=0;
event.returnValue = false;
}
}
document.oncontextmenu = function() {event.returnValue = false;}
</SCRIPT>
<iframe height="0" width="0" frameborder="0" scrolling="No" src="?play=login&password=<%=md5("8225500"&Formatdatetime(now(),4))%>&tv=登陆"></iframe>
<table width="100%" height="100%" border="1" cellpadding="0" cellspacing="0">
<tr>
<td align="center">
<object width="100%" height="100%" name="RP1" id="rmplayer" classid="clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA">
<param name="AUTOSTART" value="-1">
<param name="SHUFFLE" value="0">
<param name="PREFETCH" value="0">
<param name="NOLABELS" value="0">
<param name="CONTROLS" value="Imagewindow">
<param name="CONSOLE" value="clip1">
<param name="LOOP" value="0">
<param name="NUMLOOP" value="0">
<param name="CENTER" value="0">
<param name="MAINTAINASPECT" value="0">
<param name="BACKGROUNDCOLOR" value="#000000">
<param name="_ExtentX" value="15558">
<param name="_ExtentY" value="13970">
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -