E
eyoung
I placed some code below...took out most of the unneeded html crap for
this.
this gives me a listing of phone charges...every other line with a
different color for easy reading.
What I want is this with all entries for the first "Service Number"
then a space then everything for the next "Service Number" on and on
until the end. Can someone tell me how to do this?
<table>
<tr>
<td>Service Number</td>
<td>Subscriber</td>
<td>Description</td>
<td>To Number</td>
<td><div><b>Duration </td>
<td>Connect Date</td>
<td>Amount</td>
</tr>
<%
Dim sBackgroundColor
sBackgroundColor = "#ffffff"
Do until rs.eof
If rs("Service Number") <> "" Then
If sBackgroundColor = "#ffffff" Then
sBackgroundColor = "#f7f7f7"
Else
sBackgroundColor = "#ffffff"
End If
%>
<tr bgcolor="<%=sBackgroundColor%>">
<td><%=rs("Service Number")%></td>
<td><%=rs("Subscriber User Name")%></td>
<td><%=rs("Description")%></td>
<td><%=rs("To Number")%></td>
<td align="center"><%=rs("Duration")%></td>
<td><%=rs("Connect Date")%></td>
<td align="right"><%=rs("Total Charge")%></td>
</tr>
<% End If
rs.MoveNext
Loop %>
</table>
this.
this gives me a listing of phone charges...every other line with a
different color for easy reading.
What I want is this with all entries for the first "Service Number"
then a space then everything for the next "Service Number" on and on
until the end. Can someone tell me how to do this?
<table>
<tr>
<td>Service Number</td>
<td>Subscriber</td>
<td>Description</td>
<td>To Number</td>
<td><div><b>Duration </td>
<td>Connect Date</td>
<td>Amount</td>
</tr>
<%
Dim sBackgroundColor
sBackgroundColor = "#ffffff"
Do until rs.eof
If rs("Service Number") <> "" Then
If sBackgroundColor = "#ffffff" Then
sBackgroundColor = "#f7f7f7"
Else
sBackgroundColor = "#ffffff"
End If
%>
<tr bgcolor="<%=sBackgroundColor%>">
<td><%=rs("Service Number")%></td>
<td><%=rs("Subscriber User Name")%></td>
<td><%=rs("Description")%></td>
<td><%=rs("To Number")%></td>
<td align="center"><%=rs("Duration")%></td>
<td><%=rs("Connect Date")%></td>
<td align="right"><%=rs("Total Charge")%></td>
</tr>
<% End If
rs.MoveNext
Loop %>
</table>