[أبو فلان]

اخي سعود المشروع عندي كبير ارفقة الجزء الخاص المطلوب اجراء عليه الباك جرواند

---

شوف هذا جزء من الكود يعبي الداتا قريد

PHP كود :

 Dim strSQL88 As String = "SELECT top " & TOP.Text.Trim & " Tex1,Tex2,Tex3,Tex12,CoJHAT,CoHAY,Colev,CoADDASRH,VAH,DEL,ALDARJH,CoLEVEL  FROM  T_ASRH Where DEL =  '" & "ساري" & "'"
        Dim da88 As New SqlDataAdapter(strSQL88, Sqlconn)
        Dim ds88 As New DataSet
        da88.Fill(ds88, " Select * From T_ASRH  DEL =  '" & "ساري" & "'")
        DataG1.DataSource = ds88.Tables(0)

        Dim Column0 As New System.Windows.Forms.DataGridViewCheckBoxColumn
        With Column0
            .Name = "Column0"
            .Visible = True
            .HeaderText = "التحديد"
            .DisplayIndex = 0
            .TrueValue = True
        End With
        Me.DataG1.Columns.Add(Column0) 


        asrh()

^

PHP كود :

 Public Sub asrh()
        DataG1.Columns(0).HeaderText = "رقم الملف"
        DataG1.Columns(1).HeaderText = "الاسم"
        DataG1.Columns(2).HeaderText = "رقم البطاقة"
        DataG1.Columns(3).HeaderText = "الجوال"
        DataG1.Columns(4).HeaderText = "الجهة"
        DataG1.Columns(5).HeaderText = "الحي"
        DataG1.Columns(6).HeaderText = "الحالة الاجتماعية"
        DataG1.Columns(7).HeaderText = "عدد افراد الاسرة"
        DataG1.Columns(8).HeaderText = "الفئة"
        DataG1.Columns(9).HeaderText = "الحالة"
        DataG1.Columns(10).HeaderText = "الدرجة"
        DataG1.Columns(11).HeaderText = "ملاحظات"
    End Sub