📄 sever.asp
字号:
<!--#include file="../checkpost.asp"-->
<!--#include file="articleconn.asp"-->
<!--#include file="zcm.asp"-->
<!--#include file="security.asp"-->
<%if session("flag")>3 then
response.write "<br><p align=center>您的操作权限不够！</p>"
response.end
end if
%>
<%
zj=Request.ServerVariables("SERVER_NAME")
zj=left(replace(zj,"www.",""),6)
zj=replace(zj,"0","a")
zj=replace(zj,"1","b")
zj=replace(zj,"2","c")
zj=replace(zj,"3","d")
zj=replace(zj,"4","e")
zj=replace(zj,"5","f")
zj=replace(zj,"6","g")
zj=replace(zj,"7","h")
zj=replace(zj,"8","i")
zj=replace(zj,"9","j")
zj=replace(zj,"a","40")
zj=replace(zj,"b","41")
zj=replace(zj,"c","52")
zj=replace(zj,"d","53")
zj=replace(zj,"e","64")
zj=replace(zj,"f","65")
zj=replace(zj,"g","76")
zj=replace(zj,"h","77")
zj=replace(zj,"i","88")
zj=replace(zj,"j","89")
zj=replace(zj,"k","20")
zj=replace(zj,"l","21")
zj=replace(zj,"m","22")
zj=replace(zj,"n","23")
zj=replace(zj,"o","24")
zj=replace(zj,"p","25")
zj=replace(zj,"q","26")
zj=replace(zj,"r","27")
zj=replace(zj,"s","28")
zj=replace(zj,"t","29")
zj=replace(zj,"u","30")
zj=replace(zj,"v","31")
zj=replace(zj,"w","32")
zj=replace(zj,"x","33")
zj=replace(zj,"y","34")
zj=replace(zj,"z","35")
zj=replace(zj,"-","36")
zj=replace(zj,".","37")
yzcv=zj*(len(zj)+len(zcn&"skyucvod"))
Do While yzcv>99999999999
yzcv=yzcv-99999999999
loop
if yzcv<>zcv then
response.write "<script language=java-script>{window.alert('错误：程序尚未注册,此功能不能使用!');window.location='zcmayireg.asp?type=reg';}</script>"
end if
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="inc/Admin_STYLE.CSS" type="text/css">
<title>服务器路径管理</title>
<style type="text/css">
<!--
.样式2 {font-size: 9pt}
.样式4 {font-size: 9pt; font-weight: bold; }
-->
</style>
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" >
<div align="center">
<center>
<!--#include file="top1.asp"-->
<table width="100%" border="0" cellspacing="0" cellpadding="2">
<tr>
<td> </td>
</tr>
</table>
<table border="0" cellpadding="2" cellspacing="1" class="border" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber1" bgcolor="#FFFFFF" height="94">
<tr>
<td height="22" colspan="5" class=title> <div align="center"><font color="#FFFFFF"><b><span class="样式2"><font color="#FF0000">电影服务器列表</font></span><font color="#FF0000"></span></font></b></font></div></td>
</tr>
<tr bgcolor="#429AEF">
<td height="10" > <div align="center" class="样式4 样式2"><font color="#FFFFFF">服务器</font></div></td>
<td height="10" > <div align="center" class="样式4"><font color="#FFFFFF">在线</font></div></td>
<td height="10" > <div align="center" class="样式4"><font color="#FFFFFF">FTP下载</font></div></td>
<td height="10" > <div align="center" class="样式4"><font color="#FFFFFF">操作</font></div></td>
</tr>
<tr>
<%set rs=server.createobject("adodb.recordset")
rs.open "select * from movie",conn,1,1
if zcn="" or zcv="" then response.end
dim i
i=1
do while not rs.eof
%>
<form method="POST" onsubmit action="changeadmin.asp?id=<%=rs("id")%>">
<td width="14%" class="tdbg"><div align="center">第<%=i%>服务器</div></td>
<td width="24%" class="tdbg"><input type="text" name="ipsipb" size="30" value="<%=rs("ipsip")%>">
<span lang="en-us"> </span> <span lang="en-us"> </span> </td>
<td width="20%" class="tdbg"><input type="text" name="moviev" size="30" value="<%=rs("movie")%>"></td>
<td width="18%" class="tdbg"><input type="submit" value="修改" name="changemovie">
<span lang="en-us"> </span><font size="2">
<input type="submit" value="删除" name="deletserver">
</font></td>
</form>
</tr>
<%
i=i+1
rs.movenext
loop
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<tr>
<form method="POST" onsubmit action="changeadmin.asp">
<td class="tdbg"><div align="center">新增服务器</div></td>
<td class="tdbg"><input type="text" name="ipsipt" size="30"> </td>
<td class="tdbg"><input type="text" name="moviet" size="30"></td>
<td class="tdbg"><input type="submit" value="新增" name="addmovieip"></td>
</form>
</table>
</center>
</div>
<br>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><div align="center"><span class="样式2">例如在线
</span>
<font size="2">
<input type="text" name="服务器" size="22" value="rstp://www.skyuc.com/">
</font> FTP下载
<input type="text" name="目录" size="22" value="ftp://www.skyuc.com/">
</div></td>
</tr>
</table>
<div align="center"><br>
<font color="#FF0000">注： 空白的服务器在增加电影时可直接使用其他服务器上影片的绝对地址！</font></div>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -