2011年计算机等考二级VB辅导知识技巧总结(8)

ADO记录集和水晶报表
#
在使用水晶报表时,经常会感到数据不是很好控制,最后只好使用这个终极绝招咯。那就是使用数据定义文件(TTX),把得到的ADO记录集传送给水晶报表。
通常情况下,水晶报表是从物理的数据库上创建出来的,但是现在有了32位的Active Data Driver-- P2smon.dll,水晶就可以不用再事先连接到一个数据库上咯。
#
首先,需要创建一个TTX文件,进入数据源选择窗体后 #
再单击了前面的“+”后弹出数据源窗体
此时,我们使用“New”按钮创建一个新的数据定义文件(TTX),格式如下 #
保存后,我们打开这个文本文件,就会发现TTX文件的格式,原来中间是TAB分割符来的。
#
接着,我们就按照水晶报表的老套路画式样,剩下的就是传递记录机集了。
下面,我们要声明好传递ADO记录集需要的Api, #
Public Declare Function PEOpenEngine Lib "crpe32.dll" () As Integer #
Public Declare Function PEGetErrorCode Lib "crpe32.dll" (ByVal printJob As Integer) As Integer
#
Public Declare Function PEOpenPrintJob Lib "crpe32.dll" (ByVal RptName As String) As Integer #
Public Declare Function PEOutputToWindow Lib "crpe32.dll" ( _ #
ByVal printJob As Integer, _
#
ByVal Title As String, _
#
ByVal Left As Long, _ #
ByVal Top As Long, _
#
ByVal Width As Long, _
ByVal Height As Long, _
ByVal style As Long, _ #
ByVal PWindow As Long) As Integer
#