Destacar Paginação

[spash]

Olá pessoal,

Como faço para destacar na paginação a palavra buscada?

A minha paginação está ae embaixo, se alguém puder me ajudar ficarei muito grato!

<%
For intRecordLoopCounter = 1 to intRecordsPerPage

                               If adoRec.EOF Then Exit For
        
       intSiteIDNo = CInt(adoRec("SiteIDNo"))                
       strTitle = adoRec("Title")
       strURL = adoRec("URL")       
 strDescription = adoRec("Description")
 intSiteHits = CInt(adoRec("Hits"))
       strData = adoRec("Date_Entered")

'-----RESULTADOS DE BUSCA (NORMAL)-----------------------------------------------

    Response.Write vbCrLf & "<div align=""left""><font size=""2"" color=""#3891EC""><a href=""get_url.asp?SiteID=" & intSiteIDNo & """ target=""_blank""><b>" & strTitle & "</b></font></a>"
    Response.Write vbCrLf & "<br>"
    Response.Write vbCrLf & strDescription
               Response.Write vbCrLf & "<br>"
    Response.Write vbCrLf & "<span class=""italic""><div align=""left""><font size=""2"" color=""#000000"">" & "<b>URL:&nbsp;</b><font color=""#009933"">" & strURL & "</font>&nbsp&nbsp|&nbsp<b>&nbsp;Visitas:</font></b> " & intSiteHits & " </font></span>"
 Response.Write vbCrLf & "<br><font size=""1"" color=""#000000"">( <img src=""imagens/seta2.gif""> Cadastrado desde " & strData & " )</font><br><br>"
   
 adoRec.movenext
next
End If 
%>

[Reginaldo ASP]

Veja se isso ajuda, clicando aqui

[Decio]

Tente este exemplo:

https://www.scriptbrasil.com.br/?class=2.3&...ategoria=Vários