主题:这个要怎样写呢???
怎样让他编号等于1的不显示呢
<td>用户编号</td>
<td>用户名</td>
<td>电 话</td>
<td>ESN/IP</td>
<td>IMS I</td>
<td>服务方案</td>
<td>服务等级</td>
<td>数据业务</td>
<td>国际业务</td>
<td>呼叫转移</td>
<td>语音信息</td>
<td>用户级别</td>
<td>修改</td>
<td>删除</td>
<td>添加</td>
</tr>
<%
Dim data,conn,connstr
data="admin.mdb"
Connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(data)
set conn = Server.CreateObject("adodb.connection")
conn.open connstr
Dim rs,sql
if session("class")="2" then
sql="select * from admin"
end if
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3
Do while rs.eof<>true
%>
<tr>
<td><% = rs.fields("id") %></td>
<td><% = rs.fields("user") %></td>
<td><% = rs.fields("city") %></td>
<td><% = rs.fields("ip") %></td>
<td><% = rs.fields("imsi") %></td>
<td><% = rs.fields("aaa") %></td>
<td><% = rs.fields("bbb") %></td>
<td><% = rs.fields("ccc") %></td>
<td><% = rs.fields("ddd") %></td>
<td><% = rs.fields("eee")%></td>
<td><% = rs.fields("fff") %></td>
<td>用户编号</td>
<td>用户名</td>
<td>电 话</td>
<td>ESN/IP</td>
<td>IMS I</td>
<td>服务方案</td>
<td>服务等级</td>
<td>数据业务</td>
<td>国际业务</td>
<td>呼叫转移</td>
<td>语音信息</td>
<td>用户级别</td>
<td>修改</td>
<td>删除</td>
<td>添加</td>
</tr>
<%
Dim data,conn,connstr
data="admin.mdb"
Connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(data)
set conn = Server.CreateObject("adodb.connection")
conn.open connstr
Dim rs,sql
if session("class")="2" then
sql="select * from admin"
end if
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3
Do while rs.eof<>true
%>
<tr>
<td><% = rs.fields("id") %></td>
<td><% = rs.fields("user") %></td>
<td><% = rs.fields("city") %></td>
<td><% = rs.fields("ip") %></td>
<td><% = rs.fields("imsi") %></td>
<td><% = rs.fields("aaa") %></td>
<td><% = rs.fields("bbb") %></td>
<td><% = rs.fields("ccc") %></td>
<td><% = rs.fields("ddd") %></td>
<td><% = rs.fields("eee")%></td>
<td><% = rs.fields("fff") %></td>