hpr4629 :: What did I do at work today? Part 2
Lee does some coding implementing the user interface toggling availability of a list of resources.
Hosted by Lee on Thursday, 2026-04-30 is flagged as Clean and is released under a CC-BY-SA license.
web development, programming, windows.
(Be the first).
Listen in ogg,
opus,
or mp3 format. Play now:
Duration: 00:42:53
Download the transcription and
subtitles.
general.
This show is about developing features for a web application. The technology used is ASP.Net WebForms , the programming language is Visual Basic .Net along with HTML and CSS and the development environment is Windows 11 running under a virtual machine in Linux, with Visual Studio and SQL Server as the database. Other tools used are Git , Github , Joplin and Dropbox , Google Gemini and a tool called Beyond Compare .
ResourceRowControl.ascx.vb
Public WriteOnly Property ResourceObject As Resource Set(obj As Resource) If obj IsNot Nothing Then HiddenResourceID.Value = CStr(obj.ResourceID) HiddenResourceTypeID.Value = CStr(obj.ResourceTypeID) Resource.Text = obj.ResourceName Type.Text = obj.ResourceTypeName Available.Checked = obj.ResourceAvailable End If End Set End Property Private Sub Available_CheckedChanged(sender As Object, e As EventArgs) Handles Available.CheckedChanged Dim objResource As New Resource With objResource .ResourceID = ResourceID .ResourceName = Resource.Text .ResourceTypeID = ResourceTypeID .ResourceAvailable = Available.Checked End With objResource.Add() End Sub
ResourceRowControl.ascx
<tr> <td> <asp:Label runat="server" ID="Resource"></asp:Label> </td> <td> <asp:Label runat="server" ID="Type"></asp:Label> </td> <td> <asp:Button runat="server" ID="Edit" CssClass="Pointer fa" BackColor="White" ForeColor="#741E43" BorderStyle="None" Text="" /> </td> <td> <asp:Button runat="server" ID="Delete" CssClass="Pointer fa" BackColor="White" ForeColor="#741E43" BorderStyle="None" Text="" OnClientClick="return DeleteResourceRow(this.id)" /> </td> <td> <label class="toggle-checkbox"> <asp:CheckBox runat="server" ID="Available" AutoPostBack="true" /> <span class="slider"></span> </label> </td> </tr>