Kod:
Private Sub Komut109_Click()
on error resume next ' Bu satırı eklersen sıkıntı olmaz
DoCmd.OpenReport "EK-9 BELGESİ", acViewPreview
DoCmd.RunCommand acCmdPrint
DoCmd.Close acReport, "EK-9 BELGESİ"
End Sub
Private Sub Komut109_Click()
on error resume next ' Bu satırı eklersen sıkıntı olmaz
DoCmd.OpenReport "EK-9 BELGESİ", acViewPreview
DoCmd.RunCommand acCmdPrint
DoCmd.Close acReport, "EK-9 BELGESİ"
End Sub
Bu Konudaki Yorumlar |
yazdırma butonu hakkında - Yazar: perisanoglu - 09/06/2010, 17:34
Cvp: yazdırma butonu hakkında - Yazar: Kur@l - 09/06/2010, 20:12
Cvp: yazdırma butonu hakkında - Yazar: perisanoglu - 09/06/2010, 21:03
|