เราสร้าง Crystal Report จาก VB2008 และใช้ฐานข้อมูลจาก SQL Server 2005 คะ
พอสร้างCrystal Report ใน VB แล้ว มันขึ้นแสดงรายงานแค่ข้อมูลที่มีอยู่แล้วในฐานข้อมูล
เมื่อเพิ่มข้อมูลหลังจากที่สร้าง Report แล้ว ข้อมูลไม่ขึ้นคะ
ยกตัวอย่างเช่น ตอนแรกในฐานข้อมูลเราเก็บ รหัสการขายที่1 กับ 2 อยู่แล้ว >> สร้างCrystal Report >> ขึ้นรหัสการขายที่1กับ2ว่าขายอะไรไปบ้าง
แต่พอเพิ่มข้อมูลรหัสการขายที่3 กดแสดงรายงาน มันไม่แสดงรหัสการขายที่3 ให้คะ แสดงให้แค่ 1 กับ 2 จะทำยังไงดีคะ
ฐานข้อมูล
ตาราง Sale : sale_no(PK), sale_date, cus_no
ตาราง Sale_Detail : sale_no(PK), pro_no, price, amount
หน้าจอการแสดงรายงาน
กดปุ่มออกใบเสร็จที่หน้าForm:Sale
แล้วจะเด้งหน้าForm:ReceiptReport_View เพื่อให้กรอกเลขที่ใบเสร็จ ในช่อง TextBox1 และกดปุ่มแสดง ที่ปุ่ม Button1
ด้านล่างเป็น CrystalReportViewer1 แสดงผลรายงานค่ะ (อยู่ในForm:ReceiptReport_View อันเดียวกัน)
โค้ดหน้าForm:ReceiptReport_View ค่ะ
Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared
Imports System.Data.SqlClient
Imports System.Data
Public Class ReceiptReport_View
Dim strConnection As String
Dim Conn As SqlConnection
Dim adapter As SqlDataAdapter
Dim strAdd As String
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
strConnection = "Data Source=FLAME\SQLEXPRESS; Initial Catalog=Project; Integrated Security=True"
Conn = New SqlConnection(strConnection)
Conn.Open()
Dim paramValue As New ParameterDiscreteValue
paramValue.Value = Me.TextBox1.Text
Dim paramfld As New ParameterField
paramfld.ParameterFieldName = "sale_no"
paramfld.CurrentValues.Add(paramValue)
Dim paramfields As New ParameterFields
paramfields.Add(paramfld)
CrystalReportViewer1.ParameterFieldInfo = paramfields
CrystalReportViewer1.ReportSource = New ReceiptReport()
End Sub
Private Sub ReceiptReport_View_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
End Class
รบกวนช่วยทีคะ โปรเจคจะเสร็จแล้ว เหลือติดออกReport นี่แหละคะ
ขอความร่วมมือด้วยนะคะ ขอบคุณมากคะ
ช่วยด้วยคะ !! Crystal Report ใน VB2008 ไม่แสดงข้อมูลที่พึ่ง Update ในฐานข้อมูล
พอสร้างCrystal Report ใน VB แล้ว มันขึ้นแสดงรายงานแค่ข้อมูลที่มีอยู่แล้วในฐานข้อมูล
เมื่อเพิ่มข้อมูลหลังจากที่สร้าง Report แล้ว ข้อมูลไม่ขึ้นคะ
ยกตัวอย่างเช่น ตอนแรกในฐานข้อมูลเราเก็บ รหัสการขายที่1 กับ 2 อยู่แล้ว >> สร้างCrystal Report >> ขึ้นรหัสการขายที่1กับ2ว่าขายอะไรไปบ้าง
แต่พอเพิ่มข้อมูลรหัสการขายที่3 กดแสดงรายงาน มันไม่แสดงรหัสการขายที่3 ให้คะ แสดงให้แค่ 1 กับ 2 จะทำยังไงดีคะ
ฐานข้อมูล
ตาราง Sale : sale_no(PK), sale_date, cus_no
ตาราง Sale_Detail : sale_no(PK), pro_no, price, amount
หน้าจอการแสดงรายงาน
กดปุ่มออกใบเสร็จที่หน้าForm:Sale
แล้วจะเด้งหน้าForm:ReceiptReport_View เพื่อให้กรอกเลขที่ใบเสร็จ ในช่อง TextBox1 และกดปุ่มแสดง ที่ปุ่ม Button1
ด้านล่างเป็น CrystalReportViewer1 แสดงผลรายงานค่ะ (อยู่ในForm:ReceiptReport_View อันเดียวกัน)
โค้ดหน้าForm:ReceiptReport_View ค่ะ
Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared
Imports System.Data.SqlClient
Imports System.Data
Public Class ReceiptReport_View
Dim strConnection As String
Dim Conn As SqlConnection
Dim adapter As SqlDataAdapter
Dim strAdd As String
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
strConnection = "Data Source=FLAME\SQLEXPRESS; Initial Catalog=Project; Integrated Security=True"
Conn = New SqlConnection(strConnection)
Conn.Open()
Dim paramValue As New ParameterDiscreteValue
paramValue.Value = Me.TextBox1.Text
Dim paramfld As New ParameterField
paramfld.ParameterFieldName = "sale_no"
paramfld.CurrentValues.Add(paramValue)
Dim paramfields As New ParameterFields
paramfields.Add(paramfld)
CrystalReportViewer1.ParameterFieldInfo = paramfields
CrystalReportViewer1.ReportSource = New ReceiptReport()
End Sub
Private Sub ReceiptReport_View_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
End Class
รบกวนช่วยทีคะ โปรเจคจะเสร็จแล้ว เหลือติดออกReport นี่แหละคะ
ขอความร่วมมือด้วยนะคะ ขอบคุณมากคะ