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

📄 admin_pingdel.asp

📁 mlm双轨制直销系统V8.0免费版 可用于: 1、直拨、回拨电话卡公司。 2、保健品、药品公司。 3、在线销售商品等等。 4、其他类型用到双轨制模式的线上开盘公司。
💻 ASP
字号:
<!--#include file="include/conn.asp"-->
<!--#include file="inc/error.asp"-->
<!--#include file="inc/FORMAT.asp"-->
<style type="text/css">
<!--
body,td,th {
	font-size: 12px;
}
-->
</style>
<%
if request.Form("action")="del" then
     if request.Form("p_id")="" then
          founderr=true
          errmsg=errmsg+"<br>"+"<li>请指定操作的对象!"
     else
          if not isInteger(request.form("p_id")) then
               founderr=true
               errmsg=errmsg+"<br>"+"<li>非法的文章id参数。"
          end if
     end if
     if founderr then
          call diserror()
          response.End
     end if
c_id=request.form("c_id")
sql2="select * from pinglun where p_id="&request.Form("p_id")
set rs2=server.createobject("adodb.recordset")
rs2.open sql2,conn,1,3
rs2.delete
rs2.close
set rs2=nothing
%>
<script>alert("删除成功,确认!");location.href="admin_ping.asp?c_id=<%=c_id%>";</script>
<% 
else
      if request.querystring("p_id")="" then
           errmsg=errmsg+"<br>"+"<li>请指定操作的对象!"
           call diserror()
           response.end
      else
           if not isinteger(request.querystring("p_id")) then
                errmsg=errmsg+"<br>"+"<li>非法的文章id参数。"
	       call diserror()
	       response.end
           end if
      end if
p_id=request.querystring("p_id")
c_id=request.querystring("c_id")
set rs2=server.createobject("adodb.recordset")
sql2="select * from commodity where  c_id="&c_id
rs2.open sql2,conn,1,1
      if rs2("u_id")<>session("u_id") then
            founderr=true
            errmsg=errmsg+"<br>"+"<li>商品不属于用户,非法浏览内容!"
            call diserror()
            response.end
      end if
rs2.close
set rs2=nothing

set rs=server.createobject("adodb.recordset")
sql="select * from  [pinglun]  where  p_id="&p_id
rs.open sql,conn,1,1

%>
<br><br>
<form name="form1" method="post" action="admin_pingdel.asp">
         <TABLE bgcolor="#000000" align=center border=0 cellPadding=0 cellSpacing=1 width=80% borderColor="#336666" >
             <tr>
               <td height="20" align="center" bgcolor="#F0F0F0" colspan="2"><span style="color: #FF0000; font-size: 9pt;">编号为<span style="color: #000000; font-size: 9pt;"><%=rs("p_id")%></span>的评论信息内容</span></td>
             </tr>
           
             <tr>
               <td width="20%" height="20" align="right" valign="middle" bgcolor="#FFFFFF" id=qq_595911><span style="color: #009999; font-size: 9pt;">评论内容:</span><br></td><td width="85%" bgcolor="#FFFFFF"><br><textarea name="p_content" cols="40" rows="10" id="p_content" readonly><%=ubb2html(formatStr(autourl(rs("p_content"))),true,true)%></textarea><br></td>
             </tr> <tr><td height="40" align="center" bgcolor="f0f0f0" colspan="2">
<input type="submit" name="Submit" value="删除">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
      <a href="javascript:history.go(-1)"><input type="button" name="Submit2" value="取消">
      </a></td></tr>     
     </table>
	  <input type="hidden" name="p_id" value="<%=rs("p_id")%>">
          <input type="hidden" name="action" value="del">
<input type="hidden" name="c_id" value="<%=c_id%>">
          
</form>
<%rs.close
set rs=nothing%>
<%end if%>

⌨️ 快捷键说明

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