<%@ Page Language="VB" ContentType="text/html" ResponseEncoding="gb2312" Inherits="b2bNet.Admin_Admin_questionlist" %>
<%On Error Resume Next%>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<link href="inc/admin_style.css" rel="stylesheet" type="text/css" /><link href="inc/style.css" rel="stylesheet" type="text/css" /><script type="Text/JavaScript" language="javascript" src="inc/title.js"></script>
<title><%=AppConst.SiteName%></title>
<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
-->
</style>
<script type="Text/JavaScript" language="javascript">
function selectall(){
	for(i=0;i!=document.news.elements.length;i++){
		document.news.elements[i].checked=!document.news.elements[i].checked;
	}
}
function WorkSubmit(send){
	if(confirm("您确定要进行您现在的操作吗？")){
		news.action="Admin_questionlist.aspx?send="+send+"";
		news.submit();
		}
}

</script>
</head>

<body>
<table style="background-color:#C4E4FF; width:100%"   cellspacing="0" cellpadding="0" >
  <tr>
    <td style="height:20"><table style="height:22; width:100%" border="0" cellpadding="0" cellspacing="1">
      <tr class="topbg">
        <td style="height:22" align="center" class="topbg"><strong>意 见 或 建 议 列 表</strong></td>
      </tr>
    </table></td>
  </tr>
</table>
<table style="width:100%"  border="0" cellspacing="0" cellpadding="4">
  <tr>
    <td style="height:22"><table style="width:100%" border="0" cellpadding="2" cellspacing="1" class="border">
        <tr>
          <td style="height:22; width:40" class="Title"><div align="center"><strong>标</strong></div></td>
          <td class="Title"><div align="center"><strong>信息标题</strong></div></td>
          <td style="width:100" class="Title"><div align="center"><strong>留言人姓名</strong></div></td>
          <td style="width:100" class="Title"><div align="center"><strong>留言用户</strong></div></td>
          <td style="width:100" class="Title"><div align="center"><strong>联系电话</strong></div></td>
          <td style="width:120" class="Title"><div align="center"><strong>电子邮件</strong></div></td>
          <td style="width:40" class="Title"><div align="center"><strong>位置</strong></div></td>
          <td style="width:110" class="Title"><div align="center"><strong>时 间</strong></div></td>
          <td style="width:80" class="Title"><div align="center"><strong>操 作</strong></div></td>
        </tr>
        <form method="post" name="news" >
        <%If Rs.EOF Then%><tr style="background-color:#EFEFEF"><td align="center" colspan="9"><font color="red"><strong>暂无任何信息！</strong></font></td></tr><%End If%>
        <%Dim i = 0 : Do While Not Rs.EOF AndAlso i < Rs.PageSize%>
        <tr style="background-color:#EFEFEF" >
          <td style="width:40" ><div align="center"><img src="../images/guestbkq.gif" width="18" height="18" /></div></td>
          <td><a href="Admin_questionedit.aspx?id=<%=rs("id").Value%>"><%=rs("title").Value%></a></td>
          <td style="width:100" ><div align="center"><%=rs("name").Value%></div></td>
          <td style="width:100" ><div align="center"><%=rs("uid").Value%></div></td>
          <td style="width:100" ><div align="center"><%=rs("tel").Value%></div></td>
          <td style="width:130" ><div align="center"><%=rs("sender_email").Value%></div></td>
          <td style="width:40" ><div align="center">
            <%=IIf(IsTrue(Rs("showye").Value), "<font color='red'>固顶</font>", "不显")%>
          </div></td>
          <td style="width:130" ><div align="center"><%=rs("f_datetime").Value%></div></td>
          <td style="width:80" ><table style="width:100%" border="0" cellspacing="2" cellpadding="0">
            <tr>
              <td style="width:33%"><%If IsTrue(Rs("pass").Value) Then%><font color="red">已审</font><%Else%><a href="Admin_questionlist.aspx?send=check&id=<%=rs("id").Value%>">审核</a><%End If%></td>
              <td style="width:33%"><div align="center"><a href="Admin_questionedit.aspx?id=<%=rs("id").Value%>">回复</a></div></td>
              <td style="width:33%"><div align="center">
                <input type="checkbox" name="id" value="<%=rs("id").Value%>" class="box1" />
              </div></td>
            </tr>
          </table></td>
        </tr>
        <tr style="background-color:#F2F5FD" >
          <td style="width:40"><div align="center"><img src="../images/guestbka.gif" width="18" height="18" /></div></td>
          <td colspan="6"><%=IsNull(Rs("recontent").Value, "<strong>暂无回复</strong>")%></td>
          <td align="center"><%=Rs("retime").Value%></td>
          <td></td>
          </tr>
		 <%i = i + 1 : Rs.MoveNext() : Loop %>
        <tr>
          <td colspan="10"><div align="right">
              <input type="button" name="Submit22" value="反选" onclick="selectall()" />
                <input name="Submit" type="submit" onclick="WorkSubmit('check')" value="批量审核" />
                <input name="Submit3" type="submit" value="首页固顶" onclick="WorkSubmit('ontop')" />
                <input type="submit" name="Submit2" value="删除所选" onclick="WorkSubmit('del')" />
          </div></td>
        </tr></form>
      </table>
    </td>
  </tr>
      <tr>
      <td><%=Pagination(rs.pagecount,IsNull(Request("page"),1),rs.recordcount,rs.pagesize)%> </td>
    </tr>
</table>
</body>
<%Page_Loaded()%>
</html>
