社区
多媒体
帖子详情
datareport报表的数据更新
wxjsym
2000-08-10 03:36:00
我使用dataenvironment和datareport制作数据库报表,为什么在不退出程序的情况下数据库刷新后报表不能更新? 特急!拜托!
...全文
154
2
打赏
收藏
datareport报表的数据更新
我使用dataenvironment和datareport制作数据库报表,为什么在不退出程序的情况下数据库刷新后报表不能更新? 特急!拜托!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
2 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
masterkey
2000-08-10
打赏
举报
回复
您要对DataEnvironment中的数据源关闭后重新开启,然后再看DataReport中的数据就能更新了。 我也遇到过这样的情况,现在对DataEnvironment中的数据源我用 :
sSQL = "SHAPE {SELECT * from mytable} AS detail COMPUTE detail BY field1"
If myData.rs_grouping.State = 1 Then myData.rs_grouping.Close
myData.rs_grouping.Open sSQL, myData.Public, adOpenKeyset, adLockReadOnly, adCmdText
祝您好运!
playyuer
2000-08-10
打赏
举报
回复
DataReport的内容不随数据库的内容变化
http://www4.netease.com/~askpro/msg19/qa74.htm
Requery方 法 !
也 可 以 直 接 使 用 ADODB.Recordset!不 使 用 DataEnvironment!例 :
...
public adoRecordsetX as ADODB.Recordset
...
Private Sub DataReport_Initialize()
adoRecordsetX.Requery
Set DataReport1.DataSource = adoRecordsetX '设 置 DataReport 的 数 据 源
...
'绑 定 某 字 段
Me.Sections.Item("Section1").Controls.Item("text1").DataField=adoRecordsetX.Fields.Item(0).Name
...
End Sub
wuxiaoqiang的 意 见 :
在 你 们 有 关 上 述 问 题 的 回 答 , 我 想 再 增 加 一 种 更 简 单 的 解 决 办 法 。
1.在 datareport 报 表 中 设 置 datamember和 datasource为 空 。
2.将 以 前 绑 定 的 RptTextBox的 datamember设 为 空 , 保 留 原 来 的 datafield.
3.在 打 印 操 作 中 增 加 以 下 代 码 :
Dim db As Connection
Set db = New Connection
db.CursorLocation = adUseClient
db.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source=" + App.path + "\finance.mdb" + ";"
Set tb = New Recordset
tb.Open "select * from dailyfeeprint", db, adOpenStatic, adLockOptimistic
With tb
.AddNew
![工 号 ] = Combo1(0).Text
![姓 名 ] = txtFields(0).Text
![交 费 日 期 ] = txtFields(1).Text
.........
.Update
End With
Set data1.Recordset = tb
Set datareport1.DataSource = data1
datareport1.Show
datareport1.PrintReport
其 实 这 个 问 题 也 搞 得 我 很 头 疼 , 希 望 能 让 其 他 人 不 再 头 疼 。
herycom的 意 见 :
直 接 Requery 一 下 就 可 以 了 。
Private Sub DataReport_Initialize()
DataEnvironment1.rsCommand1.Requery
End Sub
此问题由于溪玥回答。
VB
数据
报表
data
report
[整理].pdf
VB
数据
报表
data
report
[整理].pdf
Data
Report
数据
报表
瓶API,它使用熊猫貌相库生成有关存储在CSV文件中的任何快速的见解。 托管-
VB在DED中使用参数,使用
Data
Report
1.Dsr、
Data
Environment1.Dsr
VB6.0在DED中使用参数,使用了
Data
Report
1.Dsr、
Data
Environment1.Dsr两个文件,打开编译生成的程序后,请输入MS JET OLE DB初始化信息,包括
数据
源、用户名、密码、应商字符串、选择打开方式等。点确认后移动记录指针。 运行环境:Windows/VB6
图书库存管理系统
图书库存管理系统 模块: …………………………………………………………………… 入库管理 出库管理 入库统计 FLASH画面-系统主控截面- 出库统计 入库结存
报表
出库结存
报表
权限维护 …………………………………………………………………… 创建图书管理
数据
库。(tsglbase) 创建表: 1:入库图书
数据
表(rkb) ………………………… 图书编号 text 50 普通索引 不为空 书名 text 50 作者 text 10 出版社 text 50 版次 text 10 库存数 integer 默认 单价 currency 默认 库存金额 currency 默认 入库时间 date/time 默认 …………………………………………………… 2: 图书出库
数据
表(ckb) ………………………………………… 图书编号 text 50 普通索引 不为空 书名 text 50 作者 text 10 出版社 text 50 版次 text 10 出库数 integer 默认 单价 currency 默认 出库金额 currency 默认 出库时间 date/time 默认 …………………………………………………… 3:图书主表(tszb) …………………………………………………… 图书编号 text 50 普通索引 不为空 书名 text 50 作者 text 10 出版社 text 50 ………………………………………………………… 4:密码表(mmb) …………………………………………………… 密码 text 20 主要的唯一的 不为空 用户名 text 50 ………………………………………………………… 张 123。。。。王 456 …………………………………………………………………………………………… 制作工程: 1:创建FLASH画面,FROM1(startFROM。FRM) 在窗体中放一个计时器控件,在该控件用于控制FLASH画面显示的时间。 在放一个文本控件,用于计时,设置visible的属性为假,text属性为1 放一个图片控件,并引入一个图片, 2:制作系统主控界面,FROM2(MAINFROM。FRM) 在穿体中放5个形状控件,shape1,shape2,shape3,shape4,shape5 还有个5个标签控件,在放一个标签控件,用于返回启动画面 在放一个
数据
控件
DATA
,用它来引入
数据
源,设置它为不可见 3: 制作图书入库管理窗体(入库管理)(inputbook。FRM) 在工程增加一个新窗体,该窗体用
数据
窗体向导加以制作, 在窗体布局选项中用“主表/细表” “图书主表”和“入库图书
数据
表” 帮定类型选“ADO
数据
控件” 4: 制作图书出库窗体 (图书出库)(outputbook.frm) 在工程增加一个新窗体,该窗体用
数据
窗体向导加以制作, 在窗体布局选项中用“主表/细表”两个表为 帮定类型选“ADO
数据
控件“ 在引用一个
DATA
GRID控件:把他的allowaddnew allowdelete allowup
data
属性设置为真 5:创建图书入库结算窗体(入库统计)(sumrk。FRM)
数据
源控件ADODC,……………………………… name DATPRIMARYRS connectstring provider=microsoft.jet.oledb.3.51;
data
source=
数据
库路径 recordsource select 图书编号,书名,版次,库存数,单价 库存金额,作者,出版社,入库日期 from 入库图书
数据
表(rkb) …………………………………………………… 6:创建图书出库结存窗体(出库统计)。(tsck。FRM)
数据
源控件ADODC,……………………………… name DATPRIMARYRS connectstring provider=microsoft.jet.oledb.3.51;
data
source=
数据
库路径 recordsource select 图书编号,书名,版次,出库数,单价 出库金额,作者,出版社,出库日期 from 出库图书
数据
表(ckb) …………………………………………………… 7:制作入库图书结存
报表
工程——更多SctiveX设计器——
data
enviroment 单击connection1的属性,选择mcrosoft jet 3.51 ole db provider 单击下一步
数据
提供者或连接
数据
源属性的全程为: provider= mcrosoft jet OLEDB.3.51 ;PERSIST security info=false;
data
source=
数据
库路径 然后,工程——添加
data
report
(
报表
) 右击connection1,单击“添加命令”菜单,出现一个新的命令command1 该命令属性为 …………………… connectionname connction1 commandtype 2—adcmdtable commandtext 入库图书
数据
表 把
data
report
1的
数据
源的属性
data
source为dtaenvironment1 在
报表
头带区放一个标签控件,用于说明
报表
名称:“图书入 库 结算
报表
” 在
报表
的页标头区中放入5个标签控件,用于说明
报表
每列的 内容 在
报表
的细节带区放5个文本框控件,用于显示
数据
表中的
数据
8:制作入库图书结存
报表
制作工程和7一样 9:制作用户权限维护窗体mmform(mmform。frm)
vb
data
report
生成
报表
用vb自带的
data
report
生成
数据
报表
。源代码
多媒体
809
社区成员
8,275
社区内容
发帖
与我相关
我的任务
多媒体
VB 多媒体
复制链接
扫一扫
分享
社区描述
VB 多媒体
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章