|
| » 首页 » 电脑_数码 » 编程 » ASP和Access数据库问题--要求部分字段显示,并加上删除的... |
ASP和Access数据库问题--要求部分字段显示,并加上删除的... |
|
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>" %> |
![]() |
|
|
<% 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> <% 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> |
| 《ASP和Access数据库问题--要求部分字段显示,并加上删除的...》答案收集时间:2008-06-14 14:47:56 |