F#
HTML
Result
Hosted on
Try WebSharper
<
>
namespace Samples open WebSharper open WebSharper.JavaScript open WebSharper.UI.Next open WebSharper.UI.Next.Html open WebSharper.UI.Next.Client open WebSharper.Forms open WebSharper.Forms.Bootstrap [<JavaScript>] module HelloWorld = type Person = { Name: string } let cls = attr.``class`` let form (person: Person) = Form.Return (fun name -> { Name = name }) <*> (Form.Yield person.Name |> Validation.IsNotEmpty "Enter a name") |> Form.WithSubmit let render (name: Var<string>) (submit: View<Result<_>>) = Controls.Simple.InputWithError "Name" name submit let Main = form { Name = "person1"} |> Form.Render (fun name submit -> divAttr [cls "form-inline"] [ render name submit.View Doc.ButtonValidate "Save" [cls "btn btn-primary"] submit ]) |> Doc.RunById "main"
<html> <head> <title></title> </head> <body> <div id="main"></div> <!--[BODY]--> </body> </html>