Postada em 21/03/2005 13:01 hs
Fiz desta form:rstResumo.Open "Select tblCartaoGrid.Data, tblCartaoGrid.NrResumo, tblParcela.parcela " _& "(tblCartaoGrid.valor / tblCartaoGrid.NrParcelas) as Valor, dateadd(day, ((tblParcela.Parcela -1) * 30), tblCartaoGrid.data) as DataPagamento from tblCartaoGrid, tblParcela " _& "where tblParcela.Parcela < tblCartaoGrid.NrParcela", cnnCartao, adOpenKeyset, adLockPessimistic, adCmdTexte continua o mesmo erro.
|
