Para Rochinha ou quem possa ajudar.

Projeto [x]Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

heliotines
Usuário Nível 1
Usuário Nível 1
Mensagens: 3
Registrado em: 21 Nov 2007 15:08
Localização: SP

Para Rochinha ou quem possa ajudar.

Mensagem por heliotines »

Rochinha,

estive fazendo testes com o ADO com sua .CH e tenho algumas dúvidas.

eu gostaria de executar comandos sql direto, como a seguir:

qnome:="CRISTINA"
cSql := "SELECT * FROM clientes WHERE nome = "+"'&qnome'"
oADOConection:Execute( cSql )

o comando de pesquisa acima parece que funciona, não dá erro, mas como pegar o resultado deste comando ?
ou seja saber se realmente ele encontrou ou não o registro ?

estou usando xHarbour com ADODB.

Grato
Avatar do usuário
rochinha
Administrador
Administrador
Mensagens: 4664
Registrado em: 18 Ago 2003 20:43
Localização: São Paulo - Brasil
Contato:

Mensagem por rochinha »

Amiguinho

Veja o trecho:

Código: Selecionar todos

    ...
    ADO SET FILTER TO "nome like '*teste*'"
    if ADOEof()
       ? 'Nada foi filtrado'
       ADO SET FILTER TO
       ADO GOTOP
    endif
    ...

Código: Selecionar todos

    ...
    ADO SET FILTER TO "nome like '"+qnome+"'"
    if ADOEof()
       ? 'Nada foi filtrado'
       ADO SET FILTER TO
       ADO GOTOP
    endif
    ...
A função ADOEof() tem por padrão dar o retorna TRUE ou FALSE para o teste de fim de arquivo.

Voce pode usar a mesma sintaxe de um codigo xBase puro apenas acrescentado a frente a palavra ADO, eu tive o cuidade de dar nomes quase identicos as funções.
OPS! LINK QUEBRADO? Veja ESTE TOPICO antes e caso não encontre ENVIE seu email com link do tópico para [url=mailto://fivolution@hotmail.com]fivolution@hotmail.com[/url]. Agradecido.

@braços : ? )

A justiça divina tarda mas não falha, enquanto que a justiça dos homens falha porque tarda.
Responder