Página 1 de 1

Buscar uma virgula no GET

Enviado: 15 Mai 2010 19:51
por marcos.gurupi
Caros, deve ser facil mas como faco para achar uma virgula em uma string?

Estou usando assim mas ele soh encontra se a virgula tiver no inicio da string.

Código: Selecionar todos

Local aArray := {Alltrim(xobs01),Alltrim(xobs02),Alltrim(xobs03),Alltrim(xobs04)} 
If ASCAN(aArray,",")>0

Marcos Roberto.

Re: Buscar uma virgula no GET

Enviado: 15 Mai 2010 20:22
por marcos.gurupi
Desculpe ocupar o tempo de vcs, ultimamente estou batendo o escanteio e correndo para cabecear isso me faz ficar fazendo essas perguntar indiotas. Achei aqui. AT(",",Obs01)>0

Marcos Roberto.

Re: Buscar uma virgula no GET

Enviado: 15 Mai 2010 21:36
por Maligno
Não seja tão duro consigo mesmo. Nenhuma dúvida é idiota. Se tivesse visto antes, até teria respondido, mas você mesmo já conseguiu resolver. Seja a dúvida que for, precisando, compartilhe-a com todos.

Re: Buscar uma virgula no GET

Enviado: 17 Mai 2010 14:13
por gvc
Só para constar, se vc quer saber se uma string esta contida em outra.

? "A" $ "ABC" // Result: .T.
? "a" $ "ABC" // Result: .F.

e é claro, no [x]Harbour, já verificando array tb:

PROCEDURE Main()
LOCAL cString := "xHarbour"

? "X" $ cString // result: .F.
? "arb" $ cString // result: .T.
? 1 $ { 3, 2, 1 } // result: .T.
RETURN