Pesquisa de qq palavra em uma String !

[ReinaldoFreitas]

Ola, existe alguma funcao que faca uma pesquisa de qq palavra em uma string. ja vi algo parecido no forum mas nao to conseguindo achar!!

clipper 5.3
blinker7
dbfntx

obrigado................

[rochinha]

Amiguinho

De forma direta como DBSEEK() ou SEEK não.

Mas voce pode usar o operador '$' em um comando LOCATE, IF..ENDIF

Assim:

Variavel1 := "AM"
Variavel2 := "JOAO AMERICO DOS SANTOS"

IF Variavel1 $ Variavel2 // Se AM estiver contido em Variavel2

ou

LOCATE FOR Variavel1 $ Variavel2 // Localize AM na Variavel2
IF FOUND()

Se voce quizer encontrar os primeiros digitos do que digitou:

Mas voce pode usar o operador '$' em um comando LOCATE, IF..ENDIF

Assim:

Variavel1 := "JOA"
Variavel2 := "JOAO AMERICO DOS SANTOS"

IF SubStr(Variavel2,1,len(Variavel1)) = Variavel2 // Se o pedaco da Variavel2 for igual a Variavel1

ou

LOCATE FOR SubStr(Variavel2,1,len(Variavel1)) = Variavel2 // Localize o pedaco Variavel1 na Variavel2
IF FOUND()

@braços :?)

[gvc]

O Mestre Rochinha não mencionou (sei lá, o cara esqueceu ou coisa assim) que tb temos:

at(str1, str2) -> retornar a posição da primeira ocorrencia de str1 em str2.

rat(str1, str2) -> retorna a posição da última ocorrencia de str1 em str2.

[rochinha]

Amiguinho GVC

E voce tava certo,

Afinal meu fosforo já não queima como quando jovem.

E como estamos num forum de ajuda mutua eu percebi que muitas respostas sempre tem mais de um post de solução.

Isto é base de conhecimento, isto são várias celulas provendo informação e é isto aí.

@braços :?)