COMO CRIAR UM INDICE COM MAIS DE UM CAMPO ?

KNILSSON 04/03/2010 11:32:16
#336033
Oi!
Estou com um problema: preciso imprimir um relatorio de vendas por ordem de pedido e de codigo de produto, mas só consigo abrir o BD em ordem de pedido. Vejam como eu estou fazendo :

Set dados = OpenDatabase(App.Path & [Ô]\dados.mdb[Ô])
Set tbpedido = dados.OpenRecordset([Ô]pedido[Ô], dbOpenTable)
tbpedido.Index = [Ô]numero[Ô]

Alem do numero tenho que imprimir por ordem do codigo do produto (os dois campos estão como indexados no Acess).
Alguem sabe como eu faço pra abrir o BD com dois indeces ?

Agradeço desde já a qualquer ajuda.
SINKERTEC 04/03/2010 11:45:41
#336035 Resposta escolhida


Meu caro


Basta colocar o segundo campo na linha de baixo por exemplo:

IndCodVendaCliente CodVenda
Cliente
outroindice OutroCampo

boa sorte
KNILSSON 04/03/2010 12:24:27
#336039
Eu fiz desse jeito, mas não deu certo:

Set dados = OpenDatabase(App.Path & [Ô]\joia.mdb[Ô])
Set tbpedido = dados.OpenRecordset([Ô]pedido[Ô], dbOpenTable)
tbpedido.Index = [Ô]numero[Ô]
tbpedido.Index = [Ô]codigo[Ô]

Assim sai só por ordem de codigo. Será que falta mais alguma coisa ?
SINKERTEC 04/03/2010 12:33:12
#336041


N cara


No access vc tem q criar o indice.. abra a tabela no modo estrutura, vai no menu exibir indices... e cria como eu falei

aí no vb...vc joga o nome q vc deu lá

entendeu?
KNILSSON 04/03/2010 12:51:03
#336042
BELEZA !!! Funcionou certinho!

Valeu cara! Tô encerrendo o topico e mandando os creditos pra vc.

BYE!
Tópico encerrado , respostas não são mais permitidas
Voltar