E POSSIVEL JOGAR UM PRINTFORM EM UM ARQUIVO ?

KNILSSON 31/07/2009 02:15:18
#318414
Outra duvida minha:

é possivel gravar um printform em um arquivo para que ele possa ser enviado por e-mail ?

Meu problema é que criei um relatorio em um form e uso o printform para mandar para impressora.
Agora tão querendo que o relatorio seja gravado em um arquivo para ser mandado por e-mail.
Alguem sabe como se faz isso ?

Novamente agradeço qualquer ajuda.
TECLA 31/07/2009 09:55:23
#318432
Uma sugestão inicial, seria você instalar uma IMPRESSORA VIRTUAL na máquina (PrimoPDF, CutePDF etc) e selecionasse a mesma na impressão.

O arquivo final estaria em uma extensão segura (PDF) e depois é só anexar e enviar o e-mail(CDOSYS, MAPI, WINSOCK etc).
MARCELO.TREZE 31/07/2009 11:04:36
#318439
A solução milagrosa, rs


no form Cole

Option Explicit
Private Declare Sub keybd_event Lib [Ô]user32[Ô] (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Const VK_SNAPSHOT = &H2C

Private Sub Command1_Click()
Call keybd_event(vbKeySnapshot, 1, 0, 0)
DoEvents
SavePicture Clipboard.GetData(), InputBox([Ô]Local de Arquivo[Ô])
End Sub


eu coloquei um botão para capturar a tela ativa, então o foco deve estar no relat[ô]rio na hora de se copiar

no exemplo acima, quando surgira inputbox [Ô]Local do arquivo[Ô] vc deve informar o caminho completo, exemplo: C:\ImagemTeste.jpg

e boa sorte
Tópico encerrado , respostas não são mais permitidas