<asp:ListView runat="server" ID="ltvElencoMacchineCat" DataSourceID="SqlDataSourceElencoMacchineCat" GroupItemCount="3">
    <LayoutTemplate>
        <table width="100%" height="100%" border="1px" align="center" cellpadding="0" cellspacing="0">
            <asp:PlaceHolder runat="server" ID="groupPlaceHolder"></asp:PlaceHolder>
        </table>
    </LayoutTemplate>
    <GroupTemplate>
        <tr>
            <div ID="itemPlaceholder" runat="server" />
        </tr>
    </GroupTemplate>
    <ItemTemplate>
        <td valign="middle" align="center">
            <table width="150px" height="100%" border="1px" align="center" cellpadding="5" cellspacing="0">
                <tr>
                    <td height="70px" valign="middle" align="center"><span class="titolograndenero"><asp:PlaceHolder runat="server" ID="PercentualeProdotti" /></span></td>
                </tr>
                <tr>
                    <td valign="middle" align="center"><span class="testopiccologrigio"><asp:PlaceHolder runat="server" ID="TitoloCategoria" /></span></td>
                </tr>
            </table>
        </td>
    </ItemTemplate>
</asp:ListView>
<asp:SqlDataSource ID="SqlDataSourceElencoMacchineCat" runat="server" ConnectionString="<%$ ConnectionStrings:CompanyReadConnectionString %>" SelectCommand="SELECT * FROM [Categorie] WHERE ID_Appartenenze = 1 ORDER BY ID_Categoria"></asp:SqlDataSource>

<script runat="server">
    Protected Sub ltvElencoMacchineCat_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.ListViewItemEventArgs) Handles ltvElencoMacchineCat.ItemDataBound

        If (e.Item.ItemType = ListViewItemType.DataItem) Then

            If ReadMacchinari.HasRows = True Then
                Dim plcTitCat As PlaceHolder = DirectCast(e.Item.FindControl("TitoloCategoria"), PlaceHolder)
                Dim TitoloCategoria As New Literal
                TitoloCategoria.Text = DirectCast(e.Item.DataItem, DataRowView).Row("Titolo").ToString()
                plcTitCat.Controls.Add(TitoloCategoria)
            Else
                e.Item.Visible = False
            End If
                
            ReadMacchinari.Close()
            CommMacchinari.Connection.Close()
            CommMacchinari.Dispose()
            ConnMacchinari.Dispose()
        End If

    End Sub

</script>