Using db = New test_dbEntities
strSQL = get_data_all("al_bget", "*", "abg_id", "desc")
Try
Dim dss = db.Database.SqlQuery(Of al_bget)(strSQL).ToList()
Dim rpt As New CrystalReport1
rpt.SetDataSource(dss)
Me.CrystalReportViewer1.ReportSource = rpt
Me.CrystalReportViewer1.Refresh()
Catch ex As Exception
MsgBox(ex.ToString)
End Try
End Using
ในส่วนของ Dim dss = db.Database.SqlQuery(Of al_bget)(strSQL).ToList() เอาไปใช้ยังไงครับ ขอบคุณครับ
Could not load file or assembly 'file:///C:\Program Files (x86)\SAP BusinessObjects\Crystal Reports for .NET Framework 4.0\Common\SAP BusinessObjects Enterprise XI 4.0\win64_x64\dotnet1\crdb_adoplus.dll' or one of its dependencies. The system cannot find the file specified.