ASP.NET

'Group the Store Invoices by Store to Average out the Freight/Shipping Margins
Dim gFreightInvoicesGrouped As List(Of AtdFreightInvoiceReport) = gFreightInvoicesAll _
    .OrderBy(Function(ob) ob.FSTORECODE) _
    .Where(Function(a) a.FSTORECODE = String.Empty Or a.FSTORECODE.ToLower() = "unknown") _
    .GroupBy(Function(inv) inv.FSTORECODE).Select(Function(cl) New AtdFreightInvoiceReport() With {
        .FINVNO = cl.First().FINVNO,
        .FSTORECODE = cl.First().FSTORECODE,
        .FLOCATION = cl.First().FLOCATION,
        .FAMOUNT = cl.Sum(Function(x) x.FAMOUNT),
        .FSHIPCOST = cl.Sum(Function(x) x.FSHIPCOST),
        .FSHIPPRICE = cl.Sum(Function(x) x.FSHIPPRICE),
        .FMARGINPERCENT = cl.Sum(Function(x) x.FMARGINPERCENT),
        .FREDFLAG = False,
        .FITEMS = cl.GroupBy(Function(shipItems) shipItems.FITEMS).ToList()
}).ToList()

<pre> 
var options = new RewriteOptions(); 
bool blnsiteA = false;

var tempoptions = new RewriteOptions();
tempoptions.Add(rewriteContext =>
{
   var request = rewriteContext.HttpContext.Request;
   if (request.Host.Host == "siteA.com")
   {
       blnsiteA = true;
   }
});
            
if (blnsiteA)
{
    options.AddIISUrlRewrite(env.ContentRootFileProvider, "RewritesSiteA.xml");
}
else
{
    options.AddIISUrlRewrite(env.ContentRootFileProvider, "RewritesSiteB.xml");
}

options.AddRedirectToNonWww();
app.UseRewriter(options);
app.UseStaticFiles();

public class Person
 {
     [Key]
     public int Id { get; set; }
     public string Name { get; set; }
     public double Poids { get; set; }
     public double Glycemie { get; set; }
 }

<div class="row">
    <div class="col-md-4">
        <form asp-action="Create">
            <div asp-validation-summary="ModelOnly" class="text-danger"></div>
            <div class="form-group">
                <label asp-for="Name" class="control-label"></label>
                <input asp-for="Name" class="form-control" />
                <span asp-validation-for="Name" class="text-danger"></span>
            </div>
            <div class="form-group">
                <label asp-for="Poids" class="control-label"></label>
                <input asp-for="Poids" class="form-control" />
                <span asp-validation-for="Poids" class="text-danger"></span>
            </div>
            <div class="form-group">
                <label asp-for="Glycemie" class="control-label"></label>
                <input asp-for="Glycemie" class="form-control" />
                <span asp-validation-for="Glycemie" class="text-danger"></span>
            </div>
            <div class="form-group">
                <input type="submit" value="Create" class="btn btn-primary" />
            </div>
        </form>
    </div>
</div>

[HttpPost]
[ValidateAntiForgeryToken]
public async Task<IActionResult> Create([Bind("Id,Name,Poids,Glycemie")] Person person)
{
    if (ModelState.IsValid)
    {
        _context.Add(person);
        await _context.SaveChangesAsync();
        return RedirectToAction(nameof(Index));
    }
    return View(person);
}

Need to Integrate Swipe Machine in my C# Application for billing

onclick="javascript:setTimeout('__doPostBack('[ctrl ID here]','')', 0)"

I have the following code that is sist make the firs leter of a token uppercase,  do not know if this is the correct way to do it.

I only run thos on my local machine

The value of slug is the token name on coinmarketcup

At the moment when I open the page it show me the name of the token that I have click on, but they are all lowercase, so I want it to show the first letter in uppercase.

If i using the code that i have giving it shows CoinDetails (it is my page name) 

<pre>
<?php
	// Get the post title from the URL
	$slug = basename(parse_url($_SERVER["REQUEST_URI"], PHP_URL_PATH));
   // Remove any file extension
   $slug = preg_replace('/\\.[^.\\s]{3,4}$/', '', $slug);
   // Capitalize the first letter of the slug
   $slug = ucfirst(strtolower($slug));
?>

<pre><div class="card-header" >
	<h5 class="card-title mb-0" ><?php echo $slug; ?></h5>
</div>

how to auto print label in vb to be in the database

public class EquipmentsController : ODataController
    {
        private readonly SqlServerContext _sqlServerContext;

        public EquipmentsController(SqlServerContext sqlServerContext)
        {
            _sqlServerContext = sqlServerContext;
        }

        [HttpGet]
        [EnableQuery]
        public ActionResult<IQueryable<Equipment>> Get()
        {
            IQueryable<Equipment> eqList = _sqlServerContext.Equipments.AsQueryable()
                .Include(x => x.CostCenter)
                .Include(x => x.EquipmentCategory)
                .Include(x => x.equipmentType);

            return Ok(eqList);
        }
    }

static IEdmModel GetEdmModel()
{
    ODataConventionModelBuilder builder = new();
    builder.EntitySet<Equipment>("Equipments");
    return builder.GetEdmModel();
}

 <ajax:ModalPopupExtender ID="installAddress_MPE" runat="server" TargetControlID="label2" PopupControlID="div5" BackgroundCssClass="modalBackground" />
<div id="div5" runat="server">
 <asp:Table ID="Table1" Style="background-color:White; font-size:12pt; color:Black;" runat="server">
   <asp:TableRow>
     <asp:TableCell ID="TableCell3" Style="background-color:Blue; font-size:14pt; color:White;" runat="server" ColumnSpan="6">
      <asp:Label ID="installAddressHeader" runat="server" Text="New Installation Address Entry" />
     </asp:TableCell>
   </asp:TableRow>
</asp:Table>
<div id="divRebatable" class="popupdiv">
   <asp:TextBox ID="txt_toiletsizes" placeholder="Enter new Toiltet GPF" Width="150px" runat="server"></asp:TextBox>
    <asp:TextBox ID="txt_newAmount" placeholder="Enter amount" Width="100px" runat="server"></asp:TextBox>
    <asp:Button ID="btn_add" runat="server" Text="Add It" onclick="btn_add_Click"
        Width="100px" />
    <asp:Table ID="rebatableTable" Width="100%" runat="server">
        <asp:TableRow CssClass="divHeader"><asp:TableHeaderCell ColumnSpan="4">Add Rebatable Toilets</asp:TableHeaderCell></asp:TableRow>
        <asp:TableRow ID="allToilets" runat="server">
            <asp:TableHeaderCell>How many toilets?</asp:TableHeaderCell>
            <asp:TableCell>
             <asp:DropDownList ID="ddlNumber" runat="server" OnSelectedIndexChanged="ddlNumber_SelectedIndexChanged" AutoPostBack="true">
               <asp:ListItem Text="--Select--" Value=""></asp:ListItem>
               <asp:ListItem Text="1" Value="1"></asp:ListItem>
               <asp:ListItem Text="2" Value="2"></asp:ListItem>
               <asp:ListItem Text="3" Value="3"></asp:ListItem>
             </asp:DropDownList>
            </asp:TableCell>
            </asp:TableRow>
    </asp:Table>
</div>
     <div>
         <asp:Repeater ID="DynamicRepeater" runat="server" onitemdatabound="DynamicRepeater_ItemDataBound">
             <HeaderTemplate>
                 <table border="1">
                     <tr>
                         <td>Toilet Size</td>
                          <td>Model #</td>
                         <td>Date Upgraded</td>
                     </tr>
             </HeaderTemplate>
             <ItemTemplate>
                 <tr>
                     <td>
                   <asp:DropDownList ID="ddlToiletGPF" AutoPostBack="true" runat="server">
                   </asp:DropDownList>
                     </td>
                     <td>
                         <asp:TextBox ID="ModelNumber" runat="server"></asp:TextBox>
                     </td>
                     <td>
                         <asp:TextBox ID="DateUpgraded" runat="server"></asp:TextBox>
                     </td>
                 </tr>
             </ItemTemplate>
             <FooterTemplate>
                 </table>
             </FooterTemplate>
         </asp:Repeater><br />
         <asp:Label ID="lblSuccess" style="font-weight:bold;" runat="server" Text=""></asp:Label>
     </div>
   </div>
   <asp:Label ID="lblMsg" runat="server" Text="" /><br />


    Protected Sub Submit(sender As Object, e As EventArgs)

        Dim address As String = Request.Form(txtSearch.UniqueID)
        Dim speakerId As String = Request.Form(hfAutoId.UniqueID)

        'get the results and fill in the datagrid

        Dim sqlStatement As String = "Select o.PrimaryFirst, o.PrimaryLast, ap.applicant, FORMAT(ap.DateReceived, 'd','us') as DateReceived,o.SecondaryFirst,o.SecondaryLast,ad.InstallAddress,ad.InstallCity, ad.InstallState, ad.InstallZip, ad.WaterAcctNo from Applications ap "
        sqlStatement += "inner Join Addresses ad on ap.WaterAccountNo = ad.WaterAcctNo inner join Owner o on ap.OwnerCode = o.OwnerID Where ad.InstallAddress Like '%" & address.Replace("'", "''").Trim() & "%'"

        Dim sqlCmd2 As SqlCommand = New SqlCommand(sqlStatement, myConnection)
        Dim reader As SqlDataReader = sqlCmd2.ExecuteReader()

        If reader.HasRows Then
            While reader.Read()
                div1.Visible = False
                installationAddress.Text = reader("InstallAddress").ToString() & " " & reader("InstallCity").ToString() & ", " & reader("InstallState").ToString() & " " & reader("InstallZip").ToString()
                waterAccountNumber.Text = reader("WaterAcctNo").ToString()
                ownerInformation.Text = reader("PrimaryFirst").ToString() & " " & reader("PrimaryLast").ToString()
                dateReceived.Text = reader("dateReceived").ToString()
                applicantName.Text = reader("applicant").ToString()
            End While
        Else
            div1.Visible = True
        End If
        reader.Close()
        sqlCmd2.Dispose()
        myConnection.Close()
    End Sub