<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<!--#include file="conn.asp"-->
<!--#include file="config.asp"-->
<title><%=webname%>--意见反馈--</title>
<meta name="description" content="网域电子商务网站,公司企业网站管理系统中英繁，仿阿里巴巴商贸通商务网,商城购物系统程序,源码下载，多用户商城,客隆电子商务网站管理系统,装饰,家具,旅社社旅游网站建设，程序开发,网站开发，网站推广,商城代码,系统销售,网络营销,企业商务,整站程序,ASP代码销售,企业电子商务平台,电子政务，官方站点：http://www.wygk.cn">
<meta name="keywords" content="网域电子商务网站,公司企业网站管理系统中英繁，仿阿里巴巴商贸通商务网,商城购物系统程序,源码下载，多用户商城,客隆电子商务网站管理系统,装饰,家具,旅社社旅游网站建设，程序开发,网站开发，网站推广,商城代码,系统销售,网络营销,企业商务,整站程序,ASP代码销售,企业电子商务平台,电子政务，官方站点：http://www.wygk.cn">
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK 
href="img/code43.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2800.1505" name=GENERATOR></HEAD>
<BODY style=scrollbar-arrow-color:#227776;scrollbar-base-color:#C6DCDE text=#000000 bgColor=#ffffff leftMargin=0 topMargin=0 background="image/bg.gif" marginwidth="0" marginheight="0" >
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
  <TBODY>
  <TR>
    <TD vAlign=top height=114><A name=top></A>
      <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
        <TBODY>
        <TR>
              <TD vAlign=top> 
                <TABLE height=128 cellSpacing=0 cellPadding=0 width=780 border=0>
                  <TBODY>
                    <TR> 
                      <TD rowspan="2" vAlign=top><!--#include file="include/header.asp"--><table id="__01" width="1003" height="446" border="0" cellpadding="0" cellspacing="0">
  <tr> 
    <td valign="top"> <img src="image/images/about_01.gif" width="29" height="338" alt=""></td>
    <td rowspan="3" width="212" height="446" valign="top"> 
      <table id="__01" width="212" height="200" border="0" cellpadding="0" cellspacing="0">
        <tr> 
          <td> <img src="image/images/left_01.gif" width="212" height="74" alt=""></td>
        </tr>
        <tr> 
          <td background="image/images/left_02.gif" width="212" height="127"> 
            <!-- #include file="login.asp"-->
          </td>
        </tr>
        <tr> 
          <td width="212"  valign="top"> 
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="4"></td>
              </tr>
            </table>
            <a href="procat.asp"><img src="image/HELPLEFT.gif" width="212" height="43" border="0"></a> 
            <table width="100%" align=center>
              <tbody> 
              <tr> 
                <td class=mm> 
                  <table width="160" border="0" cellspacing="0" cellpadding="0">
                    <tr> 
                      <td style="padding-left:10px" height="25" class=table-youxia><a href="help.asp?action=process"><img height=11 src="image/icon_notice.gif" 
                  width=17 align=absMiddle border=0>购物流程</a> </td>
                    </tr>
                    <tr> 
                      <td style="padding-left:10px" height="25" class=table-youxia><a href="help.asp?action=feiyong"><img height=11 src="image/icon_notice.gif" 
                  width=17 align=absMiddle border=0>送货方式及费率</a></td>
                    </tr>
                    <tr> 
                      <td style="padding-left:10px" height="25" class=table-youxia><a href="help.asp?action=fukuan"><img height=11 src="image/icon_notice.gif" 
                  width=17 align=absMiddle border=0>付款方式</a></td>
                    </tr>
                    <tr> 
                      <td style="padding-left:10px" height="25" class=table-youxia><a href=help.asp?action=tiaokuan><img height=11 src="image/icon_notice.gif" 
                  width=17 align=absMiddle border=0>交易条款</a></td>
                    </tr>
                    <tr> 
                      <td style="padding-left:10px" height="25" class=table-youxia><a href=help.asp?action=transport><img height=11 src="image/icon_notice.gif" 
                  width=17 align=absMiddle border=0>运输说明</a></td>
                    </tr>
                    <tr> 
                      <td style="padding-left:10px" height="25" class=table-youxia><a href=help.asp?action=secret><img height=11 src="image/icon_notice.gif" 
                  width=17 align=absMiddle border=0>保密安全</a></td>
                    </tr>
                    <tr> 
                      <td style="padding-left:10px" height="25" class=table-youxia><a href=help.asp?action=businesstime><img height=11 src="image/icon_notice.gif" 
                  width=17 align=absMiddle border=0>工作时间</a></td>
                    </tr>
                    <tr> 
                      <td style="padding-left:10px" height="25" class=table-youxia><a href=help.asp?action=support><img height=11 src="image/icon_notice.gif" 
                  width=17 align=absMiddle border=0>商品销售和售后服务</a></td>
                    </tr>
                    <tr> 
                      <td style="padding-left:10px" height="25" class=table-youxia><a href=help.asp?action=law><img height=11 src="image/icon_notice.gif" 
                  width=17 align=absMiddle border=0>适用法律和版权声明</a></td>
                    </tr>
                    <tr> 
                      <td style="padding-left:10px" height="25" class=table-youxia><a href=# onClick="javascript:window.open('vip.asp?action=vipscore','','width=400,height=200,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes')";return false;><img height=11 src="image/icon_notice.gif" 
                  width=17 align=absMiddle border=0>关于VIP会员</a> </td>
                    </tr>
                    <tr> 
                      <td style="padding-left:10px" height="25" class=table-youxia><a href=help.asp?action=faq><img height=11 src="image/icon_notice.gif" 
                  width=17 align=absMiddle border=0>常见问题</a></td>
                    </tr>
                  </table>
                </td>
              </tr>
              </tbody> 
            </table>
            <% if left1<>"" then %>
            <a href=<%=left1url%> target="_blank"><img src=<%=left1%> border="0"></a> 
            <% end if %>
            <!--左侧-->
            <br>
            <% if left2<>"" then %>
            <a href=<%=left2url%> target="_blank"><img src=<%=left2%> border="0"></a> 
            <% end if %>
            <!--左侧-->
          </td>
        </tr>
      </table>
      <table height=43 cellspacing=0 cellpadding=0 
                        width="100%" align=center 
                        background=img/contact.gif 
border=0>
        <tbody> 
        <tr> 
          <td  valign=top> 
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="5"></td>
              </tr>
            </table>
            <table cellspacing=0 cellpadding=0 width="100%" 
                              border=0 height="35">
              <tbody> 
              <tr> 
                <td 
                                style="PADDING-LEFT: 18px; FONT-SIZE: 8pt; FONT-FAMILY: tahoma" 
                                valign=top><img 
                                src="img/left_customer_01.gif" 
                                align=absMiddle width="21" height="14">020-34506590</td>
              </tr>
              <tr> 
                <td 
                                style="PADDING-LEFT: 18px; FONT-SIZE: 8pt; FONT-FAMILY: tahoma" 
                                valign=top height=10><img 
                                src="img/left_customer_02.gif" 
                                align=absMiddle width="21" height="14"><b><font color=#81B902><%=webemail%></font></b></td>
              </tr>
              </tbody> 
            </table>
          </td>
        </tr>
        </tbody> 
      </table>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td height="4"></td>
        </tr>
      </table>
      <table cellspacing=0 cellpadding=0 width="100%" 
border=0>
        <tbody></tbody> 
      </table>
      <table height=51 cellspacing=0 cellpadding=0 
                        width="100%" align=center 
                        background=img/time.gif border=0>
        <form name=frmTime3><tbody>
          <tr> 
            <td style="PADDING-LEFT: 38px; PADDING-TOP: 28px" 
                            valign=top> 
              <input 
                              style="BORDER-RIGHT: 0px; BORDER-TOP: 0px; FONT: 9pt 宋体; BORDER-LEFT: 0px; WIDTH: 150px; COLOR: #585858; BORDER-BOTTOM: 0px; HEIGHT: 18px; BACKGROUND-COLOR: transparent" 
                              readOnly name=disp>
            </td>
          </tr>
        </form>
        <script>TO=setTimeout('TOfunc()',1000);</script></TBODY>
      </table>
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td height="4"></td>
        </tr>
      </table>
      <table height=51 cellspacing=0 cellpadding=0 
                        width="100%" align=center 
                        background=img/conter.gif 
                          border=0>
        <tbody> 
        <tr> 
          <td style="PADDING-LEFT: 38px; PADDING-TOP: 24px" 
                            valign=top> 
            <script src="count/index2.asp?tye=num"></script>
          </td>
        </tr>
        </tbody> 
      </table>
    </td>
    <td rowspan="3" width="747" valign="top"> 
      <table width="747" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td> 
            <!-- #include file="ad.asp"-->
          </td>
        </tr>
        <tr> 
          <td height="57" background="image/special.gif"> 
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td width="12%">&nbsp;</td>
                <td width="88%" align="left"> 
                                    <div align="left"><b><font face="Arial"><font color="#3399CC"><a href="index.asp"><%=webname%></a>&nbsp;-&gt;&nbsp;客户留言</font></font></b></div>
                </td>
              </tr>
            </table>
          </td>
        </tr>
      </table>
      <table width="50%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td height="3"></td>
        </tr>
      </table>
                        <table cellspacing=0 cellpadding=0 width="747" border=0 height="590">
                          <tr> 
                         
                            <td class=ml width="1" background="image/line.gif"></td>
                            <td class=ml width="10"></td>
                            <td align=left width="716" valign="top"><TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
              <TBODY>
              <TR>
                <TD class=ml></TD>
                <TD align=left>
                                    <TABLE width="90%" align=center>
                                      <TBODY> 
                                      <TR>
                      
                                      <TD class=mm>
                                          <TABLE WIDTH="100%" BORDER="0" CELLSPACING="0" CELLPADDING="0" align="center">
                                            <TR>
                                              <td height="50" class="table-xia">&nbsp;尊敬的客户，请在这里将您们的宝贵建议反馈给我们，我们会及时回复，谢谢 
                                                ！</td>
                                            </TR></table>
<%
dim action
action=Request.Form("action")
select case action
case ""
%><table width="100%" border="0" cellspacing="0" cellpadding="0" align="center" class=table-zuoyou>
 
    <TR> 
      <TD WIDTH="98%" class=table-youxia>
	   <FORM NAME="messinfo" METHOD="post" ACTION="mess.asp?action=save">
	 <table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
	  <tr><td >&nbsp;类　型：</td>
      <TD class=table-youxia><SELECT NAME="messtype" ID="messtype">
          <OPTION VALUE="1">普通留言</OPTION>
          <OPTION VALUE="2">意见建议</OPTION>
          <OPTION VALUE="3">缺货登记</OPTION>
          <OPTION VALUE="4">合作意向</OPTION>
          <OPTION VALUE="5">产品投诉</OPTION>
          <OPTION VALUE="6">服务投诉</OPTION>
        </SELECT></td></tr>
	   <TR> 
      <TD class=table-youxia>&nbsp;主　题：</TD>
      <TD HEIGHT="22" class=table-youxia> <INPUT NAME="messsubject" TYPE="text" size="30" maxlength="20"></TD>
    </TR>
    <TR> 
      <TD class=table-youxia>&nbsp;姓　名：</TD>
      <TD HEIGHT="22" class=table-youxia> <INPUT NAME="messusername" TYPE="text" size="30" maxlength="15"></TD>
    </TR>
    <TR> 
      <TD class=table-youxia>&nbsp;E-mail：</TD>
      <TD HEIGHT="22" class=table-youxia> <INPUT NAME="messemail" TYPE="text" size="30" maxlength="30"> 
      </TD>
    </TR>
    <TR> 
      <TD class=table-youxia>&nbsp;电　话：</TD>
      <TD HEIGHT="22" class=table-youxia> <INPUT NAME="messtel" TYPE="text" ID="messtel" size="30" maxlength="15"> 
      </TD>
    </TR>
    <TR> 
      <TD VALIGN="top" class=table-youxia>&nbsp;留　言：</TD>
      <TD class=table-youxia><TEXTAREA NAME="messcontent" COLS="62" ROWS="8" wrap="VIRTUAL" ID="messcontent"></TEXTAREA> 
      </TD>
    </TR>
    <TR> 
      <TD HEIGHT="28"><input name="action" type="hidden" value="save"></TD>
      <TD HEIGHT="28"><INPUT TYPE="submit" NAME="Submit" VALUE="发布留言"  ONCLICK="return checkmess();"></TD>
    </TR>
  
	  </table></FORM>
	  
	 </TD>

	<tr>
                                            <td>
                                                <TABLE WIDTH="100%" BORDER="0" CELLSPACING="0" CELLPADDING="0" class=table-zuoyou align="center">
                                                  <tr> 
                                                    <td class=table-xia height="22"><font color="#FF6600"><b>最新客户留言</b></font></td>
                                                  </tr>
                                                  <%
 set rsMess=server.CreateObject("adodb.recordset")

				Const MaxPerPage=10
   				dim totalPut   
   				dim CurrentPage
   				dim TotalPages
   				dim j
   				dim sql
    			if Not isempty(SafeRequest("page",1)) then
      				currentPage=Cint(SafeRequest("page",1))
   				else
      				currentPage=1
   				end if 
	rsMess.open "select messsubject,messid from mess order by messdtm desc",conn,1,1
				
  				if rsMess.eof And rsMess.bof then
       				Response.Write "<p align='center' class='contents'> 还没有留言！</p>"
   				else
	  				totalPut=rsMess.recordcount

      				if currentpage<1 then
          				currentpage=1
      				end if

      				if (currentpage-1)*MaxPerPage>totalput then
	   					if (totalPut mod MaxPerPage)=0 then
	     					currentpage= totalPut \ MaxPerPage
	   					else
	      					currentpage= totalPut \ MaxPerPage + 1
	   					end if
      				end if

       				if currentPage=1 then
            			showContent
            			showpage totalput,MaxPerPage,"mess.asp"
       				else
          				if (currentPage-1)*MaxPerPage<totalPut then
            				rsMess.move  (currentPage-1)*MaxPerPage
            				dim bookmark
            				bookmark=rsMess.bookmark
            				showContent
             				showpage totalput,MaxPerPage,"mess.asp"
        				else
	        				currentPage=1
           					showContent
           					showpage totalput,MaxPerPage,"mess.asp"
	      				end if
	   				end if
   				   				end if

   				sub showContent
       			dim i
	   			i=0

			%>
                                                  <%do while not rsMess.eof%>
                                                  <tr> 
                                                    <td class=table-xia height="35"><img src="image/icon_notice.gif" width="17" height="11"><a href=# onClick="javascript:window.open('chkmess.asp?id=<% = rsMess("messid") %>','','width=500,height=300,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;"> 
                                                      <%=trim(rsMess("messsubject"))%></a></td>
                                                  </tr>
                                                  <tr>
                                                    <td class=table-xia height="3" background="image/cate_line.gif"></td>
                                                  </tr>
                                                  <%i=i+1
			if i>=MaxPerPage then Exit Do
			rsMess.movenext
		  loop
		  rsMess.close
		  set rsMess=nothing%>
                                                  <tr> 
                                                    <td align="left"> 
                                                      <%  
				End Sub   
  
				Function showpage(totalnumber,maxperpage,filename)  
  				Dim n
  				
				If totalnumber Mod maxperpage=0 Then  
					n= totalnumber \ maxperpage  
				Else
					n= totalnumber \ maxperpage+1  
				End If %>
                                                      <form method=Post action= <% = filename %>>
                                                        <p align='center'> 
                                                          <%
				If CurrentPage<2 Then  %>
                                                          首 页 上一页 
                                                          <%
				Else   %>
                                                          <a href=<% = filename %>?page=1>首 
                                                          页</a> <a href=<% = filename %>?page=<% = CurrentPage-1 %>>上一页</a> 
                                                          <%
				End If	
				If n-currentpage<1 Then  %>
                                                          下一页 末 页 
                                                          <%
				Else   %>
                                                          <a href=<% = filename %>?page=<% = (CurrentPage+1) %>>下一页</a> 
                                                          <a href=<% = filename %>?page=<% = n %>>末 
                                                          页</a> 
                                                          <%
				End If  %>
                                                          第 <b>
                                                          <% = CurrentPage %>
                                                          </b> 页 共 <b>
                                                          <% = n %>
                                                          </b> 页<br>
                                                          共&nbsp;<b>
                                                          <% = totalnumber %>
                                                          </b>&nbsp;条新闻　每页 <b>
                                                          <% = maxperpage %>
                                                          </b> 条新闻 转到第：
                                                          <input type='text' name='page' size=2 maxlength=10 class=smallInput value=<% = currentpage %>>
                                                          页
                                                          <input type='submit'  class='contents' value='跳转' name='cndok'>
                                                      </form>
                                                      <%
				End Function  
			%>
                                                    </td>
                                                  </tr>
                                                </TABLE>
                                              </td>
	</tr>
 
</TABLE> <%
	  case "save"
	  if session("messmess")=minute(now) then
	  response.write "<script language=javascript>alert('对不起，您不可以重复提交信息，请稍后再试！');history.go(-1);</script>"
	  response.End
	  end if
	  function HTMLEncode2(fString)
	fString = Replace(fString, CHR(13), "")
	fString = Replace(fString, CHR(10) & CHR(10), "</P><P>")
	fString = Replace(fString, CHR(10), "<BR>")
	HTMLEncode2 = fString
    end function
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from mess",conn,1,3
rs.addnew
rs("messsubject")=trim(request.form("messsubject"))
rs("messtype")=request.form("messtype")
rs("messcontent")=htmlencode2(trim(request.form("messcontent")))
rs("messusername")=trim(request.form("messusername"))
rs("messemail")=trim(request.form("messemail"))
rs("messtel")=trim(request.form("messtel"))
rs("messdtm")=now
rs("messip")=Request.ServerVariables("remote_addr")
rs.update
rs.close
set rs=nothing
session("messmess")=minute(now)
response.write "<br><br><center>您的信息反馈已成功提交，感谢您的参与！<br><br><a href=index.asp>返回首页</a></center>"
end select%>
           </TBODY></TABLE>
                <TD class=mr></TD></TR></TBODY></TABLE>
                  
              </td>
                          </tr>
                        </table>
    </td>
    <td rowspan="3" width="15">&nbsp; </td>
  </tr>
  <tr> 
    <td width="29" height="48">&nbsp; </td>
  </tr>
  <tr> 
    <td height="29"> 
      <p>&nbsp;</p>
      <p>&nbsp; </p>
    </td>
  </tr>
</table>

           
                  <SCRIPT LANGUAGE="JavaScript">
<!--
function checkspace(checkstr) {
  var str = '';
  for(i = 0; i < checkstr.length; i++) {
    str = str + ' ';
  }
  return (str == checkstr);
}

function checkmess()
{
   if(checkspace(document.messinfo.messsubject.value)) {
	document.messinfo.messsubject.focus();
    alert("您没有填写主题！");
	return false;
  }
   if(checkspace(document.messinfo.messusername.value)) {
	document.messinfo.messusername.focus();
    alert("请填写您的姓名！");
	return false;
  }
     if(checkspace(document.messinfo.messcontent.value)) {
	document.messinfo.messcontent.focus();
    alert("请填写反馈信息内容！");
	return false;
  }
  
  if(document.messinfo.messemail.value.length!=0)
  {
    if (document.messinfo.messemail.value.charAt(0)=="." ||        
         document.messinfo.messemail.value.charAt(0)=="@"||       
         document.messinfo.messemail.value.indexOf('@', 0) == -1 || 
         document.messinfo.messemail.value.indexOf('.', 0) == -1 || 
         document.messinfo.messemail.value.lastIndexOf("@")==document.messinfo.messemail.value.length-1 || 
         document.messinfo.messemail.value.lastIndexOf(".")==document.messinfo.messemail.value.length-1)
     {
      alert("Email地址格式不正确！");
      document.messinfo.messemail.focus();
      return false;
      }
   }
 else
  {
   alert("Email不能为空！");
   document.messinfo.messemail.focus();
   return false;
   }

}
//-->
</script><!--#include file="include/footer.asp"--></BODY></HTML>
