Código:
<% colorfila =1
While ((Repeat1__numRows <> 0) AND (NOT Telefono.EOF))
if colorfila <> 0 Then
color= "#DEDEBE"
colorfila=1
End If
if Not colorfila then
color="#F0F0F0"
colorfila=0
End If %>
<tr>
<td>
<font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=(Telefono.Fields.Item("telefono").Value)%></font></td>
<td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=(Telefono.Fields.Item("fecha").Value)%></font></td>
<td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=(Telefono.Fields.Item("clase_servicio").Value)%></font></td>
<td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=(Telefono.Fields.Item("premio").Value)%></font></td>
<td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=(Telefono.Fields.Item("fecha_contacto").Value)%></font></td> <td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=(Telefono.Fields.Item("hora_contacto").Value)%></font></td> <td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=(Telefono.Fields.Item("nombre_cliente").Value)%></font></td> <td><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=(Telefono.Fields.Item("saldo_diponible").Value)%></font></td>
</tr>
<% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1
Telefono.MoveNext() Wend %>

