PC Toledo

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................

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 :?)

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.

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 :?)