急!急!急!急!!!打印报表问题!高分请出各位高手!

visualcpu 2001-06-11 05:47:00
问题是这样的:
我在文本框中输入我要打印的资料名,然后它就会显示报表。这个功能是可以实现,但如果我打印完后,再返回窗体继续输入我要打印的资料名,它就报错!我的代码是这样的:DataEnvironment1.Connection1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=D:\visualcpp\cpp.mdb"
If Option1.Value = True Then
DataReport1.Caption = Form16.Option1.Caption
DataEnvironment1.rsCommand1.Open "select * from cuao where( name='" & Text1(0).Text & "' and (date) between val('" & Text1(1).Text & "')and val('" & Text1(2).Text & "')) order by date;"
报错信息:如果对象已经打开,则不允许执行应用程序所要求操作
然后我就用语句把它关闭掉,它又会提示对象连接到一个已关闭的对象,请各位高手帮忙,一定给分!
...全文
25 点赞 收藏 1
写回复
1 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
playyuer 2001-06-11
'.....
if DataEnvironment1.rsCommand1.State = adStateOpen then
DataEnvironment1.rsCommand1.close
end if
DataEnvironment1.rsCommand1.Open "...."
回复
相关推荐
发帖
多媒体
创建于2007-09-28

807

社区成员

VB 多媒体
申请成为版主
帖子事件
创建了帖子
2001-06-11 05:47
社区公告
暂无公告