请问各位高手vb如何将查询结果输入水晶报表,然后实现打印?
我的报表是把数据库中的所有数据都显示出来了,一打印就全打印了。我想按照查询结果打印,也就是我先查询我想要的数据,然后按照查询后的结果进行报表打印。如何实现?请各位高手指点我!谢谢!
[解决办法]
水晶报表没用过,用的DataReport,查询出来的结果可以用动态RecordSet来做数据源,不知道水晶报表是不是也可以这样
[解决办法]
cr里加ParameterFields,vb里给value。
这是我用vb调动cr的runtime的部分代码。
Dim crxApp As CRAXDRT.Application
Dim crxRpt As CRAXDRT.Report
Dim crxParamDef As CRAXDRT.ParameterFieldDefinition
Set crxApp = New CRAXDRT.Application
Set crxRpt = crxApp.OpenReport(ReportPathName)
29 crxRpt.ExportOptions.FormatType = crEFTPortableDocFormat
30 crxRpt.ExportOptions.DestinationType = crEDTDiskFile
31 crxRpt.EnableParameterPrompting = False
crxRpt.PaperSize = crPaperA4
With crxRpt
34 For Each crxParamDef In .ParameterFields
35 With crxParamDef
36 Select Case .Name
Case "{?Name}"
38 .ClearCurrentValueAndRange
40 .AddCurrentValue str(name)
53 End Select
54 End With
55 Next
56 .ExportOptions.DiskFileName = PDFFilePathName
57 .Export False
58 End With
再不行,发到图表区,问阿泰。
http://forum.csdn.net/SList/DotNETReport/