Irenko
|
BELO HORIZONTE
MG - BRASIL
|
|
Postada em 24/05/2004 10:31 hs
O que ha de errado nesta instrução: Da mensagem que o campo Descrição não esta na coleção. Set TbLc = BdBaixas.OpenRecordset("SELECT BAIXAS.*,LOCALIZACAO.DESCRIÇÃO FROM BAIXAS,LOCALIZACAO WHERE LOCALIZACAO.CÓDIGO=BAIXAS.CODIGO", dbOpenSnapshot)
TbBaixas.MoveMin Do While Not TbBaixas.EOF
Ln3 = Ln3 + 1
Plan421.Range("A" & Ln3) = TbBaixas("Codigo")
Plan421.Range("E" & Ln3) = TbBaixas("TOTAL")
Plan421.Range("C" & Ln3) = TbLc("Descrição")
Ln3 = Ln3 + 1 TbBaixas.MoveNext
Loop |
|
|
|
|
|
Rodrigo Baia
não registrado
|
|
Postada em 25/05/2004 10:41 hs
Não acostume em criar campos de bancos de dados assim DESCRIÇÃO pode ser isto |
|
|
|
Rochª
|
RIO DE JANEIRO
RJ - BRASIL
|
|
Postada em 25/05/2004 12:35 hs
Esse primeiro codigo tem acento mesmo, a descricao tambem. Seria melhor voce não usar acento pois isso pode gerar problema e dificulta a manutencao.
__________________________________________________________________________ Qualquer coisa post Rochª
|
|
|
|
Ama
|
UBERLÂNDIA
MG - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 25/05/2004 13:45 hs
Se quiser utilizar acento ou nomes separados use [] na consulta Set TbLc = BdBaixas.OpenRecordset("SELECT BAIXAS.*,LOCALIZACAO.[DESCRIÇÃO] FROM BAIXAS,LOCALIZACAO WHERE LOCALIZACAO.[CÓDIGO]=BAIXAS.CODIGO", dbOpenSnapshot) 'palavras separadas "select tb.[codigo caixa] from tb" |
|
|
|
