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

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