mysql - 如何从 2 个表中进行选择，并在第一个循环的每 5 行中显示表 2 中的 1 项？

Question

我有一个 mysql 数据库并使用 .asp classic。

我想从 2 个表中进行选择，第一个是产品，第二个是添加。我想显示 1add，然后显示 5 个产品，然后显示 1 个添加，依此类推，就像这样。

Add1
Product1
Product2
Product3
Product4
Product5
Add2
Product6
Product7...

因此，我只需从两个表中进行选择，然后首先显示所有添加，然后显示所有产品。

sql = " SELECT * 
        FROM produkt,annonser 
        where produkt.publicera='true' 
            AND produkt.antal > "&nr&" 
            AND annonser.publicera='true' 
            AND annonser.antal > "&nr&" 
        order by 
            produkt.datum DESC, 
            annonser.datum DESC,
            produkt.artikel ASC, 
            annonser.artikel ASC limit 10"
set rs = conn.Execute (sql)

那么我该如何选择我想要的方式呢？感谢您的任何意见，谢谢。

好的，这样就可以了。

For i = 1 to 10
  If i mod 5 = 1 Then
     [Get the current Add and display it]
     if not rsAdds.EOF Then
        rsAdds.MoveNext()
     End If
  End If   
  if not rsProducts.EOF Then 
  [Display the Product]
  rsProducts.MoveNext()
Next

但现在我试图再次循环它，并且我尝试以不同的方式使用 rs.MoveFirst，但我只得到 rs.eof 或 rs.buf 为 true，因此它不会将光标移动到第一条记录并再次循环？

所以我想先循环上面的内容，然后再循环它，就像这样。

For i = 1 to 10
      If i mod 5 = 1 Then
         [Get the current Add and display it]
         if not rsAdds.EOF Then
            rsAdds.MoveNext()
         End If
      End If   
      if not rsProducts.EOF Then 
      [Display the Product]
      rsProducts.MoveNext()
    Next

//Set the rs to move first so that the below will run-----

For x = 1 to 10
      If x mod 5 = 1 Then
         [Get the current Add and display it]
         if not rsAdds.EOF Then
            rsAdds.MoveNext()
         End If
      End If   
      if not rsProducts.EOF Then 
      [Display the Product]
      rsProducts.MoveNext()
    Next

那么我该如何将 rs 移动到第一个循环之后的第一个帖子，以便它可以运行第二个代码？谢谢。

Answer 1

我认为 ASP classic 是指文件中的实际 VBA(或 javascript？)，没有 .NET 或控件。

您必须结合使用过程代码和 SQL 来完成此操作。由于您的添加和产品看起来彼此不相关，因此您可能应该将它们提取到单独的查询中。

所以代码看起来像这样:

Dim rsAdds = [query and code to get the Adds]
Dim rsProducts = [query and code to get the Products]

' I'm not sure if you want just 10 products displayed, or all of them.  I'm going 
' I'm going to go with 10.

For i = 1 to 10
  If i mod 5 = 1 Then
     [Get the current Add and display it]
     if not rsAdds.EOF Then
        rsAdds.MoveNext()
     End If
  End If    
  [Display the Product]
  rsProducts.MoveNext()
Next i

如果您只想从两个不相关的表中插入数据，而不关心数据实际是什么，请不要浪费时间尝试欺骗 SQL 为您完成此操作。按照程序进行。