- PR -

DataViewのRowFilterについて

1
投稿者投稿内容
LANVIN
大ベテラン
会議室デビュー日: 2007/03/12
投稿数: 211
投稿日時: 2008-01-11 18:42
　こんばんは。

先ほどはありがとうございました。
本日、もう１点教えて下さい。

VB2005+ActiveReportNET2.0の環境です。

DataViewをPublic Propertyで渡し
Detail_Formatでその行の品番でRowFilterし
その結果をサブレポートに渡し
サブレポートを印刷するのですが
RowFilterした結果の件数は正しいのですが
サブレポートでデバックをしますと
前回の品番のデータも含まれてしまっています。

原因と対応をご教授頂けないでしょうか？

DataViewを受けとる部分のコードです。

Public Property DvSYO7() As DataView
Get
Return mDVSYO7
End Get
Set(ByVal value As DataView)
mDVSYO7 = value
End Set
End Property


RowFilterの部分のコードです。

Dim SubrS7 As New ARPTOA055Sub2
mDVSYO7.RowFilter = "SYKEY = '" & fldKMK.Text) & "'"
SubrS7.DataSource = mDVSYO7
Me.SubrSYO7.Report = SubrS7

RowFilterの部分のコードです。

サブレポートに
SubrS7.DataSource = mDVSYO7と渡していますが
サブレポートで確認すると前回のデータが含まれて
しまっています。

mDVSYO7.RowFilter = "SYKEY = '" & fldKMK.Text) & "'"
を実行したあとの件数は間違いありません。

どなたかご存知の方おられましたら
宜しくお願いします。

R
LANVIN
大ベテラン
会議室デビュー日: 2007/03/12
投稿数: 211
投稿日時: 2008-01-11 19:12
追記です。
DataViewでレポートに渡すのではなく
DataTableで渡すようにし

Dim dv As DataView = New DataView()
dv.Table = tbSYO7
でDataView を作りRowFilterに
変更しましたらokなのです。

何とか DataViewでレポートに渡したいのですが...
何か対応はありますか？

変更したRowFilter の部分です。

Dim SubrS7 As New ARPTOA055Sub2
Dim dv As DataView = New DataView()
dv.Table = tbSYO7
'
dv.RowFilter = "SYKEY = '" & Trim(fldSYCD.Text) & "'"
SubrS7.DataSource = dv
Me.SubrSYO7.Report = SubrS7
1

スキルアップ／キャリアアップ（JOB@IT）