توسعه کنترلر و مدل در F# MVC4
نویسنده: مسعود پاکدل
تاریخ: ۱۳۹۲/۱۲/۱۷ ۲۳:۵
آدرس: www.dntips.ir
| مطالب | ۳۶۹۴ |
| نویسندگان | ۲۷۶ |
| گروههای مطالب | ۱۰۲۴ |
| نقشههای راه | ۱۱۹ |
| دورهها | ۱۴ |
| اشتراکها | ۱۷۹۱۴ |
@model IEnumerable<FsWeb.Models.Book>
<!DOCTYPE html>
<html>
<head>
<title>@ViewBag.Title</title>
<meta name="viewport" content="width=device-width, initial-scale=1" />
<link rel="stylesheet"
href="http://code.jquery.com/mobile/1.0.1/jquery.mobile-1.0.1.min.css" />
</head>
<body>
<div data-role="page" data-theme="a" id="booksPage">
<div data-role="header">
<h1>Guitars</h1>
</div>
<div data-role="content">
<ul data-role="listview" data-filter="true" data-inset="true">
@foreach(var x in Model) {
<li><a href="#">@x.Name</a></li>
}
</ul>
</div>
</div>
<script src="http://code.jquery.com/jquery-1.6.4.min.js">
</script>
<script src="http://code.jquery.com/mobile/1.0.1/jquery.mobile-1.0.1.min.js">
</script>
<script>
$(document).delegate("#bookPage", 'pageshow', function (event) {
$("div:jqmData(role='content') > ul").listview('refresh');
});
</script>
</body>
</html> namespace FsWeb.Controllers
open System.Web.Mvc
open FsWeb.Models
[<HandleError>]
type BooksController() =
inherit Controller()
member this.Index () =
seq { yield Book(Name = "My F# Book")
yield Book(Name = "My C# Book") }
|> this.View namespace FsWeb.Models
type Book = { Id : Guid; Name : string } namespace FsWeb.Models type Book() = member val Name = "" with get, set
open System.ComponentModel.DataAnnotations type Book() = [<Required>] member val Name = "" with get, set
namespace FsWeb.Models open System open System.ComponentModel.DataAnnotations type Book() = [<Key>] member val Id = Guid.NewGuid() with get, set [<Required>] member val Name = "" with get, set