Privet vsem ! )
S Crystal 8.5 rabotat' ne dovelos' ( poka) - prihodilos rabotat s 7.0 v svyazke s VB 6.0 .
u kontrol'ki CrViewer est svoistvo IsBisy - poprobui poeksperementirovat' s nim ( o 2 voprosu )
po 1 voprosu
Dim CRR As CRAXDRT.Report
Dim CRApplication As CRAXDRT.Application
CRV - CRViewer
dalee - formiruem otchet
If CRApplication Is Nothing Then
Set CRApplication = New CRAXDRT.Application
End If
Set CRR = CRApplication.OpenReport(file_name)
CRR.DiscardSavedData
CRR.EnableParameterPrompting = False
CheckData
'''*****
With Me.CRV
'SetReportConnection CRR ( delaem connect k serveru )
.ReportSource = CRR
.EnableExportButton = True
.Visible = True
.ZOrder
.ViewReport
.Move 0, 0, Me.Width, Me.Height
End With
teper' pechat' bez vsplyvaushego okna
CRR.PrintOut False, 1, False

da ) sorry - moe milo esli interesno - kaitek@mail.ru
Budu rad )
Uspehov !!