Bom dia!
venho solicitar novamente a ajuda de vcs
seguinte, tenho um sistema de vendas que ao gerar uma cotação o sistema verifica o usuário que fez a cotação e busca na rede a imagem em PNG que representa sua assinatura e mostra no relatório, até aqui tudo certo. O problema esta quando eu gero diretamente em PDF, pois sistema sava o arquivo mas não verifica qual a assinatura referente ao o usuário que fez a cotação e mostra apenas a primeira assinatura cadastrada no sistema.
segue abaixo o botão que uso para exportar a cotação com a imagem da assinatura
venho solicitar novamente a ajuda de vcs
seguinte, tenho um sistema de vendas que ao gerar uma cotação o sistema verifica o usuário que fez a cotação e busca na rede a imagem em PNG que representa sua assinatura e mostra no relatório, até aqui tudo certo. O problema esta quando eu gero diretamente em PDF, pois sistema sava o arquivo mas não verifica qual a assinatura referente ao o usuário que fez a cotação e mostra apenas a primeira assinatura cadastrada no sistema.
segue abaixo o botão que uso para exportar a cotação com a imagem da assinatura
- Código:
Private Sub btoEnviarCotacao_Click()
On Error GoTo PROC_ERR
'Aqui verifica a assinatura do usuário
[Report_tblInformacoes sub-relatório1].imgPDF_cotacao.Picture = Form_frmEndSistema.EnderecoRelatorio & "\Assinaturas\" & Form_frmCotacao.UsuarioCotacao & ".png"
[Report_tblInformacoes sub-relatório1].Requery
DoCmd.Close acForm, "RelatorioCotacao", acSaveYes
'Salva Relatório na pasta abaixo
DoCmd.OutputTo acOutputReport, "RelatorioCotacao", acFormatPDF, Form_frmEndSistema.EnderecoRelatorio & "\Cotação\" & "Cotação - " & Form_frmCotacao.NumeroCotacao & ".pdf", False
Shell "C:\WINDOWS\explorer.exe """ & Form_frmEndSistema.EnderecoRelatorio & "\Cotação\", vbNormalFocus
PROC_EXIT:
Exit Sub
PROC_ERR:
DoCmd.Hourglass False
MsgBox Err.Number & " - " & Err.Description
Resume PROC_EXIT
End Sub