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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Como fazer esta SELECT
ATS
OURINHOS
SP - BRASIL
ENUNCIADA !
Postada em 17/03/2005 11:43 hs            
Tenho uma tabela (tblCartao) onde tenho os seguintes campos:

Data
NrResumo
Valor
NrParcelas
NomeCartao

O que eu gostaria de fazer era dividir o campo Valor pelo campo NrParcelas e preencher um DataGrid com os esses dados.
Ex.:

Eu tenho o seguinte registro na minha tabela:

    Data        Nr. Resumo     Valor    Nr. Parcelas   Nome cartao
17/03/2005         2            251,16         3                   Visa


no grid teria que ficar assim:

    Data        Nr. Resumo     Valor    
17/03/2005         2             83,72        
17/03/2005         2             83,72
17/03/2005         2             83,72

e se possivel calcular 30 dias a partir da data de 17/03/2005

    Data         Nr. Resumo     Valor    Data pagamento
17/03/2005          2             83,72      17/03/2005        
17/03/2005          2             83,72      17/04/2005
17/03/2005          2             83,72      17/05/2005


   
Ivo
não registrado
ENUNCIADA !
Postada em 17/03/2005 14:26 hs   
'Variavel.open "Select * from TblCartao where nrResumo=2"'
'with NomeDoGrid
'   .Rows=1
'   For intI=1 to Variavel("NrParcelas")
'       .rows=.rows+1
'       .textMatrix(intI,0)=  Variavel("Data")
'       .textMatrix(intI,1)=Variavel("NrResumo")
'       .textMatrix(intI,2)=Variavel("Valor") / 3
'       .textMatrix(intI,3)=Variavel("Data") + Day(30)
'   Next intI
'End With
   
kerplunk
Pontos: 2843 Pontos: 2843 Pontos: 2843
SÃO PAULO
SP - BRASIL
Postada em 17/03/2005 15:54 hs         
Não...
Select tblcartao.*, (select (tblcartao.Valor/tblCartao.NrResumo) from tblCartao) as Parcela
     
ATS
OURINHOS
SP - BRASIL
ENUNCIADA !
Postada em 17/03/2005 16:32 hs            
Kerplunk não funcionou deu o seguinte erro:

O mecanismo de banco de dados Microsoft Jet não reconhece 'tblCartaoGrid.*' como um nome de campo ou expressão válida.

Veja como fiz:

rstResumo.Open "SELECT tblCartaoGrid.*, (SELECT (tblCartaoGrid.Valor / tblCartaoGrid.NrResumo) FROM tblCartaoGrid) AS Parcela", cnnCartao, adOpenKeyset, adLockPessimistic, adCmdText
   
ATS
OURINHOS
SP - BRASIL
Postada em 18/03/2005 11:51 hs            
Alguem sabe me dizer o que esta errado no instrução acima.
     
Ivo
não registrado
ENUNCIADA !
Postada em 18/03/2005 14:27 hs   
Qual o nome da sua tabela?
TblCArtao ou  TblCArtaoGrid?
voce esta colocando o nome da tabela errado amigo
   
Página(s): 1/4      PRÓXIMA »


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

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

HTML DESLIGADO

     
 VOLTAR

  



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