Servermaster
20th November 2011, 02:30 AM
permisi semuanya, ane lagi ada project nih, cuma sekarang lagi stack di bagian crystal report
gw mao nampilin laporan penjualan per transaksi penjualan, pembelian gitu2, nah gw ada liat codingan temen gw, dia di reportnya codingnya kyk gini:
Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared
Public Class Report
Public flag As Integer
Private Sub Report_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim cryRpt As New ReportDocument
If (flag = 0) Then
Label1.Text = "No Order Penjualan"
cryRpt.Load("C:\Documents and Settings\Henry\My Documents\Visual Studio 2008\Projects\Bhineka\Bhineka\RptOrderPenjualan.rp t")
ElseIf (flag = 1) Then
Label1.Text = "No Order Pembelian"
cryRpt.Load("C:\Documents and Settings\Henry\My Documents\Visual Studio 2008\Projects\Bhineka\Bhineka\RptOrderPembelian.rp t")
End If
Dim crParameterFieldDefinitions As ParameterFieldDefinitions
Dim crParameterFieldDefinition As ParameterFieldDefinition
Dim crParameterValues As New ParameterValues
Dim crParameterDiscreteValue As New ParameterDiscreteValue
crParameterDiscreteValue.Value = TextBox1.Text
crParameterFieldDefinitions = cryRpt.DataDefinition.ParameterFields
crParameterFieldDefinition = crParameterFieldDefinitions.Item("Kode")
crParameterValues = crParameterFieldDefinition.CurrentValues
crParameterValues.Clear()
crParameterValues.Add(crParameterDiscreteValue)
crParameterFieldDefinition.ApplyCurrentValues(crPa rameterValues)
CrystalReportViewer1.ReportSource = cryRpt
CrystalReportViewer1.Refresh()
End Sub
End Class
kalo dijalanin sih, dia emang keliatan mau tampilin laporan berdasarkan kode transaksi berapa, tapi isi transaksinya ga ada datanya, jadi cuma muncul kdpenjualan, trus ga muncul deh yg kayak nama pelanggan, tanggal penjualan, barang dkk gt.
gw baca tuh coding, coba ngertiin jg ga ngerti2..
uda coba googling2, tp aneh2 semua dapetnya
tolong donk bantuan sesepuh, ajarin crystal report.. ane ga ngerti2
</div>
gw mao nampilin laporan penjualan per transaksi penjualan, pembelian gitu2, nah gw ada liat codingan temen gw, dia di reportnya codingnya kyk gini:
Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared
Public Class Report
Public flag As Integer
Private Sub Report_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim cryRpt As New ReportDocument
If (flag = 0) Then
Label1.Text = "No Order Penjualan"
cryRpt.Load("C:\Documents and Settings\Henry\My Documents\Visual Studio 2008\Projects\Bhineka\Bhineka\RptOrderPenjualan.rp t")
ElseIf (flag = 1) Then
Label1.Text = "No Order Pembelian"
cryRpt.Load("C:\Documents and Settings\Henry\My Documents\Visual Studio 2008\Projects\Bhineka\Bhineka\RptOrderPembelian.rp t")
End If
Dim crParameterFieldDefinitions As ParameterFieldDefinitions
Dim crParameterFieldDefinition As ParameterFieldDefinition
Dim crParameterValues As New ParameterValues
Dim crParameterDiscreteValue As New ParameterDiscreteValue
crParameterDiscreteValue.Value = TextBox1.Text
crParameterFieldDefinitions = cryRpt.DataDefinition.ParameterFields
crParameterFieldDefinition = crParameterFieldDefinitions.Item("Kode")
crParameterValues = crParameterFieldDefinition.CurrentValues
crParameterValues.Clear()
crParameterValues.Add(crParameterDiscreteValue)
crParameterFieldDefinition.ApplyCurrentValues(crPa rameterValues)
CrystalReportViewer1.ReportSource = cryRpt
CrystalReportViewer1.Refresh()
End Sub
End Class
kalo dijalanin sih, dia emang keliatan mau tampilin laporan berdasarkan kode transaksi berapa, tapi isi transaksinya ga ada datanya, jadi cuma muncul kdpenjualan, trus ga muncul deh yg kayak nama pelanggan, tanggal penjualan, barang dkk gt.
gw baca tuh coding, coba ngertiin jg ga ngerti2..
uda coba googling2, tp aneh2 semua dapetnya
tolong donk bantuan sesepuh, ajarin crystal report.. ane ga ngerti2
</div>