اشکال در گزارش گیری با کریستال ریپورت

[fateme63]

سلام.من واسه گزارش گیری از جدولم این کد ها رو داخل فرم لود نوشتم. اما در گزارشم فقط تیتر هارو میده که مثلا نام و فامیل و نام دوره هست و اطلاعات جدولمو نشون نمیده.مشکل کجاست؟
Dim con As New SqlConnection
con = New SqlConnection(“Data Source=.;Initial Catalog=model;Integrated Security=True”)
Dim dap As New SqlDataAdapter(“select name,famili,namedore from nomarat;”, con)
Dim dst As New DataSet
Dim oRpt As New CrystalReport1
con.Open()
dap.Fill(dst, “nomarat”)
con.Close()
oRpt.SetDataSource(dst)
Me.CrystalReportViewer1.ReportSource = oRpt
ممنون میشم کمکم کنید.

[bia2joker]

من از کد زیر استفاده می کنم و هیچ مشکلی نداره می تونی اینو امتحان کنی(البته جدول من Sick هستش)

Dim SickTa As New DataSet1TableAdapters.SickTableAdapter
Dim SickT As New DataSet1.SickDataTable
　
Private Sub F_Report_Sick_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim DSet As New DataSet1
SickTa.Fill(DSet.Sick)
Dim rpt As New Reporter_Sick
rpt.SetDataSource(DSet)
CrystalReportViewer1.ReportSource = rpt
End Sub

[fateme63]

من از کد زیر استفاده می کنم و هیچ مشکلی نداره می تونی اینو امتحان کنی(البته جدول من Sick هستش)

Dim SickTa As New DataSet1TableAdapters.SickTableAdapter
Dim SickT As New DataSet1.SickDataTable
　
Private Sub F_Report_Sick_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim DSet As New DataSet1
SickTa.Fill(DSet.Sick)
Dim rpt As New Reporter_Sick
rpt.SetDataSource(DSet)
CrystalReportViewer1.ReportSource = rpt
End Sub


ممنون از پاسختون اما من کد بالارو نوشتم اما از خط ششم کد که dim rpt as new reporter_sick بود خطا میگیره.اصلا reporter نمیشناسه. اما بقیه کد خطا نداره.ببخشید چون من اصلا با کریستال ریپورت کار نکردم.ممکنه سوالاتم واضح باشه اما من بلد نباشم

[bia2joker]

توجه کنید که من با Dataset به بانک وصل شدم و در ضمن فرم گزارش که با کریستال ریپورت طراحی کردم اسمش را به reporter_Sick تغییر دادم که شما باید به جای reporter_Sick از CrystalReport1 استفاده کنید