<%
dim i
set rs=conn.execute("select * from underdep ")
while not rs.eof
%>
<a href="javascript:void(t<%=i%>.style.display=t<%=i%>.style.display==''?'none':'')">test</a>
<table id=t<%=i%> border="1" style="display:none">
<tr>
<td width="100"><%response.Write(rs("item"))%></td>
</tr>
</table>
<%
i=i+1
rs.movenext
wend
%>
先谢过各位解答,我遇到的问题是:当我用一个while循环导入数条记录时,报错:t.style为空或不是对象,请问应该怎么解决?谢谢,程序是:
<%
set conn=server.CreateObject("adodb.connection")
conn.open "supervise","",""
set rs=conn.execute("select * from underdep ")
while not rs.eof
%>