ASPBlogBrainOrdure/app/views/Admin/categories.asp

<div class="d-flex align-items-center justify-content-between mb-4">
  <div>
    <h1 class="h3 mb-1">Manage Categories</h1>
    <p class="text-muted mb-0">All categories &mdash; edit or delete.</p>
  </div>
  <a class="btn btn-primary" href="<%= CategoryNewUrl() %>">New Category</a>
</div>

<% If categories.Count = 0 Then %>
  <div class="alert alert-secondary">No categories yet. <a href="<%= CategoryNewUrl() %>">Create the first one.</a></div>
<% Else %>
  <div class="table-responsive">
    <table class="table table-hover align-middle">
      <thead class="table-light">
        <tr>
          <th>Name</th>
          <th>Description</th>
          <th class="text-end">Actions</th>
        </tr>
      </thead>
      <tbody>
        <%
        Dim adminCatIter, adminCatItem
        Set adminCatIter = categories.Iterator()
        Do While adminCatIter.HasNext
            Set adminCatItem = adminCatIter.GetNext()
        %>
        <tr>
          <td>
            <a href="<%= CategoryUrl(adminCatItem.CategoryID) %>" class="text-decoration-none fw-semibold">
              <%= H(adminCatItem.Name) %>
            </a>
          </td>
          <td class="text-muted small"><%= H(adminCatItem.Description) %></td>
          <td class="text-end text-nowrap">
            <a class="btn btn-sm btn-outline-secondary" href="<%= CategoryEditUrl(adminCatItem.CategoryID) %>">Edit</a>
            <form class="d-inline" method="post" action="<%= CategoryDeleteUrl(adminCatItem.CategoryID) %>">
              <button class="btn btn-sm btn-outline-danger" type="submit" onclick="return confirm('Delete this category?')">Delete</button>
            </form>
          </td>
        </tr>
        <%
        Loop
        %>
      </tbody>
    </table>
  </div>
<% End If %>