<!--#include file="../conn/conn.asp"-->
<!--#include file="../conn/nosql.asp"-->
<!--#include file="../conn/config.asp"-->
<!--#include file="../conn/md5.asp"-->
<%if Not ChkPosturl then response.redirect ("login.asp")
if session("adminname")="" then
response.Redirect "login.asp"
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<link href="../css.css" rel="stylesheet" type="text/css">
</head>
<script language=javascript>
function test()
{
  if(!confirm('确认删除吗？')) return false;
}
function mm()
{
   var a = document.getElementsByTagName("input");
   if(a[0].checked==true){
   for (var i=0; i<a.length; i++)
      if (a[i].type == "checkbox") a[i].checked = false;
   }
   else
   {
   for (var i=0; i<a.length; i++)
      if (a[i].type == "checkbox") a[i].checked = true;
   }
}
</script>
<body>
<form action="chkflogood.asp" method="post" name="f1">
<table width="90%">
<tr bgcolor="#F0F3F8" align="center"><td width="9%">序号</td width="25%" bgcolor="#F0F3F8" style='PADDING-LEFT: 10px'><td>商品名称</td><td width="25%" bgcolor="#F0F3F8" style='PADDING-LEFT: 10px'>价格</td><td width="32%">加入时间</td><td width="9%">选择</td></tr>
<%	
	good=nosql(request("good"))
	if good<>"" then
	good=split(good,",")
	for i=lbound(good) to ubound(good)
	conn.execute "delete from mini_flogood where goodid="&clng(good(i))
	next
	response.Redirect "chkflogood.asp"
	response.End
	end if
	slcate=nosql(request("slcate"))
	selectkey=nosql(request("selectkey"))
if slcate="jg" then
	sql="select * from snsn_flolist order by goodjg desc"
elseif slcate="name" then
	sql="select * from snsn_flolist order by goodname desc"
elseif slcate="chk" then
	sql="select * from snsn_flolist "
else
	sql="select * from snsn_flolist order by id desc"
end if
	set rs=server.CreateObject("adodb.recordset")
	rs.open sql,conn,1,1
	rs.pagesize=20
	abpage=rs.pagecount
	page=request("page")
	if not isChkInteger(page) then
		page=1
	end if
	if page="" or clng(page)<1 or clng(page)>clng(abpage) then
			page=1
	end if
	rs.absolutepage=clng(page)
	for i=1 to 20
		if rs.eof then 
			exit for
		end if
	%>
<tr bgcolor="#F0F3F8" align="center"><td><%=rs.absoluteposition%></td><td><a href="floremod.asp?id=<%=rs("id")%>"><%=rs("floname")%></td><td><%=rs("goodjg")%></td><td><%=rs("adddate")%></td><td><input name="good" type="checkbox" value="<%=rs("id")%>"></td></tr>
	<%	
		rs.movenext
	next
	%><tr><td>全选</td><td><input name="selall" type="checkbox" value="" onClick="mm()"></td><td><input name="" type="submit" value="提交" onClick="return test();"></td><tr>
</table>
</form>
<table><tr>
	<td>共有:<%=abpage%>页</td>
	<td><a href="chkflogood.asp?page=1">首页</a></td>
	<td>
	<% if clng(page)<>1 then%>
	<a href="chkflogood.asp?page=<%=page-1%>">上一页</a>
	<%
	else response.Write("上一页")
	end if
	%>
	</td>
		<td>
		<% if clng(page)<clng(abpage) then%>
		<a href="chkflogood.asp?page=<%=page+1%>">下一页</a>
		<%else response.Write("下一页") 
		end if	%>
		</td>
		<td><a href="chkflogood.asp?page=<%=abpage%>">尾页</a></td>
	<td><form action=chkflogood.asp>
	 <%  
	 Response.Write(" 转到 " & "<td><INPUT TYEP=TEXT NAME=page SIZE=1 Maxlength=5 VALUE=" & page & " ></td><td>" & " 页"  & vbCrLf & "<input name=go type=image  src=../minishow/images/butn_go.gif alt=GO align=absMiddle  border=0></td>")
	 %>
	 </form>
	</td></tr></table>
		
</body>
</html>
