使用 水晶报表5.1 中文,vb6
内容在水晶报表的page hearder 中,A4横。
在水晶报表中,数据显示一条, 为什么用vb6御览却又5条记录。另,水晶报表设计的时候,连接没有设置密码的Access 库时,用97格式不需要密码,但2k 和2003格式要,为什么?
内容在水晶报表的page hearder 中,A4横。
在水晶报表中,数据显示一条, 为什么用vb6御览却又5条记录。另,水晶报表设计的时候,连接没有设置密码的Access 库时,用97格式不需要密码,但2k 和2003格式要,为什么?
//传递的记录集合不一样显示数据不一样另,水晶报表设计的时候,连接没有设置密码的Access 库时,用97格式不需要密码,但2k 和2003格式要,为什么
//安全性有提高
//传递的记录集合不一样显示数据不一样
====可我在VB6中帮定的同张表。
On Error GoTo ErrPrinter
crwReport.DataFiles(0) = DATABASE_PATH + DATABASE_NAME
crwReport.ReportFileName = REPORT_PATH + "rpt0020.rpt"
'crwReport.Formulas(0) = "strTime='" & Format(Time, "hh:mm:ss") & "'"
'crwReport.Formulas(1) = "strLeftTopString='" & " HM0040 " & g_strGsinmx & "'"
crwReport.Destination = intDestination
crwReport.CopiesToPrinter = 1
crwReport.WindowTitle = Me.Caption '"ニユヘィキ「ニア"
crwReport.WindowTop = 0
crwReport.WindowLeft = 0 crwReport.WindowHeight = Screen.Height / Screen.TwipsPerPixelY - 25
crwReport.WindowWidth = Screen.Width / Screen.TwipsPerPixelX
crwReport.Action = 1
Exit SubErrPrinter:
If Err.Number = 20000 Then Exit Sub 'Cancel Error
Dim lngRet As Long
lngRet = msgSystemError(Me.Name, "Print_Out", vbRetryCancel, vbCritical)
Select Case lngRet
Case vbRetry
Resume
Case Else
Exit Sub
End Select
这是CODE 实在想不出来为什么?另,水晶报表设计的时候,连接没有设置密码的Access 库时,用97格式不需要密码,但2k 和2003格式要,为什么
//安全性有提高===那需要输入什么密码?