[Resolvido]Ajuda com VBA e SQL no formulario

Olá estou tentando fazer o seguinte.. Tenho uma tabela que guarda 9 imagens e quero q as imagens apareçam conforme eu mude de página, ainda não consegui nem colocar as 9 imagens, por que preciso o caminho das imagens de acordo do lugar certo.

Eu tenho uma tabela que guarda uma lista de produtos e esses produtos tem uma posição certa para aparecer.

Acredito que o único jeito seja colocar um código SQL dentro de uma macro para ele fazer uma pesquisa e achar cada um deles para inserir.

Só que nunca usei SQL puro no Access, não na parte do VBA, estou quebrando a cabeça para tentar achar uma resposta, só que mesmo fazendo a pesquisa não sei como pegar a pesquisa e atribuir ela em campo, como se fosse colocar ela em uma variável.
Alguém poderia me dar uma luz?

Vlwwws!

podes publicar BD para verificar?
Abraço

O BD voçê fala o arquivo do Acess ou as tabelas?

O que queria fazer é o seguinte:
As imagens serão exibidas através de uma macro que coloca o caminho da foto no computador.
Ex: Imagem.Picture = "C:\Aquivos de programas\imagens\" + nome da imagem.
Eu consigo colocar uma imagem pegando o valor do campo produto por exemplo, mas no caso esse valor já esta no formulário por isso fica fácil.
No entanto eu gostaria de mostrar 9 imagens ao mesmo tempo, ou seja não tem como pegar de um campo.
Essa Prateleira pega as informações de um outra tabela "Estoque".

Eu estou tentando fazer o seguinte, ao abrir o formulário ele executa um evento com uma macro. Nessa macro teria um codigo sql que faria o seguinte:
Procura todos os produtos da tabela prateleira da fileira selecionada (campo fileira) e armazena eles de acordo com a posicao, [1][1]...
Só que não sei como fazer essa pesquisa atribuindo os valores aos campos pelo sql.

se quiseres colocar 9 fotos tens de criar 9 campos, é simples. se consegues inserir um, o resto é so multiplicar, entendes?

Mas no caso não tenho os 9 campos, pensando nisso fiz o seguinte, coloquei um subformulario de uma consulta que fiz, onde mostra apenas os produtos no estoque daquele local específico, aí aparecem os campos por linha, mas surge outro problema.

Eu só consigo pegar o valor da primeira linha da tabela, estou pesquisando como pegar o valor de outra linha.

Mas teria mais um problema, a posicao do produto tem que ser o mesmo da imagem. Mas vou tentar um problema de cada vez, eu poderia ordenar a posicao, mas teria o problema de mais de um produto na mesma posição...

Acho que não vou conseguir fazer o que eu quero

Publica base para poder ajudar entao.
Mas em access 2003 que no trabalho e o que tenho.
Abraco

Estou postando o banco, gostaria de colocar automaticamente as 9 imagens na tela de acordo com as posições deles, e caso não tenha nada na posição, deixar sem imagem.

EDIT: Apanhei para upar o arquivo pelo site.

http://www.mediafire.com/download/47e6okmlrnrlwnn/Loja.rar

ve como se poe a imagem no form, depois é fazeres o mesma para as outras.
o codigo é simples.

abraço

Opa acabei postando o código antes de alterar, no evento que pega a imagem, ele tem que pegar de acordo com a pesquisa.

No caso estava assim:

ImageEsq1_1.Picture = endereco & "\" + ([Form_SubForm Consulta Estoque].Estoque_nome.Column(1)) + ".jpg"

Ele pega a informação de qual foto colocar de acordo com a tabela de consulta de estoque. Porém só consigo pegar a primeira linha. E ele precisava pegar de acordo com a posição.

EX:
ImageEsq1_1 tem que ser a foto que esta na posicao 11
ImageEsq1_2 tem que ser a foto que esta na posicao 12
e assim por diante até a foto da posicao 33

PS>: Obrigado pelo comando do path, não conhecia!

JgabrielChaves
o objectivo e isso mesmo, eu fiz apenas o primeiro, o resto deixei para tu fazeres
é seguires o mesmo exemplo como está no primeiro, entendes?

ou seja
ImageEsq1_1.Picture = endereco & "\nome do fichero"
ImageEsq1_2.Picture = endereco & "\nome do fichero"
etc......

assim se aprende
Abraço

Opa Valeu pela paciencia Oscar, mas ainda não é o que eu queria, eu conseguia colocar imagem nos 9 campos, mas o problema é que o nome da imagem não é sempre o mesmo.
Eu preciso que ele pegue o nome do produto de acordo com a fileira e posicao do produto. Se você ver no form tem um campo onde vou mudar de fileira, e assim as imagens seriam carregadas novamente, mas de acordo com a fileira.

Quando eu abro o formulário ele está na fileira 1, então ele teria que procurar pelo estoque os produtos que estão na fileira 1, e colocar eles de acordo com as posicoes...
O produto que estiver na posição 1-1, vai ficar na imagem1-1, entendeu? e assim por diante. Esse produto pode mudar, não vai ser sempre Calça na posição 11

sendo assim fazes o seguinte:

o produto que for para por na posição 1-1 dás o nome de (Exemplo1-1)
e para aparecer na posição correcta fazes :

Imagem1-1.picture = endereco & "" & Trim(Str(Fileira)) & "-" & Trim(Str(Posição))

assim vai buscar a foto que tem o nome "ExemploFilerira-Posição!

os valores 1-1 referece à fileria e posição certo?

Abraço

Opa não conhecia esse Trim, mas pelo o que testei ele pega o valor da coluna especificada, no caso não consigo escolher a linha, e mesmo assim teria que colocar o valor específico da linha, o que seria ruim já que ele pode mudar de lugar. Vi um outro tópico aqui no forum com um cara que está com um problema parecido com o meu, e vendo o código dele descobri o comando DLookUp, pesquisei e fiz alguns testes.

Com ele consegui pegar o valor que queria, só que ele pegava um Id do produto, ao invés do nome dele, provavelmente pelo campo Nome ser uma pesquisa da tabela produto.
Então criei uma váriavel chamado busca As Interger para receber esse ID

busca = DLookup("[Nome]", "Estoque", "[Posicao] = 11")

Como aqui ele pega o Id e não o nome, usei novamente o DLookup para fazer uma outra pesquisa na tabela produto e pegar o nome dele.


ImageEsq1_1.Picture = endereco & "\" + DLookup("[Nome]", "Produto", "[IDProduto] =" & busca) + ".jpg"

Deu certo, mas acredito que de para fazer isso sem ter que criar a váriavel e fazer duas pesquisas, mas ainda não consegui, estou pesquisando sobre, queria algo como DLookup("[Nome].Column(1)...) para pegar o nome direto, mas não deu certo os testes... Mas pelo menos está resolvendo aparentemente.

o que quer dizer 1-1, ou seja
isso significa o que na tabela ou form?
abraço

Preciso renomear os campos, que ta confuso...

esse 1-1 seria como se fosse uma matriz. Tenho 9 campos de imagens

[11][12][13]
[21][22][23]
[31][32][33]

Os Campos de imagens tem esse nome ImageEsq1-1... vou trocar para Imagem1-1, esse "Esq", era pq no começo queria fazer duas páginas por por tela.

Na tabela Estoque o produto tem um campo Posicao que estaria seria para poder saber em qual posição ele está na matriz.

ve o exemplo que te envio de depois diz alguma coisa.

Abraço

Opa ainda não entendi como usar o Trim nessa situação. Gostaria de entender, mas no caso deu certo com o Dlook. Se você tiver paciência de me explicar o que você fez com o Trim agradeço. E obrigado por tudo

Se reparares no nome da foto, eu alterei para o programa ir buscar a imagem com o mesmo campos do form, entendes?