Início
Edmundo 26/11/2009, 21:39Estou usando o comando "OutputTo acReport" para criar um arquivo em Snapshot
Após digitar os dados no formulario, tem 2 opção [imprimir] ou [gerar arquivo], a impressão
esta funcionando bem, imprime apenas o registro atual, mas quando
solicitado para gerar o arquivo, vão todos os registros e não apenas o
atual. Sendo que no comando "OutputTo acReport" não tem a opção de
filtrar o registro desejado. Estou colocando a linha de código dos dois
casos e gostaria de uma ajuda para saber como filtrar o resgistro atual
para gerar o arquivo Snapshot.
só para constar, fiz trabalho de preguiçoso, os campos do form sao acoplado ao registro da tabela
Outra duvida é, tem como gerar arquivo PDF ?
Estou usando o Access 2003
-----------------------------------------------------------
Private Sub cmdImprimir_Click()
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
DoCmd.OpenReport "Hemograma relatorio", acViewPreview, , "[Formulários]![frmHemograma]![HemCodigo] = [HemCodigo]" --> AQUI filtra o registro
End Sub
------------------------------------------------------------
Private Sub CmdGerarArq_Click()
On Error GoTo Err_CmdGerarArq_Click
Dim stDocName As String
stDocName = "Hemograma relatorio"
DoCmd.OutputTo acReport, stDocName, acFormatSNP, "C:\Laboratorio\Relatorio.snp"
Exit_CmdGerarArq_Click:
Exit Sub
Err_CmdGerarArq_Click:
MsgBox Err.Description
Resume Exit_CmdGerarArq_Click
End Sub
--------------------------------------------------------------
Agradeço antecipadamente a contribuição de vocês!
Após digitar os dados no formulario, tem 2 opção [imprimir] ou [gerar arquivo], a impressão
esta funcionando bem, imprime apenas o registro atual, mas quando
solicitado para gerar o arquivo, vão todos os registros e não apenas o
atual. Sendo que no comando "OutputTo acReport" não tem a opção de
filtrar o registro desejado. Estou colocando a linha de código dos dois
casos e gostaria de uma ajuda para saber como filtrar o resgistro atual
para gerar o arquivo Snapshot.
só para constar, fiz trabalho de preguiçoso, os campos do form sao acoplado ao registro da tabela
Outra duvida é, tem como gerar arquivo PDF ?
Estou usando o Access 2003
-----------------------------------------------------------
Private Sub cmdImprimir_Click()
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
DoCmd.OpenReport "Hemograma relatorio", acViewPreview, , "[Formulários]![frmHemograma]![HemCodigo] = [HemCodigo]" --> AQUI filtra o registro
End Sub
------------------------------------------------------------
Private Sub CmdGerarArq_Click()
On Error GoTo Err_CmdGerarArq_Click
Dim stDocName As String
stDocName = "Hemograma relatorio"
DoCmd.OutputTo acReport, stDocName, acFormatSNP, "C:\Laboratorio\Relatorio.snp"
Exit_CmdGerarArq_Click:
Exit Sub
Err_CmdGerarArq_Click:
MsgBox Err.Description
Resume Exit_CmdGerarArq_Click
End Sub
--------------------------------------------------------------
Agradeço antecipadamente a contribuição de vocês!
