⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 edi.asp

📁 超炫电台程序开发了两个版本了
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<!--#include file="session.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>编辑</title>
<style type="text/css">
<!--
.style1 {color: #FFFFFF}
input {
	font-family: Arial, Helvetica, sans-serif;
	font-size: 13px;
	font-style: normal;
	line-height: normal;
	color: #006600;
	border: #000000 1px solid;
}

-->
</style>
</head>

<body><center>


<%if request.form("sub")="sub"  then
m_title=trim(request.form("m_title"))
m_name=trim(request.form("m_name"))
m_url=trim(request.form("m_url"))
m_id=trim(request.form("id"))
if m_title="" or m_name="" or m_url="" then
response.Write("不能为空")
response.End()
else
set rs=server.CreateObject("adodb.recordset")
sql="select * from yd_music where id="&m_id
rs.open sql,conn,3,3

rs("m_title")=m_title
rs("m_name")=m_name
rs("m_url")=m_url

rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing


%>
<meta http-equiv="refresh" content="3;URL=index.asp">

<p>&nbsp;</p>
<p>&nbsp;</p>
<p>&nbsp;</p>
<table width="62%" border="0" align="center">
  <tr>
    <td align="center"><p> <img src="img/mouse.gif" width="32" height="32"> 
        <img src="img/loading.gif" width="94" height="27"><br>
        <br>
        编辑成功 !</p>
      <p>3秒中后自动 <font color="#FF0000"><a href="index.asp">返回首页</a></font></p></td>
  </tr>
</table>
<%response.End()
end if
end if
%>
<%id=cint(request.QueryString("id"))
if id<>"" then
set rs1=server.CreateObject("adodb.recordset")
sql1="select * from yd_music where id="&id
rs1.open sql1,conn,1,1%>
  <form name="form1" method="post" action="edi.asp" ">
    <table width="565" height="187" border="0" cellpadding="0" cellspacing="0">
      <tr align="center" bgcolor="#0099FF">
        <td height="26" colspan="2"><span class="style1">编辑歌曲</span></td>
      </tr>
      <tr>
        <td width="182" align="right">歌曲:</td>
        <td width="383"> 
          <input name="m_title" type="text" id="m_title" size="30" maxlength="50" value="<%=rs1("m_title")%>"></td>
      </tr>
      <tr>
        <td align="right" width="182">歌手:</td>
        <td width="383"> 
          <input name="m_name" type="text" id="m_name" size="20" maxlength="20" value="<%=rs1("m_name")%>"></td>
      </tr>
      <tr>
        <td align="right" width="182">视听地址:</td>
        <td width="383"> 
          <input name="m_url" type="text" id="m_url" size="40" value="<%=rs1("m_url")%>"></td>
      </tr>
      <tr align="center">
        <td colspan="2"><input type="submit" name="Submit" value="提交">  
		<input type="hidden" name="sub" value="sub">  
		<input type="hidden" name="id" value="<%=id%>"> 
          <a href="index.asp">返回</a></td>
      </tr>
    </table>
  </form><%
  rs1.close
  set rs1=nothing
  end if
  %>
</center>

</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -