ReportStart Event

Raised before a report starts processing.

Syntax

Visual Basic
C#

'Declaration
 
Public Event ReportStart As System.EventHandler

public event System.EventHandler ReportStart

This event can be used to initialize any objects or variables that are needed while running a report.

Note: Printer values are set after this event is raised. The values that will be applied to the Printer object are in the PageSettings object. ReportStart is the event in which you can modify these values in the PageSettings object before they are applied to the Printer object.

private void rptUnbound_ReportStart(object sender, System.EventArgs eArgs)
{    
    string m_cnnString = @"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\[UserName]\Documents\ComponentOne Samples\ActiveReports 9\Data\NWIND.MDB;Persist Security Info=False";    
    string sqlString = "SELECT * FROM categories INNER JOIN products ON categories.categoryid = products.categoryid ORDER BY products.categoryid, products.productid";    
    m_cnn = new OleDbConnection(m_cnnString);    
    OleDbCommand m_Cmd = new OleDbCommand(sqlString,m_cnn);    
    if(m_cnn.State == ConnectionState.Closed)    
    {        
        m_cnn.Open();    
    }    
        m_reader = m_Cmd.ExecuteReader();
}

Visual Basic

Dim m_cnnString As String
Dim sqlString As String
Dim m_reader As OleDbDataReader
Dim m_cnn As OleDbConnection
Private Sub rptUnbound_ReportStart(ByVal sender As Object, ByVal e As System.EventArgs) _
    Handles MyBase.ReportStart        
    m_cnnString =  "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\[UserName]\Documents\ComponentOne Samples\ActiveReports 9\Data\NWIND.MDB;Persist Security Info=False"        
    sqlString = "Select * FROM categories INNER JOIN products On categories.categoryid _            
        = products.categoryid ORDER BY products.categoryid, products.productid"        
    m_cnn = New OleDb.OleDbConnection(m_cnnString)        
    Dim m_Cmd As New OleDb.OleDbCommand(sqlString, m_cnn)        
    If m_cnn.State = ConnectionState.Closed Then            
        m_cnn.Open()         
    End If        
    m_reader = m_Cmd.ExecuteReader()
End Sub

Reference