vipproduct_add.asp

来自「能进行网上购物的需求」· ASP 代码 · 共 142 行

ASP
142
字号
<!--#include file="conn.asp"-->
<%
if session("admin_name")="" then
    response.redirect "default.asp"
end if
%>
<script language="JavaScript">
function CheckForm()
{ 
        if(document.addproduct.product_name.value.length == 0)
        {
                alert("请输入商品名.");
                document.addproduct.product_name.focus();
                return false;
        }
        if(document.addproduct.jifen.value.length == 0)
        {
                alert("请输入换取商品的积分.");
                document.addproduct.jifen.focus();
                return false;
        }
        return true;
}
</script>
<%
'开始添加商品
id=request("id")
product_name=trim(request("product_name"))
jifen=request("jifen")
info=replace(request("info"), ">", "&gt;")
info=replace(info, "<", "&lt;")
info=replace(info, "'","’")
if info="" then info="此商品暂无介绍"
pic=request("pic")
cpic=request("cpic")
cinfo=request("cinfo")
addtime=request("addtime")
endtime=request("endtime")
dim addtime
addtime=date()
if request("action")="add" then
'开始检测此产品名是否重复登陆
set rs=server.createobject("ADODB.Recordset")
sql="select * from 56770_vipproduct where product_name='"&product_name&"' order by id desc"
rs.open sql, conn, 1, 1
if not(rs.eof or rs.bof)then
        response.write"<SCRIPT language=JavaScript>alert('对不起,您所添加的商品其商品名已经存在, 请核实!');"
response.write"javascript:history.go(-1)</SCRIPT>"
rs.close
set rs=nothing
response.end
end if
conn.execute "insert into 56770_vipproduct (product_name,jifen,info, pic, cpic,endtime)values('"&product_name&"', '"&jifen&"', '"&info&"', '"&pic&"', '"&cpic&"', '"&endtime&"')"
set rs=server.createobject("ADODB.Recordset")
sql="select * from 56770_vipproduct order by id desc"
rs.open sql, conn, 1, 1
id=rs("id")
rs.close
set rs=nothing
conn.execute "update 56770_vipproduct set addtime=date() where id=" & id
response.write "<script language='javascript'>" 
response.write "alert('购物积分换购商品添加成功!');"
response.write "window.document.location.href='vipproduct_list.asp';"
response.write "</script>" 
Response.End
end if
%>
<html>
<head>
<title>后台管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="css.css" type="text/css">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="100%" border="0" cellspacing="1" cellpadding="2" bgcolor="#FFFFFF" vspace="0" hspace="0">
<tr>
<td height="27" background="images/admin_bg_1.gif">.:: 您可以在这里进行添加购物积分换购商品的相关操作</td>
</tr>
</table>
<table border="0" cellspacing="1" cellpadding="3" width="100%" align="center" background="images/admin_bg_1.gif">
<form action="vipproduct_add.asp" method="post" name="addproduct" onSubmit="return CheckForm();">
<tr>
<td bgcolor="#BBD1E8" width="15%" >商品全称:
</td>
<td bgcolor="#BBD1E8" colspan="2" width="55%">&nbsp;
<input type="text" name="product_name" size="35">
   </td>
<td bgcolor="#BBD1E8" width="15%">所需积分:
</td>
<td bgcolor="#BBD1E8" colspan="2" width="15%">&nbsp;
<input type="text" name="jifen" size="5">点
   </td>
</tr>
</table>
<table border="0" cellspacing="1" cellpadding="3" width="100%" align="center">
<tr>
<td height="30" valign="top" bgcolor="#BBD1E8" width="15%">截止日期:</td>
<td colspan="6" bgcolor="#BBD1E8">&nbsp;<input type="text" name="endtime" size="20">日期格式2004-12-12
</td>
</tr>
</table>
<table border="0" cellspacing="1" cellpadding="3" width="100%" align="center">
<tr>
<td height="30" valign="top" bgcolor="#BBD1E8" width="15%">商品介绍:</td>
<td colspan="6" bgcolor="#BBD1E8"><br>&nbsp;<textarea name="info" rows="10" cols="50"></textarea><br><br>
</td>
</tr>
<tr>
<td  bgcolor="#BBD1E8" width="15%"> 商品小图片:</td>
<td bgcolor="#BBD1E8" width="35%">&nbsp;
<input type="text" name="pic" size="20" value="noimages.gif">
</td>
<td bgcolor="#BBD1E8" width="15%">商品大图片:</td>
<td bgcolor="#BBD1E8" width="35%">&nbsp;
<input type="text" name="cpic" size="20"  value="nonegif.gif">
</td>
</tr>
 </TR>
</table>
 <table width="100%" border="0" cellspacing="1" cellpadding="0" bgcolor="#6699CC">
    <tr bgcolor="#6699CC"> 
      <td bgcolor="#BBD1E8" height="25">图片上传程序接口 → 图片上传后把图片名粘贴到需要的地方即可</td>
    </tr>
    <tr bgcolor="#6699CC"> 
      <td bgcolor="#BBD1E8"><iframe name="Upload" frameborder="0" width="100%" height="120" scrolling="yes" src="../pic/upfiletofile.asp"></iframe>
      </td>
    </tr>
<tr bgcolor="#D6DFF7">
<td height="35" colspan="6">
<div align="center">
<input type="submit" name="Submit" value="添加" class="Submit">
&nbsp; &nbsp;
<input type="reset" name="Submit" value="重填" class="Submit">
<input type="hidden" name="action" value="add">
</div>
</td>
</tr>
</form>
</table>
</body>
</html>

⌨️ 快捷键说明

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