タイトル : 並びが変わってしまう 投稿日 : 2006/10/12(Thu) 18:39 投稿者 : WON
いつも、お世話になっています。 VB2005+SQLserver2000+ActiveReports.NETの環境で SQLserverからDataViewでデータを取得した後 レポートのDataSource に渡しレポートを実行します。 ただDataViewの中の発注番号の最小値と最大値を レポートに印字する為、プロパティをレポートに コーディングし、そこにも同じDataViewを渡します(rpt.Dv = vwの部分) vwはDataViewです rpt.Dv = vw rpt.DataSource = vw rpt.Run() といったレポートの実行です。 そこでレポートの方のコーディングですが まずプロパティの部分です。 Dim mDv As New System.Data.DataView Public Property Dv() As DataView Get Return mDv End Get Set(ByVal value As DataView) mDv = value End Set End Property そして問題の発注番号の最小値と最大値をとる部分です。 mDv.RowFilter = "DKBN = 'M' " mDv.Sort = "HACNO " lngMINHACNO = mDv(0)("HACNO") mDv.Sort = "HACNO DESC" lngMAXHACNO = mDv(0)("HACNO") fldMAXHACNO.Text = lngMINHACNO & "〜" & lngMAXHACNO プロパティで受けたDataViewを Filterかけ、並び替え発注番号の最小値と最大値をとりますが 最小値と最大値はきちんととれますが もともとのデータソースも並び変わってしまってか 部課コード順のはずなのですが、並びがメチャクチャになって レポートが印刷されてしまいます。 Filterかけ、並び替える部分をコメントにすると 正しく部課コード順で印刷されます。 対処方法を教えて頂けませんか? 宜しくお願いします。 |