使用数据报告实用程序 [英] working with Data Report Utility

查看:88
本文介绍了使用数据报告实用程序的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!

问题描述


我正在尝试在VB 6中使用oracle 8中的数据生成数据报告.如何按照我希望的报告格式如下来形成数据的显示窗口

病人ram ajay的姓名

地址sitarampur mohanpur

联系电话9988997766 7788664488

医生参考ajay博士mohan博士

年龄45 67

性别M M

我创建了带有以下字段的表:患者姓名,地址,医生姓名,年龄,性别.

请帮帮我.

mukesh

Hi
I am trying to generate data report in VB 6 with data in oracle 8. How do I can form the display window of the data as I want the report in the format as below

Name of patient ram ajay

Address sitarampur mohanpur

contact no 9988997766 7788664488

Doctors Reference Dr ajay Dr mohan

Age 45 67

Sex M M

I have created tables with the fields : name of patient, address, doctors name, age, sex.

help me please.

mukesh

推荐答案

在vb6.0中添加数据报告相应地设计报告,并在表单加载事件中从数据库中获取数据并将记录集设置为报告.

看到此代码:

设置rptEntries.DataSource = rsRecset.DataSource
rptEntries.DataMember = rsRecset.DataMember
使用rptEntries
.Sections("PageHeader").Controls("lblFilter").Caption = strlblFilter
.Sections("Detail").Controls("txtRollNumber").DataField ="RollNumber"
.Sections("Detail").Controls("txtName").DataField ="Name"
.Sections("Detail").Controls("txtDate").DataField ="punchdate"
.Sections("Detail").Controls("txtTime").DataField ="punchtime"
.Sections("Detail").Controls("txtReader").DataField ="RdrName"
.Sections("Detail").Controls("txtEntryType").DataField ="EntryType"
显示vbModal
结尾为
Add data report in vb6.0 design the report accordingly and on load event of the form fetch data from database and set record set to the report.

See this code :

Set rptEntries.DataSource = rsRecset.DataSource
rptEntries.DataMember = rsRecset.DataMember
With rptEntries
.Sections("PageHeader").Controls("lblFilter").Caption = strlblFilter
.Sections("Detail").Controls("txtRollNumber").DataField = "RollNumber"
.Sections("Detail").Controls("txtName").DataField = "Name"
.Sections("Detail").Controls("txtDate").DataField = "punchdate"
.Sections("Detail").Controls("txtTime").DataField = "punchtime"
.Sections("Detail").Controls("txtReader").DataField = "RdrName"
.Sections("Detail").Controls("txtEntryType").DataField = "EntryType"
.Show vbModal
End With


这篇关于使用数据报告实用程序的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!

查看全文
登录 关闭
扫码关注1秒登录
发送“验证码”获取 | 15天全站免登陆