Question

我正在使用参数化查询来获取将在页面上显示为产品网格的记录。我的设计在每行中列出了4个产品，但我想在每4个项目中应用一个类，这样我就可以清除任何边距/填充。

这是我目前的代码;

<%
        Set conn = Server.CreateObject("ADODB.connection")
        conn.Open Application("database")
        Set cmd = Server.CreateObject("ADODB.command")
        With cmd
                .ActiveConnection = conn
                .CommandType = adCmdStoredProc
                .CommandText = "prc_getCollection"
                .Parameters.Append .CreateParameter("@LabelID", adInteger, adParamInput,, 5)
                Set rsCollection = .Execute
        End With
%>

<% While Not rsCollection.EOF %>
<li>Product Name</li>

<%
                rsCollection.MoveNext
        Wend
        rsCollection.Close()
        Set rsCollection = Nothing
%>

如果有人知道如何将“最后”课程应用到每个第4个

项目，那就太棒了。

谢谢。

Answer 1

很长一段时间以来，我已经完成了任何经典的asp，因此语法可能略有偏差。通常的方法是递增计数器并使用模数运算符来确定您是否在行号上，该行号是4的精确倍数。

<% 
Dim counter
counter = 0

While Not rsCollection.EOF 
counter = counter + 1

if (counter mod 4 =0) Then
Response.Write "<li class='last'>Product Name</li>"
Else
Response.Write "<li>Product Name</li>"
End If
%>

将“last”类添加到查询中的记录中

1 个答案: