Banco de dados access - imagens


	Fórum
	Visual Basic

Responder

Voltar

Autor

Assunto: Banco de dados access - imagens

Douglas
não registrado

Postada em 29/05/2004 03:41 hs

Oi...Sou iniciante e novo aqui no forum...programo em vb faz 6 meses e a minha duvida é a seguinte:

como criar campos que armazenem imagens?

se não for possivel, existe alguma forma de armazenar imagens?

Muito obrigado!

Marcos
não registrado

Postada em 29/05/2004 05:10 hs

bem douglas, eu tbm sou iniciante, mas eu fiz assim:

na minha tabela eu criei um campo tipo CaminhoImagem q armazena, lógico, o caminho da imagem (c:pasta1foto.bmp). ai qdo eu quero jogar na tela eu faço: Image1.picture = loadpicture(CaminhoImagem). espero ter esclarecido. qualquer coisa, manda um e-mail

T+

Tekki

UBERLÂNDIA
MG - BRASIL

Postada em 29/05/2004 11:04 hs

Amigo, pega o exemplo: Visualizador de Imagem em BD(Salva).zip e gerar código automático.zip

http://www25.brinkster.com/asystem/downloads/downloads.html

Dependendo do tamanho das fotos ou da quantidade de fotos é melhor você usar uma banco só para elas.

Eu uso assim, um para os dados e outro para os meus jpg´s que são os skins para os meus forms neste caso eu sei a quantidade de imagens que terá no banco.

Quando o cliente incluirá a foto, como um cadastro de produtos com foto prefiro guardar no HD pois não sei a quantidade, portanto gravo no HD e uso o loadpictre.

Exemplo:

Primeiro eu permito que a foto seja aberta.

imgFoto.Picture = LoadPicture(CaminhoNomeDoArquivo.jpg ou bmp ...)

Depois eu salvo a foto escolhida na minha pasta.

sOrigem = CaminhoNomeDoArquivo.jpg

sDestino = Caminho + nome da imagem

FileCopy sOrigem, sDestino

Os skins eu uso num mdb pois sei a quantidade, ou seja tenho o controle. Já as fotos dos produtos ou clientes eu não tenho controle pois não sei quantas fotos serão gravadas e por isto tenho uma pasta onde salvo os jpg, gif, bmp .... ok?

Obs. Amigos, não é obrigatório mas se cadastrem no site.

Se não se cadastrarem vamos ajudar da mesma forma eu só ficaria grato se fizerem o cadastro.

Douglas
não registrado

Postada em 29/05/2004 13:22 hs

Valeu pessoal!!

vcs me ajudaram bastante!

Shel

GOIÂNIA
GO - BRASIL

Postada em 29/05/2004 15:11 hs

Douglas desculpa por usar seu post, mas Tekki tenho a seguinte dúvida:para abrir a imagem uso o comando abaixo, depois para pegar o caminho de origem da figura como faço?

Private Sub Image1_Click(Index As Integer)

On Error Resume Next     'Evita exibição de erro gerado pelo Visual Basic, caso você cancele a abertura de uma imagem
With dlgfoto1(0)      'Agiliza a programamção, não sendo necessário digitar a palavra CommonDialog1, cada vez que For necessário, bastanto a penas inserir um ponto que As propeidades serão aceitas
        .Filter = "Imagens JPG| *.jpg"   'Filtra os arquivos a serem exibidos no CommonDialog, permitindo somente visualizar As extensões especificadas
        .ShowOpen    'Abre a caixa de diálogo comum (CommonDialog)
        Image1(0).Picture = LoadPicture(.FileName)    'Exibe a imagem selecionada na Caixa de Diálogno controle Image1.
End With    'Finaliza a instrução With

End Sub

O problema é? como faço para no sorigem (abaixo) colocar o caminho da figura?

tentei colocar sorigem = Image1(0).Picture, mas não deu certo.

sOrigem = CaminhoNomeDoArquivo.jpg

sDestino = Caminho + nome da imagem

FileCopy sOrigem, sDestino

Ats,

Marcelo

Shel
não registrado

Postada em 30/05/2004 20:58 hs

Página(s): 1/2 PRÓXIMA »

Seu Nome:
Seu eMail:		ALTERAR PARA MODO HTML
Mensagem: [:)] = [:P] = [:(] = [;)] = HTML DESLIGADO

VOLTAR