gusucode.com > ASP+ACCESS音乐网站建设设计(源代码+论文+开题报告+答辩PPT+外 > ASP+ACCESS音乐网站建设设计(源代码+论文+开题报告+答辩PPT+外文翻译)\音乐网站设计\ADMIN\ADDyg.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>我爱音乐网—&gt;邮购栏目—&gt;管理登录</title>
</head>

<body topmargin="0" leftmargin="0">
 
<BR>
  <div align="center">
    <center>
	<form action=addyg.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">
            专辑名称:<input type="text" name="zjmc" size="37" maxLength=25>    
			<p align="center">
            歌手姓名:<input type="text" name="name" size="37" maxLength=25>    
            <p align="center">
			市场价格:<input type="text" name="price1" size="37" maxLength=25>    
			<p align="center">
            邮购价格:<input type="text" name="price2" size="37" maxLength=25> 
			<p align="center">简介:                 
            <textarea rows="12" name="leirong" cols="52" ></textarea>
            <p align="center"> <input type="submit" value="添 加" style="position: relative; height: 20"><br>
            <br>
          </td>
        </tr>
      </table>
	  </form>
    </center>
  </div>
</body>

</html>
<% zjmc=request("zjmc")
name=request("name")
leirog=htmlencode2(request("leirong"))
price1=request("price1")
price2=request("price2")
if zjmc ="" or name="" then 
response.end
end if
set rs=server.createobject("adodb.recordset")
sql="select * from yougou"
rs.open sql,conn,3,3
rs.addnew
rs("zjmc")=zjmc
rs("name")=name
rs("leirong")=leirong
rs("price1")=price1
rs("price2")=price2
rs("time")=date()
rs.update
rs.close
set rs=nothing
response.write"<SCRIPT language=JavaScript>alert('邮购物品添加成功!');"
response.write"javascript:window.close();</SCRIPT>"%>