VB.NET

VB.NET RSS

Help Regarding CrystalReports

Please support our VB.NET advertiser: Intel Parallel Studio Home

•

Join Date: Apr 2006

Posts: 24

Reputation: sravankolla is an unknown quantity at this point

Solved Threads: 0

sravankolla sravankolla is offline

Offline

Newbie Poster

Help Regarding CrystalReports

Jun 22nd, 2006

Hi all,
I am working with a project which includes Crystal Reports in Vb.Net and SQL Server2000 as Back end.

The code in button click is

 Help with Code Tags 
 VB.NET Syntax (Toggle Plain Text) 
str5 = "D:\AttendanceReport.rpt"
If Not IO.File.Exists(str5) Then
Throw (New Exception("Unable to locate report file:" & vbCrLf & str5))
End If
str6 = "SELECT * FROM attendance WHERE attendance.dates ='" & str & " ' and Empid in ( Select Empid from EmployeeDetails where DeptId in (Select Deptid from departments where deptname='" & Convert.ToString(cbxDept.SelectedItem) & "' ))"
 
MsgBox(str6)
da5 = New OleDbDataAdapter(str6, sDbConnection)
da5.Fill(ds5, "Attendance")
rst.SetDataSource(ds5)
Dim myReportDocument As ReportDocument
myReportDocument = New ReportDocument
myReportDocument.Load(str5)
myReportDocument.SetDataSource(ds5)
'Binding report with CrystalReportViewer 
CRViewer.ReportSource = myReportDocument
CRViewer.DataBind()
str5 = "D:\AttendanceReport.rpt"
If Not IO.File.Exists(str5) Then
Throw (New Exception("Unable to locate report file:" & vbCrLf & str5))
End If
str6 = "SELECT * FROM attendance WHERE attendance.dates ='" & str & " ' and Empid in ( Select Empid from EmployeeDetails where DeptId in (Select Deptid from departments where deptname='" & Convert.ToString(cbxDept.SelectedItem) & "' ))"

MsgBox(str6)
da5 = New OleDbDataAdapter(str6, sDbConnection)
da5.Fill(ds5, "Attendance")
rst.SetDataSource(ds5)
Dim myReportDocument As ReportDocument
myReportDocument = New ReportDocument
myReportDocument.Load(str5)
myReportDocument.SetDataSource(ds5)
'Binding report with CrystalReportViewer 
CRViewer.ReportSource = myReportDocument
CRViewer.DataBind()

I am getting an error as

'DataBind' is not a member of 'CrystalDecisions.Windows.Forms.CrystalReportViewer'.

I can't understand why the error is Coming
Please Help me

Thanks in advance

Sravan...

•

Join Date: Aug 2006

Posts: 22

Reputation: Amit007 is an unknown quantity at this point

Solved Threads: 0

Amit007

Offline

Newbie Poster

Re: Help Regarding CrystalReports

Aug 15th, 2006

I can help u. But u will have to mail me at coolamit0072003@hotmail.com . Mention this error in mail

•

Join Date: Aug 2006

Posts: 57

Reputation: Exelio is an unknown quantity at this point

Solved Threads: 0

Exelio

Offline

Junior Poster in Training

Re: Help Regarding CrystalReports

Aug 16th, 2006

Hi sravan,

When you are using crystal reports in vb.net,there is no method databind available.It is enough if you set the reportsource property to the correct crystal report.

Here is your code.
str5 = "D:\AttendanceReport.rpt"
If Not IO.File.Exists(str5) Then
Throw (New Exception("Unable to locate report file:" & vbCrLf & str5))
End If
str6 = "SELECT * FROM attendance WHERE attendance.dates ='" & str & " ' and Empid in ( Select Empid from EmployeeDetails where DeptId in (Select Deptid from departments where deptname='" & Convert.ToString(cbxDept.SelectedItem) & "' ))"

MsgBox(str6)
da5 = New OleDbDataAdapter(str6, sDbConnection)
da5.Fill(ds5, "Attendance")
rst.SetDataSource(ds5)
Dim myReportDocument As ReportDocument
myReportDocument = New ReportDocument
myReportDocument.Load(str5)
myReportDocument.SetDataSource(ds5)
'Binding report with CrystalReportViewer
CRViewer.ReportSource = myReportDocument

Hope this helps

Regards

Exelio