Busca

[andre_guitar7 0]

To precisando fazer um campo de busca, mas não no banco de dados e sim nas páginas. Eu poderia simplismente ler o conteúdo de cada página e o que eu achar apresentar um link, mas dentro de cada página tem código html misturado com texto... se a pessoa digita uma tag html? Ele apresenta isso pro usuário... alguém sabe como eu posso fazer essa busca?

[andre_guitar7 0]

Alguém sabe alguma função pra encontrar uma palavra numa variável string que contenha um texto?

[Salgado 4]

Para encontrar uma palavra ou string dentro de um texto é só usar o InStr.

 

Uma idéia para te ajudar, dê uma olhada no "Laboratório de Scripts" aqui de ASP e procura uma função que retira as TAGS HTML e depois é só usar o texto puro para realizar a pesquisa com o InStr.

[andre_guitar7 0]

Para encontrar uma palavra ou string dentro de um texto é só usar o InStr.Uma idéia para te ajudar, dê uma olhada no "Laboratório de Scripts" aqui de ASP e procura uma função que retira as TAGS HTML e depois é só usar o texto puro para realizar a pesquisa com o InStr.

Poisé, cara... dei uma revirada no Laboratório de Scripts e não achei uma função que tira as tags html... sabe alguma que faça isso? No PHP tem o strip_tags...

[andre_guitar7 0]

oops

 

Function RemoveTagHTML(sTexto)sTextoSemTag = sTextoSet ExpRegular = New RegExpExpRegular.IgnoreCase = TrueExpRegular.Global = TrueExpRegular.Pattern = "<[^>]*>"sTextoSemTag = ExpRegular.Replace(sTextoSemTag, "")Set ExpRegular = NothingRemoveTagHTML = sTextoSemTagEnd Function

:)

[Salgado 4]

Essa é uma que encontrei na busca:

Function LimpaHTML(matriz)
Do While True
	ini = InStr(1,matriz,"<")
	If ini = 0 Then Exit Do
	fim = InStr(ini,matriz,">")
	parcial = Mid(matriz,ini,fim-ini+1)
	matriz = Replace(matriz,parcial,"")
Loop
LimpaHTML = matriz
End Function

[andre_guitar7 0]

Essa é uma que encontrei na busca:

Function LimpaHTML(matriz)	Do While True		ini = InStr(1,matriz,"<")		If ini = 0 Then Exit Do		fim = InStr(ini,matriz,">")		parcial = Mid(matriz,ini,fim-ini+1)		matriz = Replace(matriz,parcial,"")	Loop	LimpaHTML = matrizEnd Function

Vlew!! http://forum.imasters.com.br/public/style_emoticons/default/joia.gif Agora só preciso fazer um laço que percorra todos os arquivos e pastas do site para encontrar a palavra em um por um... :P

[Salgado 4]

Dai é com FSO.

[andre_guitar7 0]

Dai é com FSO.

alguma função que corte meu String, tipo um subString... alguém sabe?

[Mário Monteiro 179]

como assim corte?? as funçoes LEFT, RIGHT E MID retornam substrings cada uma a seu modo