Question

我有这个循环，以表格的形式给我数据，但我还没弄明白如何循环+ 1，所以在每行数据的左侧会有一个数字顺序，比如1,2,3,4。我正在使用MSSQL来获取数据，并且该表在这方面工作得很好。只想在每行的开头加上数字。

这是我目前的代码：

<%
if delivery_id<>"" Then 

for each x in rs.Fields
response.write"<th><b>" & (UCASE(x.name) & "</b></th>")
next%>
</tr>
<%do until rs.EOF%>
<tr>
<%for each x in rs.Fields %>
  <td>  <% Response.Write(x.value)%></td>
<%next
rs.MoveNext%>
</tr>
<%loop
rs.close
conn.close
end if
%>
</table></font>

任何人都可以帮助我吗？

Answer 1

我没有使用ASP的经验，但通常只是放入一个计数器变量并在循环中递增它应该做你想要的：

...
<%i = 0
Do Until rs.EOF
i = i + 1%>
<tr>
  <td><% Response.Write i %></td>
<%For Each x In rs.Fields %>
  <td>  <% Response.Write(x.value)%></td>
<%Next
rs.MoveNext%>
</tr>
<%Loop
...

Answer 2

首先设置你的intC int。

Dim IntC

指定一个起始值。

IntC = 0

将值放在For Each语句中。

在中为每个循环语句添加1。

intC = intC + 1

将结果放在你的

中的response.write之前

如果您需要添加空格，请使用

之间的 

<强>＆LT;％= INTC％取代。  ＆LT;％回复于.....

下面是您的示例代码，其中包含字段计数代码。注意：如果您需要在开始处理 do时重置计数器，直到通过添加intC = 0将计数器归零＆lt;％循环以上

<%
Dim intC
intC = 0

if delivery_id<>"" Then 

for each x in rs.Fields
response.write"<th><b>" & (UCASE(x.name) & "</b></th>")
next%>
</tr>
<%do until rs.EOF%>
<tr>
<%for each x in rs.Fields 
intC = intC + 1
%>
  <td><%=intC%>. <% Response.Write(x.value)%></td>
<%next
rs.MoveNext%>
</tr>
<%loop
rs.close
conn.close
end if
%>
</table></font>

在表中循环数据计数+ 1

2 个答案: