DOCUMENTO COM FOTO

GOLVEIAR 13/01/2011 14:16:05
#362188
Ola galera blz!
Estou fazendo um sistema em vb6 que cria o documento em word. Ate ai blz so que é uma carteinhia e tenho que criar com a foto. como faço para criar o documento com foto. o codigo e assim:

Set objWord = New Word.Application
objWord.Documents.Open App.Path & [Ô]\Carteirinha\Carteirinha.doc[Ô]
objWord.Visible = True
objWord.WindowState = wdWindowStateMaximize

Call Troca([Ô]@Foto[Ô], frmAssociados.imgFoto.Picture)
Call Troca([Ô]@Nome[Ô], frmAssociados.txtNome.Text)
Call Troca([Ô]@Matricula[Ô], frmAssociados.txtMatricula.Text)
Call Troca([Ô]@Pai[Ô], frmAssociados.txtPai.Text)
Call Troca([Ô]@Mae[Ô], frmAssociados.txtMae.Text)
Call Troca([Ô]@Funcional[Ô], frmAssociados.txtFuncional.Text)
Call Troca([Ô]@RG[Ô], frmAssociados.txtRG.Text)
Call Troca([Ô]@DataNascimento[Ô], frmAssociados.txtDataNascimento.Text)

Set objWord = Nothing [ô]Libera a memória

cria certo so que não coloca a foto
RODRIGOFERRO 13/01/2011 16:18:14
#362198
tem certeza que esse Call Troca, troca imagens tambem ? acho que é so para strings hein...

Veja esse exemplo do Macoratti que funciona, com certeza serve pra voce também... link abaixo

VB 6 - Gerador de Currículos (Curriculum Generator)



Abraços
GOLVEIAR 21/01/2011 19:53:12
#363023
mas as informações estão em um db que carrega no imgFoto
GOLVEIAR 23/01/2011 11:32:50
#363143
E galera não consegui colocar a imagem do imgFoto no word
Tópico encerrado , respostas não são mais permitidas