dengan banyak mencoba memberikan solusi dan jawaban ke milis, ilmu pasti bertambah, karena persoalan yang ditanyakan di milis, rata-rata tidak diperoleh di kerjaan sehari-hari, sehingga mengasah kemampuan dan ketrampilan untuk menguasai lebih mahir access-nya.
ayo teruskan .... aksan kurdin On 7/28/2010 5:33 PM, nadhif_fakhri wrote: > Terima kasih banyak mas atas penjelasannya mudah-mudahan ilmunya > bertambah terus, akan saya coba, sekali lagi jangan bosan membimbing > yang awam ... > wassalam ... > > > S> Contoh event Button jika menggunakan wizard PrintKwitansi on click: > > S> Private Sub PrintKwitansi_Click() > S> On Error GoTo Err_PrintKwitansi_Click > > S> Dim stDocName As String > > S> stDocName = "Kwitansi"<--- ganti dengan nama report yg di inginkan > "[Report Invoice]" > S> DoCmd.OpenReport stDocName, acPreview, , "ID='" Me.ID > S> "'"<--- ganti dengan "[Kode Invoice]='" Me.[Kode Invoice] "'" > S> > S> Exit_PrintKwitansi_Click: > S> Exit Sub > > S> Err_PrintKwitansi_Click: > S> MsgBox Err.Description > S> Resume Exit_PrintKwitansi_Click > S> > S> End Sub > S> > S> Regards, > S> Sumiyanto > > > > > Best regards, > nadhif_fakhri > mailto:[email protected] > > > > ------------------------------------ > > SPAM IS PROHIBITEDYahoo! Groups Links > > > > > ------------------------------------ SPAM IS PROHIBITEDYahoo! Groups Links <*> To visit your group on the web, go to: http://groups.yahoo.com/group/belajar-access/ <*> Your email settings: Individual Email | Traditional <*> To change settings online go to: http://groups.yahoo.com/group/belajar-access/join (Yahoo! ID required) <*> To change settings via email: [email protected] [email protected] <*> To unsubscribe from this group, send an email to: [email protected] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
