<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>普通用户</title>
<!-- #include file="top1.asp"-->
<!--#include file="inc/conn.asp"-->
</head>
<body>
<%
userid=session("user")
set rs=server.CreateObject("adodb.recordset")
rs.open"select xgqx from wtgl_user where userid='"&userid&"'",conn,1,1
qx=rs("xgqx")
rs.close
sql="select * from wtgl1"
rs.open sql,conn,1,2
rs.pagesize=10 '定义一页显示的记录数目
tatalrecord=rs.recordcount '获取记录总数目
tatalpages=rs.pagecount '获取分页的数目
rs.movefirst
nowpage=request("page") '用request获取当前页数,注意page是自己定义的变量并非函数
if nowpage&"x"="x" then '处理页码为空时的情况
nowpage=1
else
nowpage=cint(nowpage) '将页码转换成数字型
end if
rs.absolutepage=nowpage '将指针移动到当前显示页的第一条记录
%>
</p>
<form name="form1" method="post" action="">
<table width="800" border="1" align="center" bordercolor="#0066FF">
<tr align="center">
<td width="163"><div align="center">类别</div></td>
<td width="163"><div align="center">内容描述</div></td>
<td width="163"><div align="center">修改状态</div></td>
<td width="163"><div align="center">提出时间</div></td>
<td width="163"><div align="center">修改时间</div></td>
<td width="163"><div align="center">所属平台</div></td>
<td width="163"><div align="center">附件地址</div></td>
<td width="163"><div align="center">提出人</div></td>
<td width="163"><div align="center">问题解决者</div></td>
<td width="163"><div align="center">优先级</div></td>
<td width="163"><div align="center">前台/后台</div></td>
<% if qx="具有" then %>
<td width="163"><div align="center">管理操作</div></td>
</tr>
<% end if %>
<% do while not rs.eof %>
<tr align="center">
<td><span class="style4"><% =rs("lb") %></span></td>
<td><span class="style4"><textarea name="textarea" cols="16"><% =rs("nrms") %></textarea></span></td>
<td><span class="style4"><% =rs("xgzt") %></span></td>
<td><span class="style4"><% =rs("tcsj") %></span></td>
<td><span class="style4"><% =rs("xgsj") %></span></td>
<td><span class="style4"><% =rs("sspt") %></span></td>
<td><input name="textfield" type="text" value="<% =rs("fj") %>"> <span class="style4"></span></td>
<td><span class="style4"><% =rs("tcr") %></span></td>
<td><span class="style4"><% =rs("jjr") %></span></td>
<td><span class="style4"><% =rs("yxj") %></span></td>
<td><span class="style4"><% =rs("fl") %></span></td>
<% if qx="具有" then %>
<td><span class="style4"><a href="update_wt.asp?xh=<%=rs("xh")%>">修改</a>|<a href="delete_wt.asp?xh=<%=rs("xh")%>">删除</a></span></td>
</tr>
<%
end if
rs.movenext
loop
%>
</table>
<p><span class="style3"><span class="STYLE1">---------------</span>--------------------------------------------------<span class="style4">------</span><span class="style5"><span class="style4">----</span></span></span>----------共:<%=tatalpages%>页 当前为:<%=nowpage%>页
<%if nowpage>1 then%>
<a href="user.asp?page=<%=nowpage-1%>">上一页</a>
<%else%>
上一页
<%end if%>
<%for k=1 to tatalpages%>
<%if k<>nowpage then %>
<a href="user.asp?page=<%=k%>"><%=k%></a>
<%else%>
<%=k%>
<%end if%>
<%next%>
<%if nowpage < tatalpages then%>
<a href="user.asp?page=<%=nowpage+1%>">下一页</a>
<%else%>
下一页
<%end if%>
<%if nowpage<>1 then%>
<a href="user.asp?page=<%=1%>"> 首页</a>
<%else%>
首页
<%end if%>
<%if nowpage<>tatalpages then %>
<a href="user.asp?page=<%=tatalpages%>">末页</a>
<%else%>
末页
<%end if%>
</p>
<div align="center">
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</div>
<p> </p>
<p> </p>
<p> </p>
</form>
<p> </p>
<span class="style3"> </span>
</body>
</html>