[Rabeea Qbaha]

PHP كود :

Dvcustmar.CancelEdit()
            Dvcustmar.Columns.Clear()
            Dvcustmar.DataSource = Nothing

Dvcustmar.Columns.Add("", "التسسلسل")
       Dvcustmar.Columns.Add("", "اسم المادة")
       Dvcustmar.Columns.Add("", "سعر الشراء")
       Dvcustmar.Columns.Add("", "سعر البيع")
       Dvcustmar.Columns.Add("", "تاريخ الاضافة")
       Dvcustmar.Columns.Add("", "الكمية المتوفرة")
 

  
    Dim sqlstring As String = "Select top * FROM projact"
       'فحص الاتصال بقاعدة البيانات
       If SQL.conn.State = ConnectionState.Open Then
           SQL.conn.Close()
       End If
       SQL.conn.Open()
       Dim adt As New SqlDataAdapter(sqlstring, SQL.conn)
       Dim dt As New DataTable
       adt.Fill(dt)
       Dim i As Integer
       For i = 0 To dt.Rows.Count - 1
           Dvcustmar.Rows.Add()
           Dvcustmar.Rows(i).Cells(0).Value = dt.Rows(i).ItemArray(0)
           Dvcustmar.Rows(i).Cells(1).Value = dt.Rows(i).ItemArray(1)
           Dvcustmar.Rows(i).Cells(2).Value = dt.Rows(i).ItemArray(2)
           Dvcustmar.Rows(i).Cells(3).Value = dt.Rows(i).ItemArray(3)
           Dvcustmar.Rows(i).Cells(4).Value = dt.Rows(i).ItemArray(4)
           Dvcustmar.Rows(i).Cells(5).Value = dt.Rows(i).ItemArray(5)
      
       Next
       SQL.conn.Close()