kerplunk
|
SÃO PAULO
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 18/03/2005 15:23 hs
A instrução que postei está correta, me dei ao trabalho de criar um db aqui com as mesmas características que vc passou, e funcionou. |
|
|
|
|
|
ATS
|
OURINHOS
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 18/03/2005 15:27 hs
O nome da tabela é:
tblCartaoGrid
E esta correto, testei o seu exemplo mas tambem não deu certo deu problema com a variavel intI e com o .textMatrix
|
|
|
|
ATS
|
OURINHOS
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 18/03/2005 15:56 hs
Fiz conforme esta no exemplo, e ja testei várias vezes de tudo quanto é jeito mas continua dando o mesmo 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
O nome da tabela e dos campos estão corretos, o que pode estar errado. Desde já agradeço a ajuda de todos.
|
|
TÓPICO EDITADO
|
|
|
|
carlão
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 18/03/2005 16:45 hs
Olá, faz tempo que não programo, mas acho que a sintaxe da instrução sql deve ser: select * from tblcartao ou select campo1, campo2, campo n from tblcartao e não tblcartao.* espero ter ajudado carlão |
|
|
|
|
|
Postada em 18/03/2005 18:48 hs
ATS substitua o nome de sua tabela, confira se o nome é esse mesmo. rstResumo.Open "SELECT tblCartaoGrid.*, (SELECT (tblCartaoGrid.Valor / tblCartaoGrid.NrResumo) FROM tblCartaoGrid) AS Parcela", cnnCartao, adOpenKeyset, adLockPessimistic, adCmdText Cógio substituído: rstResumo.Open "SELECT tblCartao.*, (SELECT (tblCartao.Valor / tblCartao.NrResumo) FROM tblCartao) AS Parcela", cnnCartao, adOpenKeyset, adLockPessimistic, adCmdText
Rodrigo Ferreira MSN - rjpferreira@hotmail.com
|
|
TÓPICO EDITADO
|
|
|
|
ATS
|
OURINHOS
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 18/03/2005 19:07 hs
Fiz desta forma e deu + ou - certo:
rstResumo.Open ("SELECT tblCartaoGrid.*, (tblCartaoGrid.Valor / tblCartaoGrid.NrPacelas) AS Parcela " _
& "FROM tblCartaoGrid WHERE tblCartaoGrid.NomeCartao LIKE '" & cboCartao & "' AND FecharResumo=True"), cnnCartao, adOpenKeyset, adLockPessimistic, adCmdText
Só que o codigo acima dividiu corretamente as parcelas, e preencheu o grid, com apenas um registro, e o que eu gostaria é que o grid fosse preenchido da seguinte forma:
Eu tenho uma venda no valor de R$ 561,25 dividida em 3 vezes, o que eu gostaria de fazer era que a instrução SQL pegasse esse valor no banco de dados dividisse o valor em tres parcelas iguais que daria R$ 187,08 e colocasse tres registro no grid em vez de um, tipo assim:
Registro principal, no banco de dados:
Nr. Resumo Valor Data Nr. de Parcelas
2 R$ 561,25 18/03/2005 3
Registro no grid:
Nr. Resumo Valor Data
2 187,08 18/03/2005
2 187,08 18/04/2005
2 187,08 18/05/2005
e que colocasse no campo data a data atual da compra e contasse mais 30 dias de prazo e colocasse as datas correspondentes no demais campos.
|
|
TÓPICO EDITADO
|
|
|
|
|
