以下是引用MagicKnight在2005-9-9 11:13:04的发言:
谢谢你,无根泉朋友,但是我这里有一个新的问题,就是我用的只是一个页面,即在表格显示页面同时进行字段名的选择,而且显示表格和字段选择同在一个表单里,我也用了你所讲的这种相似代码结构,可是出问题了,提示出错呢,你能帮我再推敲推敲一下吗?:)谢谢,实在搞得我头大了
把t1.asp改成这样
<!--#include file="conn.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<% set rs=server.CreateObject("adodb.recordset")
sql="select * from bbs"
rs.open sql,conn,3,2
%>
<form name="form1" method="post" action="">
<%for each x in rs.fields %>
<input type="checkbox" name="aa" value="<%=x.name %>"><%= x.name %>
<%next %>
<input name="bt" type="submit" id="bt" value="显示字段">
</form>
<% rs.close
bt=request.Form("bt")
aa=request.Form("aa")
if aa="" then
aa="*"
else
if instr(aa,"id")=0 then aa="id,"&aa
end if
if bt<>"" then
set rs=server.CreateObject("adodb.recordset")
sql="select "&aa&" from bbs"
rs.open sql,conn,3,2
%>
<table width="600" border="1" align="center" cellpadding="0" cellspacing="0">
<tr>
<% for each x in rs.fields %>
<td><%=x.name%></td>
<% next %>
</tr>
<% do while not rs.eof %>
<tr>
<% for each x in rs.fields %>
<td><%=x.value %></td>
<% next %>
</tr>
<% rs.movenext
loop %>
</table>
<% end if %>