USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Pegar 2 campos em SQL
Ivo
BARRETOS
SP - BRASIL
Postada em 29/03/2006 10:49 hs            
Pessoal
Como faço pra pegar dois campos numa instrução sql.
Estou fazendo assim, mas não está funcionando.
 
dim Cupom as long
dim CodCancel as integer
 
If rsMovimento.State <> adStateClosed Then
    rsMovimento.Close
    End If
  
    rsMovimento.Open "Select Cupom,Sequencia From Movimento Where Cupom = '" &
 
Cupom & "'  and Sequencia = '" & CodCancel & "'", Conn, adOpenKeyset, adLockOptimistic
 

   
     
Armando Gioia
Pontos: 2843
SÃO PAULO
SP - BRASIL
Postada em 29/03/2006 10:53 hs            
vc quer jogar o valor que a select trazer na variavel?   esplique melhor o que vc quer fazer?!!!
 
falow um abraço
     
Ivo
BARRETOS
SP - BRASIL
Postada em 29/03/2006 10:56 hs            
Isso , na variavel Cupom e CodCancel
     
Ivo
BARRETOS
SP - BRASIL
Postada em 29/03/2006 10:58 hs            
Mensagem de erro é  "tipo de dados incompativel"
     
Alexandre C.G
Pontos: 2843 Pontos: 2843
PATOS DE MINAS
MG - BRASIL
Postada em 29/03/2006 11:48 hs            
dim Cupom as long
dim CodCancel as integer
 
If rsMovimento.State <> adStateClosed Then
    rsMovimento.Close
End If
rsMovimento.Open "Select Cupom as cup, Sequencia as seq From Movimento Where Cupom = '" &
Cupom & "'  and Sequencia = '" & CodCancel & "'", Conn, adOpenKeyset, adLockOptimistic
cupom = rsmovimento("cup")
codcancel = rsmovimento("seq")
     
Ivo
BARRETOS
SP - BRASIL
Postada em 29/03/2006 20:44 hs            
Alexandre ainda não deu certo.
vou detalhar mais um pouco.
Os campos estão armazenados como numeros em uma tabela do acess.
A variavel CodCancel é extraida de um textbox, e a variavel Cupom é apenas
incrementada no codigo.
Ja tentei a função Val(CodCancel) sem sucesso.
Pq o metodo Find não funciona ?
To amarrado nisso, gostaria de toda ajuda possivel.
 
Grato
Ivo
     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página