📄 tous.asp

📁 设计考虑校园电子商务模式
💻 ASP
字号:


<HTML>
<HEAD>
<TITLE>投诉店铺</TITLE>

<BODY>

<!--#include file="top.asp"--><!--#include file="Inc/UserChk.asp"-->
<!--#include file="Inc/msgbox.asp"-->
<%
'****************************************************
' 多多校园                      Power by ddtaobao.com
' Email:ddmaster@126.com               OICQ:136465584
' Web: http://www.ddtaobao.com              作者:多多
' 校园、企业、医院、公司程序定做，系统开发，网站制作!
' Copyright (C) 2007 ddtaobao.com All Rights Reserved
'****************************************************
IF Trim(Request("Submit"))<>Empty Then
  Dim typ,body,strsql,rs,id1
  id1=HTMLEncode(request.Form("id"))
  typ=HTMLEncode(request.Form("typ"))
  body=HTMLEncode(request.Form("body"))
  set rs=server.CreateObject("adodb.recordset")
  strsql="select * from [dd_tousu]"
  rs.open strsql,conn,1,3
  rs.addnew()
  rs("shop_id")=id1
  rs("user_id")=session("user_id")
  rs("typ")=typ
  rs("body")=body
  rs("submit_date")=date()
  rs.update
  rs.close
  set rs=nothing
  call msgbox("投诉成功","GoUrl","index.asp")
  response.End()
End IF

dim id
id=request.QueryString("id")
%>
<TABLE width=778 border=0 align=center cellpadding="4">
  <TBODY>
    <TR> 
      <TD align="center" vAlign=top>
        <form name="form1" method="post" action="">
	<input name="id" type="hidden" value="<%=id%>">
      <div align="center">
           <TABLE cellpadding="3" cellspacing="1" align="center" class="tableborder1">
            <TR> 
            
              <TD class="main_title_bs06" colspan="2">举报投诉</TD>
                
             
            </TR> <tr>
          <td  class="tablebody1">理由：</td>
          <td  class="tablebody1"><select name="typ" id="typ">
           <%=tousuSelect()%>
          </select></td>
        </tr>
        <tr>
          <td valign="top"  class="tablebody1">内容：</td>
          <td valign="top"  class="tablebody1"><textarea name="body" cols="70" rows="8" class="input2" id="body"></textarea></td>
        </tr>
        <tr>
          <td  class="tablebody1">　</td>
          <td  class="tablebody1"><input type="submit" class=input name="Submit" value="提交"></td>
        </tr>
        </table>
    </div>
    </form>
        </TD>
    </TR>
  </TBODY>
</TABLE>
<!--#include file="bottom.asp"--> 

</BODY></HTML>
⌨️ 快捷键说明

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