[hoob computer]

السلام عليكم أخي,
جزاك الله خيراً على المثال الرائع, لكن عندي سؤال اذا سمحت:
في الحقيقة أنا محترف في قواعد البيانات و تصميم قواعد البيانات, و ضعيف في الفيجول بيسك دوت نت.
لذا, لو سمحت أن تتفضل بشرح الكود التالي لي و سأكون شاكراً لجميلك :

PHP كود :

Private Shared con As OleDbConnection
    Private Shared Function GetConnectioin() As OleDbConnection
        Return New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\db.mdb")
    End Function
    Shared ReadOnly Property DatabaseConnection As OleDbConnection
        Get
            If con Is Nothing Then
                con = GetConnectioin()
                con.Open()
            End If
            Return con
        End Get
    End Property
    Shared Function FillGrid() As DataTable
        Dim querystring As String = "SELECT EMPLOYEE.EMPID, EMPLOYEE.EMPLOYEE, Sum(EMPLEAVES.NORMAL) AS SumOfNORMAL, Sum(EMPLEAVES.SICK) AS SumOfSICK FROM EMPLOYEE INNER JOIN EMPLEAVES ON EMPLOYEE.EMPID = EMPLEAVES.EMPID GROUP BY EMPLOYEE.EMPID, EMPLOYEE.EMPLOYEE"
        Dim adapter As New OleDbDataAdapter(querystring, DatabaseConnection)
        Dim dt As New DataTable
        adapter.Fill(dt)
        Return dt
    End Function
    Shared Function FillGrid(ByVal EMPID As Integer) As DataTable
        Dim querystring As String = "SELECT EMPLEAVES.ID, EMPLEAVES.EMPID, EMPLEAVES.NORMAL, EMPLEAVES.SICK FROM(EMPLEAVES) where EMPLEAVES.EMPID =@id"
        Dim adapter As New OleDbDataAdapter(querystring, DatabaseConnection)
        adapter.SelectCommand.Parameters.Add("@id", OleDbType.Integer).Value = EMPID
        Dim dt As New DataTable
        adapter.Fill(dt)
        Return dt
    End Function 


فما هو الـ (Private Shared)؟

بالاضافة الى, حاولت اضافة خاصية الاضافة للداتاجريد ولكن يظهر عندي خطأ اثناء محاولة الاضافة. فما هو الحل برأيك؟

أخوكم في الله.
Hoob Computer