<% Response.Write("<table width=""200"" height=""25"" border=""1"" cellpadding=""0"" cellspacing=""0"">") Dim i For i = 1 to 10 If i Mod 2 = 0 Then color = "red" Else color = "#FFFFFF" End If Response.Write("<tr bgcolor="&color&"><td> </td></tr>") Next Response.Write("</table>") %>