New database ms access Trick Technic printing current record
Simaple view first page
contoh database ms access halaman pertama
Contoh or sample current id record will be single print
atau cuman hanya print yg di harapkan
dan ini untuk bisa print semuannya tanpa Event code di print button
Dan INi Codennya Copy Paste Saja biar cepat di print button yg anda harapkan
Private Sub Command9_Click()
Dim strReportName As String
Dim strCriteria As String
If NewRecord Then
MsgBox "This record contains no data. Please select a record to print or Save this record." _
, vbInformation, "Invalid Action"
Exit Sub
Else
strReportName = "sample"
strCriteria = "[ID]= " & Me![ID]
DoCmd.OpenReport strReportName, acViewPreview, , strCriteria
End If
End Sub
Atau Bila Perlu And download sample Ms. Access Current Print
https://drive.google.com/file/d/0B5WQmQ9o0e5hb1MyMDZvcDBYVU0/view
ReplyDeletePrivate Sub Command9_Click()
Dim strReportName As String
Dim strCriteria As String
If NewRecord Then
MsgBox "This record contains no data. Please select a record to print or Save this record." _
, vbInformation, "Invalid Action"
Exit Sub
Else
strReportName = "sample"
strCriteria = "[ID]= " & Me![ID]
DoCmd.OpenReport strReportName, acViewPreview, , strCriteria
End If
End Sub
jika ada 2 key, misalnya ada ID dan Nama yang harus dibuat filternya bagaimana cara penulisan codenya ya gan?
ReplyDelete