以HTML格式打破表格

时间:2012-01-19 02:26:13

标签: html asp-classic vbscript

我在桌子上有几条记录。如果我想确保连续只有3列,无论记录数量多少。

我使用了以下内容。但问题是我在record1中有多个记录。

以下是结果,但我希望它是第二个例子。

0378                0378
Ms. Mary Jane           Ms. Jane Smith          
SCHOOL (SCIENCE)                SCHOOL (SCIENCE)
CLASS: Class1           CLASS: Class2
BUNDLE: 1                   BUNDLE: 2

ABC: 41             FGH: 1
                        FGH: 1


JKL: 2              0378
                        Mr. David O'Conner
                        SCHOOL (SCIENCE)
                        CLASS: Class3
                        BUNDLE: 3

                        ORE: 42

JKL仍在第1行的第2个例子。

0378                0378
Ms. Mary Jane           Ms. Jane Smith          
SCHOOL (SCIENCE)                SCHOOL (SCIENCE)
CLASS: Class1           CLASS: Class2
BUNDLE: 1                   BUNDLE: 2

ABC: 41             FGH: 1
                        FGH: 1
                        JKL: 2

0378
Mr. David O'Conner
SCHOOL (SCIENCE)
CLASS: Class3
ISSUE: 01-2012 ISSUE
BUNDLE: 3

ORE: 42

2 个答案:

答案 0 :(得分:3)

您需要使用Modulo运算符:

Response.Write "<table width=""100%"">"
r = 0
Do Until objRS.EOF
    myData = objRS("myfield")
    If (r Mod 3)=0 Then
        If r>0 Then
            Response.Write "</tr>"
        End If
        Response.Write "<tr width= ""354"">"
    End If
    Response.Write "<td>" & myData & "</td>"
    r = r + 1
    objRS.MoveNext
Loop
objRS.Close
If r>0 Then
    Response.Write "</tr>"
End If
Response.Write "</table>"

这将显示三列数据。

答案 1 :(得分:0)

不确定哪些记录与列不同,但我认为您正在寻找类似的内容:

  response.write"<table width=""100%"">"
  response.write"<tr width= ""354"">" 

  response.write"<td>" 
      response.write"<table>"
      for i= 1 to [flag to stop column1]
      response.write"<tr>" 
      response.write"<td>"    
      response.write"Record" & i & ":" & record(i)
      response.write"</td>" 
      response.write"</tr>"
      next
      response.write"</table>"
  response.write"</td>" 

  response.write"<td>" 
      response.write"<table>"
      for i= 1 to [flag to stop column2]
      response.write"<tr>" 
      response.write"<td>"    
      response.write"Record" & i & ":" & record(i)
      response.write"</td>" 
      response.write"</tr>"
      next
      response.write"</table>"
  response.write"</td>" 

  response.write"<td>" 
      response.write"<table>"
      for i= 1 to [flag to stop column3]
      response.write"<tr>" 
      response.write"<td>"    
      response.write"Record" & i & ":" & record(i)
      response.write"</td>" 
      response.write"</tr>"
      next
      response.write"</table>"
  response.write"</td>"

  response.write"</tr>"
  response.write"</table>"