📄 sql_addurl.asp

📁 后台地址：login.asp 管理员帐户：admin 密码：admin 数据库 Data/#23mn.cn.asp (电视电台数据) Data/Data_Admin.asp (管理信

💻 ASP

字号:

<!--#include file="Sql_Conn_Open.asp"-->
<!--#include file="Sql_Check.asp"-->
<html>
<head>
<title>后台管理页</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="Images/Style.css" rel="stylesheet" type="text/css">
</head>

<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<%if request("Action") = "Add_Mov_Url" then%>
  <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%">
    <tr>
     <td width="100%">
      <form method="POST" action="Sql_Addurl.asp" target="_parent">
		<input name="Add_Mov_Url" type="text" class="input" size="45" value="">
		<input name="Mov_ID" type="Hidden" class="input" value="<%=request("Mov_ID")%>">
		<input name="Save_Mov_Url" type="Hidden" class="input" value="Save_Mov_Url">
		<input type="submit" value="增加" name="submit">
	  </form>
	 </td>
    </tr>
  </table>
<%elseif request("Save_Mov_Url") = "Save_Mov_Url" then%>
<%
if request.form("Add_Mov_Url")="" or request.form("Mov_ID")="" then 
response.write "错误提示:请输入电影名称!"
response.end
end if
set rs=server.createobject("adodb.recordset")
sql="select * from Sql_Shows where (id is null)"
rs.open sql,conn2,1,3
rs.addnew
rs("Mov_url")=request.form("Add_Mov_Url")
rs("Mov_ID")=request.form("Mov_ID")
rs.update
rs.close
response.redirect "Sql_Edit_Movie.asp?ID="&request.form("Mov_ID")&"&Action=Edit"
%>
<%end if%>

<%if request("Action") = "Add_Rad_Url" then%>
  <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%">
    <tr>
     <td width="100%">
      <form method="POST" action="Sql_Addurl.asp" target="_parent">
		<input name="Add_Rad_Url" type="text" class="input" size="45" value="">
		<input name="Rad_ID" type="Hidden" class="input" value="<%=request("Rad_ID")%>">
		<input name="Save_Rad_Url" type="Hidden" class="input" value="Save_Rad_Url">
		<input type="submit" value="增加" name="submit">
	  </form>
	 </td>
    </tr>
  </table>
<%elseif request("Save_Rad_Url") = "Save_Rad_Url" then%>
<%
if request.form("Add_Rad_Url")="" or request.form("Rad_ID")="" then 
response.write "错误提示:请输入电影名称!"
response.end
end if
set rs=server.createobject("adodb.recordset")
sql="select * from Sql_Shows where (id is null)"
rs.open sql,conn5,1,3
rs.addnew
rs("Rad_url")=request.form("Add_Rad_Url")
rs("Rad_ID")=request.form("Rad_ID")
rs.update
rs.close
response.redirect "Sql_Edit_Radio.asp?ID="&request.form("Rad_ID")&"&Action=Edit"
%>
<%end if%>
<!--#include file="Sql_Conn_Close.asp"-->
</body>

</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -