那是你的数据源有问题,有没有测试成功,COMMAND中的字段能不能用,你是不是用的SQL还是用的TABLE呀,给你一句SQL的: 在command1的commandtext中填:(以下是我的报表) SELECT 出生日期 AS Expr1, 姓名 AS Expr2, 年龄 AS Expr3, 科别 AS Expr4, 编号 AS Expr5 FROM rc1 ORDER BY 姓名 然后到COMMAND1去看,是不是有5个字段,有5个字段的话,你的COMMAND也应该设好了,当然,你不用SQL更容易,直接在COMMANDTEXT中选择你的表(我的是RC1)就可以了。 然后再看看datareport1的链接属性是不是datasoure是不是DataEnvironment1 datamember是不是Command1? 不行再说!
Private Sub Command1_Click()
Dim strconn As String
strconn = "Provider=Microsoft.Jet.OLEDB.3.51;" & _
"Data Source=" & App.Path & "\rc.mdb;"
DataEnvironment1.Connection1.ConnectionString = strconn
DataReport1.Show
Unload DataEnvironment1
End Sub
另外,最好将你对DataReport1和DataEnvironment1进一步说明一下!
在command1的commandtext中填:(以下是我的报表)
SELECT 出生日期 AS Expr1, 姓名 AS Expr2, 年龄 AS Expr3, 科别 AS Expr4, 编号 AS Expr5 FROM rc1 ORDER BY 姓名
然后到COMMAND1去看,是不是有5个字段,有5个字段的话,你的COMMAND也应该设好了,当然,你不用SQL更容易,直接在COMMANDTEXT中选择你的表(我的是RC1)就可以了。
然后再看看datareport1的链接属性是不是datasoure是不是DataEnvironment1
datamember是不是Command1?
不行再说!
EMAIL:[email protected]