prøver igen

Hejsa
Jeg har problemer med lidt asp kode. Udtrækket fra db virker ok. Men under hvert element har jeg indsat en sort lini(et lille gif billede). Problemet er bare at når der kun er et element i db bliver den sorte linje udskrevet flere gange !
Hvordan undgår jeg det ?

her er lidt kode :

'-- Execute Sql string
sql_string = "SELECT artikel_id,artikel_head,artikel_type FROM Artikler "& sql_where & sql_order
        Set RecLang = Server.CreateObject("ADODB.Recordset")
        RecLang.Open sql_string,objConn,adOpenDynamic
       
        rowcount = 0
        letter  = ""
        lettercount = 0
        while Not RecLang.EOF
            item_id        = RecLang.Fields.Item("artikel_id")
            artikel_head    = RecLang.Fields.Item("artikel_head")
           
            artikel_type    = RecLang.Fields.Item("artikel_type")
            if artikel_type="nyh" then
            %>
                <tr><td valign="top"><font face="verdana,arial" size="2"><br><b><a href="51_nyhedsbrev_detail.asp?item_id=<%=item_id%>&cat=<%=request("cat")%>"><%=artikel_head%></a></b></font></td></tr>
                <tr><td valign="top"><img src="../../ill/streg498.gif" width=498 height=1  vspace=4 border="0"></td></tr>
            <%else
           
                'if len(artikel_chaptor)>0 then artikel_chaptor
            %>


                <tr><td valign="top"><font face="verdana,arial" size="2"><br><b><%=artikel_head%></b></font></td></tr>
                <tr><td valign="top"><img src="../../ill/streg498.gif" width=498 height=1 border="0" vspace=4></td></tr>

            <%end if
           
            RecLang.MoveNext
        Wend
        RecLang.Close
    end if
%>