colore dinamico in base alla categoria

[serpiko]

salve!
ho una pagina asp che estrapola i dati (categoria "annunci") da un db (le cui categorie sono però "annunci", "reclami" e "ovazioni"). Al momento funziona tutto alla perfezione. il problema è che però adesso per non so quale oscuro motivo mi è stato chiesto di far apparire anche i "reclami", magari con una riga sopra (con lo sfondo ad esempio di colore rosso) ho provato a fare una regola ma non mi riesce3, qualcuno può dirmi cosa sbaglio?! perché il risultato è che adesso a video non mi stampa nulla! vi posto qui di seguito il codice:

<%
			
			iPageSize = 5 'NUMERO RECORD PER PAGINA

			If Request.QueryString("page") = "" Then
				iPageCurrent = 1
			Else
				iPageCurrent = CInt(Request.QueryString("page"))
			End If

			strSQL = "SELECT * FROM DOWNLOAD where pcat = 'annunci' or pcat = 'reclami' order by pdate DESC"
			Set objRS = Server.CreateObject("ADODB.Recordset")
			objRS.PageSize = iPageSize
			objRS.CacheSize = iPageSize
			objRS.Open strSQL, objConn, adOpenStatic, adLockReadOnly, adCmdText

			reccount = objRS.recordcount
			iPageCount = objRS.PageCount

			If iPageCurrent > iPageCount Then iPageCurrent = iPageCount
			If iPageCurrent < 1 Then iPageCurrent = 1

			If iPageCount = 0 Then
				Response.Write "

<table><td><font face='verdana' size='2' color='#000000'>Non sono stati trovati dati.</td></table></p>"
			Else
				objRS.AbsolutePage = iPageCurrent
				iRecordsShown = 0
				%>
                            <table>
                              <%
								Cont=1
								Do While iRecordsShown < iPageSize And Not objRS.EOF
									i = objRS("pcat")
        							if i ="annunci" then 
									Response.Write "<tr><td>[img]immagini/jpg/zipimage_p.jpg[/img]<span class=""titolonews"">"&objRS("nome")&"</span>

"
									Response.Write "<font color='#000000' face='Verdana' size='1'>Inserito il [" & objRS("pdate") & "] | Scaricato [" & objRS("hit") & "]</font>
<hr></td></tr>"
									else
									if i ="reclami" then 
									Response.Write "<tr><td>[img]immagini/jpg/zipimage_p.jpg[/img]<span class=""titolonews"">"&objRS("nome")&"</span>

"
									Response.Write "<font color='#ff0000' face='Verdana' size='1'>Inserito il [" & objRS("pdate") & "] | Scaricato [" & objRS("hit") & "]</font>
<hr></td></tr>"
									end if 
									end if 
									Cont = Cont + 1
									'POSIZIONAMENTO ALLA RIGA SUCCESSIVA DEL DB
									iRecordsShown = iRecordsShown + 1
									objRS.MoveNext
								Loop
								'PULIZIA DEGLI OGGETTI ADO
								objRS.Close
								Set objRS = Nothing
								%>
                            </table>
                            <%End if%>
                            

 
                              <%If ipagecount <> 1 Then%>
                            <table>
                              <tr> 
                                <td width="50%"><font face="verdana" size="1" color="#000000"> 
                                  [ 
                                  <%if iPageCurrent-2 > 0 and iPageCurrent > 2 then%>
                                  [img]images/first.gif[/img] 
                                  <%end if%>
                                  <%if iPageCurrent > 1 then%>
                                  [img]images/pre.gif[/img] 
                                  <%end if%>
                                  <%if iPageCount > 2 then
								if iPageCurrent-2 < 1 then da_pag = 1 else da_pag = iPageCurrent-2
								if iPageCurrent+2 > iPageCount then fino_a_pag = iPageCount else fino_a_pag = iPageCurrent+2
							else
								da_pag = 1
								fino_a_pag = iPageCount
							end if%>
                                  <%for i = da_pag to fino_a_pag%>
                                  <%if i = iPageCurrent then%>
                                  <font color="red"> <%=i%> </font> 
                                  <%else%>
                                  <a href="annunci.asp?page=<%=i%>"> <%=i%> 
                                  </a> 
                                  <%end if%>
                                  <%next%>
                                  <%if iPageCurrent > 0 and iPageCurrent < iPageCount then%>
                                  [img]images/next.gif[/img] 
                                  <%end if%>
                                  <%if iPageCurrent+1 < iPageCount then%>
                                  [img]images/last.gif[/img] 
                                  <%end if%>
                                  ] </font></td>
                              </tr>
                              <tr> 
                                <td colspan="2" align="left"><font face="verdana" size="1" color="#000000"> 
                                  Pagina <font color="#FF0000"> <%=iPageCurrent%> 
                                  </font> di <font color="#FF0000"> 
                                  <%=iPageCount%> </font> </font></td>
                              </tr>
                            </table>
                            <%end if%>
                            <%
			objConn.Close
			Set objConn = Nothing
			%>