Destacar nome repetido na lista txt

[ricardo coelho designer 0]

Boa tarde estou precisando da ajuda de vocês mais uma vez, estou precisando destacar palavras repetidas de uma lista só que não estou conseguindo com o código que estou usando todas as palavras ficam destacadas, segue abaixo o código

 

<%'Abrindo o arquivo TXT com o método OpenTextFile
set obj = fso.OpenTextFile(server.MapPath(Arquivo), 1)
'Listando os dados do txt (linha por linha) até o fim do arquivo
While obj.AtEndOfStream = false
response.write("<tr nowrap bgcolor=""#FFFFFF"">")&vbCrlf
Arr = NOK
linha = obj.ReadLine ' ReadLine é o método que lê cada linha do txt
'---
Arr = split(linha,";")' Dividindo cada linha por; (ponto e vírgula)
for x = lbound(Arr) to ubound(Arr) ' Loop para criar as colunas <td> dentro das linhas <tr>

If linha = linha Then
		response.write(" <td><span style=""color:#FF0000"">"&linha&"</span></td>")

Else
	response.write(" <td>"&linha&"</td>")
End If
next
'---
response.write("</tr>"&vbCrlf)
Wend
'---
'Fechando os objetos
set obj = nothing
set fso = nothing%>

Muito obrigado.

[jrcardozo 4]

veja se isso te ajuda

 

http://forum.imasters.com.br/index.php...amp;hl=destacar

[ricardo coelho designer 0]

veja se isso te ajuda

 

http://forum.imasters.com.br/index.php...amp;hl=destacar

Jonathandj, até ajuda mas nesse caso ele faz comparção com dados selecionados, como eu consigo fazer isso pegando do txt para fazer a comparação dos nomes repetidos?

[jrcardozo 4]

como estão os dados no txt?