cp_sort.asp

来自「一个完全仿照阿里巴巴的网站管理系统 本软件没有版权问题」· ASP 代码 · 共 137 行

<!--#include file="top.asp"--><%usertopview%>
<%if userflag0=0 then
response.redirect"ok.asp?action=flag"
end if

if request("action")="save" then
cpsort=trim(request("cpsort"))

set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from SMT_cp_sort where SMT_yp_id="& session("id")
rs.open sql,conn,1,3
if userflag0<>0 then
if rs.recordcount >= cint(userflag0) then
errstyle="·您是"&vipshow&"，只能上传最多 "&userflag0&" 个产品分类！"
scripterr
end if
else
errstyle="·对不起，此功能已对"&vipshow&"关闭！"
scripterr
end if

rs.addnew
rs("SMT_cpsort")=cpsort
rs("SMT_yp_id")=session("id")
rs.update
rs.close
set rs=nothing
response.redirect"cp_sort.asp"

'==============================================
elseif request("action")="edit" then

cpsort=trim(request("cpsort"))
if cpsort="" then
errstyle="·对不起，产品分类不能为空"
scripterr
end if
set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from SMT_cp_sort where SMT_id="&request("id")&" and SMT_yp_id="&session("id")
rs.open sql,conn,1,3

if userflag0=0 then
errstyle="·对不起，此功能已对"&vipshow&"关闭！"
scripterr
end if

rs("SMT_cpsort")=cpsort
rs.update
rs.close
set rs=nothing
response.redirect"cp_sort.asp"

elseif request("action")="px" then
set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from SMT_cp_sort where SMT_id="&request("id")&" and SMT_yp_id="&session("id")
rs.open sql,conn,1,3
rs("SMT_date")=now()
rs.update
rs.close
set rs=nothing
response.redirect"cp_sort.asp"
elseif request("action")="del" then

conn.execute("delete From SMT_cp_sort Where SMT_ID="&request("id")&" and SMT_yp_id="&session("id"))

set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from SMT_cp where SMT_sortid="&request("id")
rs.open sql,conn,1,1
do while not rs.eof
conn.execute("delete from SMT_leaveword where SMT_book_sort=4 and SMT_book_table="&rs("SMT_id")&" and SMT_book_ypid="&session("id")&"")
conn.execute("delete From SMT_cp Where SMT_ID="&rs("SMT_id")&" and SMT_yp_id="&session("id"))
rs.movenext
loop
rs.close
set rs=nothing


response.redirect"cp_sort.asp"
end if%>
<script language="JavaScript">
<!--
function checkdata() {
if( addform.cpsort.value =="") {
alert("\添加分类出错，下面是产生错误的可能原因：\n\n·请输入分类名称")
return false;
}
return true;
}
// -->
</script>
<table width="760" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#FFFFFF">
<tr>
<td width="160" valign=top bgcolor=#efefef>
<!--==============-->
<!--#include file="left.asp"-->
<!--==============-->
</td>
<td width="600" valign=top>
<!--==============-->
<p align="center"><img src="../admin/img/cp.gif" width="600" height="509"></p>
<table width="594" border="0" align="center">
  <tr bgcolor="#FFCCFF">
    <td width="401"><FONT color="#FF0000" 
size=2 face=宋体>仿阿里巴巴商贸通商务网SQL免费版此功能未提供，<br>
      需要正式版请联系购买，一套1280元。<BR>
      电话：[phone] 13710829762 <br>
      电话：[phone]<BR>
      客服QQ:38306293<A 
href="http://wpa.qq.com/msgrd?V=1&amp;Uin=38306293&amp;Site=网域高科&amp;Menu=yes" 
target=blank><IMG alt=网域高科客服为你服务 src="http://wpa.qq.com/pa?p=1:38306293:10" 
border=0></A> 客服QQ:417586492<A 
href="http://wpa.qq.com/msgrd?V=1&amp;Uin=417586492&amp;Site=网域高科&amp;Menu=yes" 
target=blank><IMG alt=网域高科客服为你服务 src="http://wpa.qq.com/pa?p=1:417586492:10" 
border=0></A><br>
      客服QQ:657248708<A 
href="http://wpa.qq.com/msgrd?V=1&amp;Uin=657248708&amp;Site=网域高科&amp;Menu=yes" 
target=blank><IMG alt=网域高科客服为你服务 src="http://wpa.qq.com/pa?p=1:657248708:10" 
border=0></A> 客服MSN：[e-mail]<BR>
      演示：<A 
href="http://www.wygk.cn/smsj/">http://www.wygk.cn/smsj/</A></FONT><BR>
    </td>
    <td width="183"><div align="center"><a href="https://payment.nps.cn/PayCarAction.do?merchantId=1051011176"><img src="../admin/img/npslogo3.gif" width="144" height="80" border="0"></a></div></td>
  </tr>
</table>
<!--==============-->
</td>
</tr>
</table>
<!--====== bottom ========-->
<table width="760" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor=#ffffff>
<tr><td height=2 bgcolor=#6C94D1></td></tr>
  <tr>
    <td align="center" height=80><%=citybottom%></td>
  </tr>
</table>
</body>
</html>