<%@ Page Language="VB" Inherits="System.Web.Mvc.ViewPage" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
    <title>Présence</title>
</head>
<body>
Présences
    <div>
    <form method="post" action="/Course/Attendance">
    <%  If Not IsNothing(ViewData.Item("scheduleclient")) Then
            Dim dtClient As CoursE.coursedata.clientDataTable = ViewData.Item("scheduleclient")
            For intcpt As Integer = 0 To dtClient.Rows.Count - 1
                Response.Write("<br />" & dtClient.Rows(intcpt).Item("CLIENT_FIRST_NAME") & " " & dtClient.Rows(intcpt).Item("CLIENT_LAST_NAME"))
                %>
          <input type="checkbox" name="CLIENT_ID" value="<% response.write(dtClient.Rows(intcpt).Item("CLIENT_ID")) %>"           
          <% If dtClient.Rows(intcpt).Item("SCHEDULE_CLIENT_STATUS").tostring = "4" Then%>
          checked="checked"
          <% End If%>
          />      
    <%
    Next
End If
           %>
            <input type="hidden" name="SCHEDULE_ID" value="<% Response.Write(ViewData.Item("SCHEDULE_ID")) %>" />
            <% If Not IsNothing(ViewData.Item("redirectto")) Then%>
            <input type="hidden" name="redirectto" id="redirectto" value="<% Response.Write(ViewData.Item("redirectto")) %>" />
            <% End If%>
            <br /><input type="submit" value="Soumettre les présences"/>
            </form>
    </div>
</body>
</html>
