Here's one way you can do it:
<%
Dim sOldName, sNewName, sCompanyName
sOldName = ""
Do While Not ors.EOF
sNewName = ors.Fields.Item(0).Value
sCompanyName = sNewName
If sCompanyName = sOldName Then sCompanyName = " "
%>
<tr>
<td><%=sCompanyName%></td>
<td>price code here</td>
</tr>
<%
sOldName = sNewName
ors.MoveNext
Loop
%>
Ray at work
"Don Grover" <sp******@assoft.com.au> wrote in message
news:%2****************@TK2MSFTNGP10.phx.gbl...
I have a recordset that returns company names, their are duplicates,
sorted by company name.
sCompanyName = ors("company")
How can I show only one company name from each company and display nothing
for the next name if its the same in the previouse row,
COKE $2.14
$2.16
$2.16
PEPSI $3.13
$3.11
$3.12
FANTA $1.26
$1.26
Regards
Don