! 제품 버전을 정확하게 입력해 주세요.
제품 버전이 정확하게 기재되어 있지 않은 경우,
최신 버전을 기준으로 안내 드리므로
더욱 빠르고 명확한 안내를 위해
제품 버전을 정확하게 입력해 주세요!

페이지리포트에서 컬럼 별로 데이터 채우기 > Q&A | 토론

본문 바로가기

ActiveReports.NET

Q&A | 토론

WinForms윈폼 페이지리포트에서 컬럼 별로 데이터 채우기

페이지 정보

작성자 무념무상 작성일 2023-04-19 17:31 조회 271회 댓글 1건
제품 버전 : 16.2.1

본문

안녕하세요? 페이지리포트 관련 질문입니다.

현재 아래와 같은 코드를 작성하여 사진과 같은 표를 구현 하려고 합니다.


select 문으로 년도별로(where) 조건을 조회하여 

아래와 같이 구현으로 하려고 합니다.


먼저 select  했을 때  db 데이터 형식은

년도      |  상반기점검일  확인자  |  하반기점검일  |  확인자

2023년 |    20230101    | 아무개  |    20230602    |  개똥이

2024년 |    20230101    | 홍길동  |    20230602    |  사랑이 

.

.

.


이런 형식 입니다. 

데이터를 row 단위로 반복하지 않고 colmun 단위로 반복하고 싶습니다.


가능한 방법이 있을까요?

만약 페이지리포트에서는 불가능하다면,

섹션 리포트에서는 가능할까요? 


사용언어는 vb.net 입니다.  

답변 부탁드립니다. 




 


---현재 사용하고 있는 vb.net 코드---

 Dim myDataSource As New GrapeCity.ActiveReports.PageReportModel.DataSource


            conStr = "" 


            myDataSource.Name = "dataSource"

            myDataSource.ConnectionProperties.DataProvider = "OLEDB"

            myDataSource.ConnectionProperties.ConnectString = conStr


            'setup the dataset

            Dim myDataSet As New GrapeCity.ActiveReports.PageReportModel.DataSet

            Dim myQuery As New GrapeCity.ActiveReports.PageReportModel.Query()


            myDataSet.Name = "Dataset1"

            myQuery.DataSourceName = "dataSource"

            myQuery.CommandType = PageReportModel.QueryCommandType.Text

            myQuery.CommandText = ExpressionInfo.FromString("select 문")


            myDataSet.Query = myQuery

            '


            'Dim _field As New GrapeCity.ActiveReports.PageReportModel.Field("firsthalfyear", "firsthalfyear", Nothing) 

            Dim _field As New GrapeCity.ActiveReports.PageReportModel.Field("user1", "user1", Nothing)

            myDataSet.Fields.Add(_field)



            _field = New GrapeCity.ActiveReports.PageReportModel.Field("lasthalfyear", "lasthalfyear", Nothing)

            myDataSet.Fields.Add(_field)


            _field = New GrapeCity.ActiveReports.PageReportModel.Field("yearuse", "yearuse", Nothing)

            myDataSet.Fields.Add(_field)


            rpt.Report.DataSources.Add(myDataSource)

            rpt.Report.DataSets.Add(myDataSet)

            rpt.Run()


            Viewer1.LoadDocument(rpt.Document)




  • 페이스북으로 공유
  • 트위터로  공유
  • 링크 복사
  • 카카오톡으로 보내기

댓글목록

무념무상님의 댓글

무념무상 작성일

혹시 질문이 어렵나요? 답변을 주시지 않아 댓글로 확인 해 봅니다......

메시어스 홈페이지를 통해 제품에 대해서 더 자세히 알아 보세요!
홈페이지 바로가기
메시어스 홈페이지를 통해 제품에 대해서 더 자세히 알아 보세요!
홈페이지 바로가기
이메일 : sales-kor@mescius.com | 전화 : 1670-0583 | 경기도 과천시 과천대로 7길 33, 디테크타워 B동 1107호 메시어스(주) 대표자 : 허경명 | 사업자등록번호 : 123-84-00981 | 통신판매업신고번호 : 2013-경기안양-00331 ⓒ 2024 MESCIUS inc. All rights reserved.