Отчет на основе SQL запроса
Источником данных для создания отчета может послужить и обыкновенный SQL запрос.
Для начала нужно создать в проекте новый файл отчета connectSQLQuerry.rpt и подключить SQL сервер к отчету через команду Database -> Add\Remove Database.
В качестве источника данных OLE DB (ADO) необходимо указать наш SQL сервер, подключить базу NorthWind. Сам же запрос необходимо вводить через команду Add command в блоке Available Data Sources
Щелкните мышью на узле Add Command и введите следующий SQL запрос
select CompanyName,ContactName,Address from dbo.Customers order by CompanyName
Далее убедитесь, что все поля, перечисленные в операторе select, доступны в разделе DataBase Fields панели инструментов Field Explorer.
Далее воспользуйтесь мастером-генератором отчетов и создайте простой табличный отчет из введенного запроса.
Далее добавьте файл connect_to_sql_querry.aspx, в котором метод Page_Init модифицируйте следующим образом:
Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
'CODEGEN: This method call is required by the Web Form Designer 'Do not modify it using the code editor.
InitializeComponent()
Dim log As New TableLogOnInfo Dim ci As New
ConnectionInfo
ci.ServerName = ConfigurationSettings.AppSettings("server") ci.DatabaseName = ConfigurationSettings.AppSettings("database") ci.UserID = ConfigurationSettings.AppSettings("user") ci.Password = ConfigurationSettings.AppSettings("password") log.ConnectionInfo = ci
Dim tbs As
Tables Dim tb As Engine.Table Dim rDoc As New ReportDocument
rDoc.Load(Server.MapPath("reports\connectSQLQuerry.rpt")) tbs = rDoc.Database.Tables tb = tbs(0) log = tb.LogOnInfo log.ConnectionInfo = ci tb.ApplyLogOnInfo(log)
crQuerry.ReportSource = rDoc crQuerry.DataBind()
End Sub