Question

ASP和Access数据库问题--要求部分字段显示,并加上删除的一列

1、共有七八字段~~要怎样改只会显示4个字段的值...

2、有图标跟在(第1个)字段后做为删除...如何改成-->>不用图标并在最后加上一列作为删除..

----这是自己改的部分程序,有两个问题不能解决
虽然字段只显示4个，但下面的值还是会显示
删除和修改列不在最后。。。应该怎样改？？
<%
rs.pagesize=8
page=Clng(request("pageText"))
If page<1 then page=1
if page>rs.pagecount then page=rs.pagecount
Response.Write"<Center><table boder=1>"
Response.write"<tr>"
Response.write"<td>编号</td>"
Response.write"<td>名称</td>"
Response.write"<td>型号</td>"
Response.write"<td>厂家</td>"
Response.write"<td>修改</td>"
Response.write"<td>删除</td>"
response.write"</tr>"
rs.AbsolutePage=page
For i=0 to rs.PageSize-1
response.write"<tr>"
for j=0 to rs.fields.count-1
response.write"<td><font size=5>"&rs.fields(j).value&"</font></td>"
if j=0 then
response.write"<td><font size=2><a href=update1.asp?sbbh1="&rs.fields(0).value&">修改</a></font></td>"
'修改
else
if j=1 then
response.write"<td><font size=2><a href=delete.asp?sbbh1="&rs.fields(1).value&">删除</a></font></td>"
'删除
end if
end if

Next
Response.Write"</tr>"
rs.moveNext
If Rs.eof Then exit for
Next
response.write"</table></center>"

%>

Answer 1

这样把他理出来。想怎么加就怎么加
<%
rs.pagesize=8
page=Clng(request("pageText"))
If page<1 then page=1
if page>rs.pagecount then page=rs.pagecount
%>
<table boder=1>
<tr>
<td>编号</td>
<td>名称</td>
<td>型号</td>
<td>厂家</td>
<td>修改</td>
<td>删除</td>
</tr>
<%
rs.AbsolutePage=page
For i=0 to rs.PageSize-1
%><tr><%
for j=0 to rs.fields.count-1
%><td><%rs.fields(j).value&%></td>
<%if j=0 then%>
<td><a href=update1.asp?sbbh1="&rs.fields(0).value&">修改</a></td>"
<%
else
if j=1 then %>
<td><font size=2><a href=delete.asp?sbbh1="&rs.fields(1).value&">删除</a></font></td>"
<%
end if
end if

Next %>
</tr>
<%
rs.moveNext
If Rs.eof Then exit for
Next
%>
</table>