Ama
|
UBERLÂNDIA
MG - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 26/05/2004 13:33 hs
troque tbors.moveMin por nTab.F I R S T deve ser emendado aqui ficou assim porque o campo muda sozinho o que escrevi de ser o que aconteceu com a resposta do Roberto. Não vou tentar corrigir de novo seria +- tbors.MovePrimeiro em inglês e Roberto num é fraco não |
|
TÓPICO EDITADO
|
|
|
|
|
|
FatBoy
|
LONDRINA
PR - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 26/05/2004 13:38 hs
Acredito que o erro esta ocorrendo pq o select não esta retornando nenhum registro e se vc tentasse antes de fazer qualquer coisa testar se existem registros para esta OS Private Sub MontaOS()
Dim BdLc As DAO.Database
Dim TbOrs As DAO.Recordset Dim Ln5
Ln5 = 4
Set BdLc = OpenDatabase("C:EstoqueMateriais.mdb")
Set TbOrs = BdLc.OpenRecordset("SELECT * FROM Baixas WHERE Os='1'", dbOpenSnapshot) If Not tbOrs.Eof Then
TbOrs.MoveMin
Do While Not TbOrs.EOF
Ln5 = Ln5 + 1
Plan421.Range("C" & Ln5 + 1) = TbOrs("Os")
Ln5 = Ln5 + 1
TbOrs.MoveNext
Loop End If
End Sub
|
|
|
|
Roßerto
|
SAO PAULO
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 26/05/2004 15:05 hs
é mesmo, eu tenho certeza que eu escrevi F I R S T
mas a resposta do Fatboy está corretissima
Fatboy, por onde andavas ?
Roberto
|
|
|
|
FatBoy
|
LONDRINA
PR - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 26/05/2004 15:27 hs
Muito trabalho amigo , ultimamente to meio sem tempo pra Internet..mas aos poucos estou retornando..... |
|
|
|
Irenko
|
BELO HORIZONTE
MG - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 26/05/2004 16:26 hs
No campo OS da Tabela Baixas existe dados. Exemplo.: Campo Codigo = 000434 01 pc Campo Os = 1237 Campo Codigo = 000434 2 pc Campo Os = 1062 No relatorio pretendo montar assim: Código OS 000434 1237 1062 Para geração do código tive que agrupar assim para mostrar so uma vez o código: Set Tbbaixas = BdBaixas.OpenRecordset("SELECT CODIGO, Sum(SAIDA) AS TOTAL FROM BAIXAS GROUP BY CODIGO", dbOpenSnapshot) Será que eu tenho que agrupar o Campo OS também?Como? |
|
|
|
Ama
|
UBERLÂNDIA
MG - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 27/05/2004 13:15 hs
manda a tabela o fragmento de código e explica direitinho o que quer q a gente resolve amauriudimg@aol.com |
|
|
|
