[مهموم]

السلام عليكم ورحمة الله

أخي محمد

الكود التالي سيظهر لك تماماً ما طلبت

PHP كود :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    MsgBox(getEmployeeReport(100))
End Sub


Function getEmployeeReport(ByVal employeeID As Integer) As String

    Dim sb As New System.Text.StringBuilder

    Dim dataContext As New DataClasses1DataContext
    Dim days =
        From x In dataContext.punches
        Where x.empcode = employeeID
        Group By x.empcode, x.empdate
        Into grp = Group, Count()

    For Each d In days

        Dim time As New List(Of String)
        Dim mode As New List(Of String)

        For Each g In d.grp
            time.Add(DateTime.Parse(g.emptime.Value.ToString()).ToString("HH:mm"))
            mode.Add(Val(g.tacode).ToString("00"))
        Next

        sb.AppendLine(
            String.Concat(
                d.empcode, " - ", DateTime.Parse(d.empdate.ToString).ToString("dd/MM/yyyy"),
                " - ",
                String.Join(" - ", time.ToArray), " - ", String.Join(" - ", mode.ToArray)
                )
            )
    Next

    Return sb.ToString

End Function 


---

السلام عليكم ورحمة الله

أخي محمد

لمعرفة كيف يعمل الكود عليك بتعلم LinqToSql عن طريق دروس الأستاذ خضر:
الدرس الأول : Linq To SQL
الدرس الثاني : Linq To SQL
الدرس الثالث : Linq To SQL
الدرس الرابع : Linq To SQL

لا تقلق من LinqToSql فهي سهلة جداً، فقط إبدأ...