اخواني الكرام
كيف اعمل تقرير بحيث اجعل مصدر البيانات له هي الداتا سيت
علما ان الداتا سيت هيدي عليها عمليات
يعني انا عندي الداتا سيت التاليه وعليها العمليات كالتالى
SQL = "select ln*0 ,made ,daen ,note,noc,dt from clmain where cl=" & TextBox1.Text & " and nof =" & TextBox2.Text & "and dt between #" & DateTimePicker1.Text & "# AND #" & DateTimePicker2.Text & " # order by dt"
Dp = New OleDbDataAdapter(SQL, Con)
Dp.Fill(Rs, "clmain")
Dim i As Integer
For i = 0 To Rs.Tables("clmain").Rows.Count - 1
If i = 0 Then
If Rs.Tables("clmain").Rows(i).Item(1) <> 0 Then
Rs.Tables("clmain").Rows(i).Item(0) = Rs.Tables("clmain").Rows(i).Item(1) + Rs.Tables("clmain").Rows(i).Item(0)
Else
Rs.Tables("clmain").Rows(i).Item(0) = Rs.Tables("clmain").Rows(i).Item(0) - Rs.Tables("clmain").Rows(i).Item(2)
End If
ElseIf Rs.Tables("clmain").Rows(i).Item(1) <> 0 Then
Rs.Tables("clmain").Rows(i).Item(0) = Rs.Tables("clmain").Rows(i).Item(1) + Rs.Tables("clmain").Rows(i - 1).Item(0)
Else
Rs.Tables("clmain").Rows(i).Item(0) = Rs.Tables("clmain").Rows(i - 1).Item(0) - Rs.Tables("clmain").Rows(i).Item(2)
End If
Next iاريد ان اجعل مصدر بيانات التقرير الداتا سيت السابقه
علما ان هناك فريم معين هو الدي مسوول عن احضار الداتا سيت السابقه واجراء العمليات عليها وعرضها في داتا غريدفيو وهو المسوول ايضا عن استدعاء التقرير نفسه
