ActiveReports Developer 7
ReportStart Event
See Also  Example
GrapeCity.ActiveReports.v7 Assembly > GrapeCity.ActiveReports Namespace > SectionReport Class : ReportStart Event

Glossary Item Box

Raised before a report starts processing.

Syntax

Visual Basic (Declaration) 
Public Event ReportStart As System.EventHandler
C# 
public event System.EventHandler ReportStart

Remarks

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.

Example

C#Copy Code
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 Developer 7\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 BasicCopy Code
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 Developer 7\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

See Also