منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - اريد طريقة جلب عمود من قاعده البيانات وعرضه في صفوف داتا جريد فيو

لو تكرمتم اريد طريقة جلب عمود من قاعده البيانات وعرضه في صفوف داتا جريد فيو حيث ان عدد الاعمده 6 والصفوف 6 يعني جميع الخلايا 36

(13-11-22, 03:56 PM)mbk2006 كتب : [ -> ]لو تكرمتم اريد طريقة جلب عمود من قاعده البيانات وعرضه في صفوف داتا جريد فيو حيث ان عدد الاعمده 6 والصفوف 6 يعني جميع الخلايا 36

كود :

con = New SqlConnection(cs)

        If con.State = 1 Then con.Close()

        con.Open()

        cmd = New SqlCommand(" Select * from Custm_Record_Tbl Where Sale_ID=@Sale_ID ", con)

        cmd.Parameters.AddWithValue("@Sale_ID", CInt(DgvRecord.CurrentRow.Cells(0).Value))

        rdr = cmd.ExecuteReader

        rdr.Read()

        With Customer_records_edit ''need edit

            If rdr.HasRows Then

                .TxtOrder_ID.Text = DgvRecord.CurrentRow.Cells(1).Value

                .OrderDate.Value = rdr("OrderDate").ToString

                .TxtCustomerName.Text = DgvRecord.CurrentRow.Cells(3).Value

                .TxtPhone.Text = rdr("Phone").ToString

                .TxtCount1.Text = rdr("ItemCount").ToString

                .LblTax1.Text = rdr("Tax_Value").ToString

                .TxtDiscount1.Text = rdr("Discount_Value").ToString

                .LblTotal1.Text = rdr("FinalTotal").ToString

                .Paid1.Text = rdr("MoneyPaid").ToString

                .LblUnPaid1.Text = rdr("Unpaid").ToString

                .VatCust.Text = rdr("VatCust").ToString

            End If

            rdr.Close()

            con.Close()

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

mbk2006

h2551996