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

<%@ Register TagPrefix="uc" TagName="Menu" Src="~/Views/Shared/Menu.ascx" %>
<%@ Register TagPrefix="uc" TagName="CourseMenu" Src="~/Views/Accounting/AccountingMenu.ascx" %>

<!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 id="Head1" runat="server">
<title>Index</title>
<style type="text/css">
.table_client tr th h4 {
	text-align: left;
}
.texte {
	text-align: left;
	font-size: 12px;
	line-height: normal;
	font-weight: 200;
}
</style>
</head>
<body>
    <uc:Menu id="MenuTop" 
        runat="server"/>
    <uc:CourseMenu id="SubMenu" 
        runat="server"/>

    <h2>Liste des Sites<br />
      <br />
    </h2>
    <div>
   <%  
       Dim dt As CoursE.coursedata.siteDataTable = Me.ViewData.Item("tablesite")
     
       %><table width="895" border="0" cellpadding="0" cellspacing="0" class="table_client"><tr><th width="147"><h4>CODE</h4></th><th width="430"><h4>DESCRIPTION</h4></th><th width="52"></th></tr><div class="texte"><%
       For intCpt As Integer = 0 To dt.Rows.Count - 1
       %><tr><td><%
                     Response.Write(dt.Item(intCpt).SITE_CODE)
       %></td><td><%
                      Response.Write(dt.Item(intCpt).SITE_DESCRIPTION)
       %></td><td><a href="DetailsSite/<% Response.Write(dt.Item(intCpt).SITE_ID) %>">Voir</a></td></tr><%
             Next
                    %></div></table><%
       Response.Write("<br />Total : " & dt.Rows.Count)
   %> 
    
    </div>
</body>
</html>
