读书人

什么考微的例子也不能在水晶表

发布时间: 2012-01-07 21:41:55 作者: rapoo

什么考微的例子也不能在水晶表中示据呢?
程序是WINFORM的程序,据是mysql,我是想示出主表,
考了微中文社的李洪根的例子,http://www.microsoft.com/china/community/Column/26.mspx
但是不能取出据,真是郁啊! 我用的是VB.NET2005
代如下:
Imports System.Data
Imports System.Data.odbc
Imports CrystalDecisions.CrystalReports.Engine
Public Class testViewer
Inherits System.Windows.Forms.Form

Dim tableMaster As New DataTable( "tablemaster ") '主表
Dim tabledetail As New DataTable( "tabledetail ") '表

Dim oRpt As New testCrystalReport

Dim dsdataSet As New testDataset '建立据集
Private Sub testViewer_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load


Dim str As String = "DRIVER={MySQL ODBC 3.51 driver}; SERVER=localhost;DATABASE=mybase;UID=myname;PASSWORD=sa;OPTION=3 "

Dim CN As New OdbcConnection(str)

CN.Open()

'取主表
Dim daOrders As New OdbcDataAdapter( "select * from tablemaster ", CN)

'取表
Dim daDetails As New OdbcDataAdapter( "select * from tabledetail ", CN)


CN.Close()

daOrders.Fill(dsdataSet, "tableMaster ")
daDetails.Fill(dsdataSet, "tabledetail ")
'用以下的msgbox可以示出主的据已被取出了

MsgBox(Me.dsdataSet.Tables( "tablemaster ").Rows(0).Item(0))
MsgBox(Me.dsdataSet.Tables( "tabledetail ").Rows(0)( "description "))


testCrystalReport1.SetDataSource(dsdataSet)

CrystalReportViewer1.ReportSource = testCrystalReport1

End Sub
End Class
' '但是程序行后在程序的行的水晶表看器中示的空白的,
水晶表我是按照主的主分的,也有据示出,
用主表中插入子表的方法也了,是不行,真的很郁啊,




[解决办法]
http://blog.sqlsky.com/article.asp?id=355
水晶报表中的主从报表

读书人网 >VB Dotnet

热点推荐