ويرايش اطلاعات بدست امده از ديتابيس در ديتاست

[sh2007]

دوستان سلام
من ' بدليل وجود تاريخ در دستورات نتوانستم از گروه بندي استفاده كنم پس يك جدول جديد تشكيل دادم حالا اطلاعات بدست امده حاصل از گزارشگيري رو چطوري گروه بندي كنم و توي يك جدول ديگه كه توي ديتاست دارم بريزم اين اطلاعات براي چاپ است دوستان پورژه ضميمه هست اگه كسي بتونه كمك كنه ممنون مي شم

[teymoorei]

سلام
اگه مشکل ممیز های تاریخه می تونید توی یه تکست باکس دیگه به صورت عدد ذخیره کنید و باز برای برگرداندن آن به حالت قبلی برگردانید .

        Connection.Open()

        If Connection.State <> ConnectionState.Open Then

            Connection.Open()

        End If

        da = New SqlDataAdapter("Select * From cheque5 Where cndtnum Like'" & TextBox9.Text & "%'", Connection)

        ds = New DataSet()

        da.Fill(ds, "cheque5")

        Display(ds)

        Dim q, w As Integer

        q = 0

        w = 0

        Dim s1, s2 As String

        For i As Integer = 0 To ds.Tables("cheque5").Rows.Count - 1

            If ds.Tables(0).Rows(i)(9) = Trim(MaskedTextBox1.Text) Then

                s2 = ds.Tables(0).Rows(i)(10)

                s1 = Mid(s2, 1, 3)

                s1 += Mid(s2, 5, 3)

                s1 += Mid(s2, 9, 3)

                q += Convert.ToInt32(s1)

            Else

                s2 = ds.Tables(0).Rows(i)(10)

                s1 = Mid(s2, 1, 3)

                s1 += Mid(s2, 5, 3)

                s1 += Mid(s2, 9, 3)

                w += Convert.ToInt32(s1)

            End If



        Next

[sh2007]

سلام
اگه مشکل ممیز های تاریخه می تونید توی یه تکست باکس دیگه به صورت عدد ذخیره کنید و باز برای برگرداندن آن به حالت قبلی برگردانید .

        Connection.Open()

        If Connection.State <> ConnectionState.Open Then

            Connection.Open()

        End If

        da = New SqlDataAdapter("Select * From cheque5 Where cndtnum Like'" & TextBox9.Text & "%'", Connection)

        ds = New DataSet()

        da.Fill(ds, "cheque5")

        Display(ds)

        Dim q, w As Integer

        q = 0

        w = 0

        Dim s1, s2 As String

        For i As Integer = 0 To ds.Tables("cheque5").Rows.Count - 1

            If ds.Tables(0).Rows(i)(9) = Trim(MaskedTextBox1.Text) Then

                s2 = ds.Tables(0).Rows(i)(10)

                s1 = Mid(s2, 1, 3)

                s1 += Mid(s2, 5, 3)

                s1 += Mid(s2, 9, 3)

                q += Convert.ToInt32(s1)

            Else

                s2 = ds.Tables(0).Rows(i)(10)

                s1 = Mid(s2, 1, 3)

                s1 += Mid(s2, 5, 3)

                s1 += Mid(s2, 9, 3)

                w += Convert.ToInt32(s1)

            End If



        Next

دوست من از لطف شما سپاسگذارم
مشكل من در رباطه با تاريخ نيست مشكل من اينه كه يك سري داده توي جدول دارم اونها رو گزارشگيري مي كنم با توجه به نوع داده ها گروه بندي جواب نمي دهد كه بخوام جمع فيلد paybed رو بزنم چون فيلدي ديگري بنام تاريخ و اي دي افراد وجود داره و تاريخ توي بازده زماني متغيري مي باشد كه اجازه گروه بندي صحيح براي افراد رو نمي دهد
من اومدم ابتدا اطلاعات رو فر اخواني كردم توي يك جدول در ديتاست و بعد حالا مي خوام روي اطلاعاتي كه توي ديتاست هستند گروه بندي انجام بدم بدون فيلد تاريخ حالا سوال من اينجاست چطوري اطلاعاتي رو كه توي ديتاست هستند فراخواني ويرايش و گروه بندي كنم و توي يه جدول ديگه در ديتاست بريزم
ممنون