Skip to content

Instantly share code, notes, and snippets.

View jobjo's full-sized avatar

Joel Bjornson jobjo

  • London
View GitHub Profile
type UserInfo = { Name: string; Email : string}
module Server =
[<Rpc>]
let GetUsers () =
Db.GetUsers // Your db call
|> Seq.map (fun u ->
{
Name = u.Name
let options = new MapOptions(8, center, MapTypeId.ROADMAP)
let map = new Google.Maps.Map(mapElement.Body, options)
// Create the marker
let markerOption = new MarkerOptions(center)
markerOption.Map <- map
let marker = new Marker(markerOption)
// Function for setting mark the lat/long.
let setLatLong (latLong: LatLng) =
.myValidIcon
{
width : 20px;
height : 20px;
background-color: Green;
}
.myErrorIcon
{
width : 20px;