gusucode.com > ASP+ACCESS音乐网站建设设计(源代码+论文+开题报告+答辩PPT+外 > ASP+ACCESS音乐网站建设设计(源代码+论文+开题报告+答辩PPT+外文翻译)\音乐网站设计\ADMIN\ADDkq.asp
<!-- #include file="dbconn.inc" --> <!--#include file="../inc/html.inc"--> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <meta http-equiv="Content-Language" content="zh-cn"> <link rel="stylesheet" href="../inc/register.css" type="text/css"> <meta name="GENERATOR" content="Microsoft FrontPage 4.0"> <meta name="ProgId" content="FrontPage.Editor.Document"> <title>我爱音乐网—>歌曲栏目—>管理登录</title> </head> <body topmargin="0" leftmargin="0"> <BR> <div align="center"> <center> <form action=addkq.asp method=post> <table border="1" cellpadding="0" cellspacing="0" width="450" height="320" bordercolor="#000000" bordercolorlight="#000000" bordercolordark="#FFFFFF"> <tr> <td width="446" height="17" valign="bottom" background="../images/t-bg1.gif"> <p align="center">=== 添加歌曲 ===</td> </tr> <tr> <td valign="top" bgcolor="#F5F5F5" width="446"> <p align="center"><br> 歌曲名称:<input type="text" name="kqmc" size="37" maxLength=25> <p align="center"><br> 演 唱 者:<input type="text" name="ycz" size="37" maxLength=25> <p align="center"><br> 名 称:<input type="text" name="address" size="37" maxLength=25> <p align="center"> <input type="submit" value="添 加" style="position: relative; height: 20"><br> <br> </td> </tr> </table> </form> </center> </div> </body> </html> <% kqmc=request("kqmc") ycz=request("ycz") address=request("address") if kqmc ="" or ycz="" then response.end end if set rs=server.createobject("adodb.recordset") sql="select * from kq" rs.open sql,conn,3,3 rs.addnew rs("kqmc")=kqmc rs("ycz")=ycz rs("address")=address rs("time")=date() rs.update rs.close set rs=nothing response.write"<SCRIPT language=JavaScript>alert('歌曲添加成功!');" response.write"javascript:window.close();</SCRIPT>"%>