Posted 25 June 2020, 4:59 am EST
I have reportname.rpx report created in ActiveReports 6.
In reportname.vb I have
Public Class reportname
Inherits ActiveReport
Public Sub New()
MyBase.New()
InitializeReport()
End Sub
#Region “ActiveReports Designer generated code”
Private WithEvents PageHeader As DataDynamics.ActiveReports.PageHeader = Nothing
Private WithEvents GroupHeader1 As DataDynamics.ActiveReports.GroupHeader = Nothing
Private WithEvents Detail As DataDynamics.ActiveReports.Detail = Nothing
Private WithEvents GroupFooter1 As DataDynamics.ActiveReports.GroupFooter = Nothing
Private WithEvents PageFooter As DataDynamics.ActiveReports.PageFooter = Nothing
Public ds As DataDynamics.ActiveReports.DataSources.SqlDBDataSource
Private TextBox As DataDynamics.ActiveReports.TextBox
Public Sub InitializeReport()
Me.LoadLayout(Me.GetType, “Paluch.Desktop.repproutesbydriver.rpx”)
Me.ds = CType(Me.DataSource,DataDynamics.ActiveReports.DataSources.SqlDBDataSource)
Me.PageHeader = CType(Me.Sections(“PageHeader”),DataDynamics.ActiveReports.PageHeader)
Me.GroupHeader1 = CType(Me.Sections(“GroupHeader1”),DataDynamics.ActiveReports.GroupHeader)
Me.Detail = CType(Me.Sections(“Detail”),DataDynamics.ActiveReports.Detail)
Me.GroupFooter1 = CType(Me.Sections(“GroupFooter1”),DataDynamics.ActiveReports.GroupFooter)
Me.PageFooter = CType(Me.Sections(“PageFooter”),DataDynamics.ActiveReports.PageFooter)
Me.TextBox = CType(Me.PageHeader.Controls(0),DataDynamics.ActiveReports.TextBox)
End Sub
#End Region
End Class
How I can convert it without recreating all reports?