MVC3 之asp.net 与vb.net 互转练习
vb.net mvc3相关教程http://www.asp.net/mvc/overview/older-versions/getting-started-with-aspnet-mvc3/vb/adding-a-view
asp.net mvc3太多了，不列举了。
vb.net 相关基础
http://www.lob.cn/jq/kfjq/1933.shtml
复制代码Dim namedCust = New Customer With {.Name = "Terry Adams"}
匿名类型没有可用的名称。因此，匿名类型的实例化不能包含类名称。
复制代码Dim anonymousCust = New With {.Name = "Hugo Garcia"}
开始正文 asp.net 原文是http://www.cnblogs.com/willick/p/3418517.html
使用 MVC Unobtrusive Ajax
在 MVC 中使用 Unobtrusive Ajax ，首先要将其“开启”，需要做两个动作。一个是配置根目录下的 Web.config 文件，在 configuration/appSettings 节点下的 UnobtrusiveJavaScriptEnabled 值设为 true，如下所示：
...
<configuration>
<appSettings>
...
<add key="UnobtrusiveJavaScriptEnabled" value="true" />
</appSettings>
</configuration>
...
UnobtrusiveJavaScriptEnabled 的值在程序创建的时候默认为true，在开发的时候有时候只需要检查一下。第二个动作就是在需要使用 MVC Unobtrusive Ajax 的 View 中引入jquery库和jquery.unobtrusive-ajax.min.js文件，一般更为常见的是在 /Views/Shared/_Layout.cshtml 中引入，如下：
<!DOCTYPE html>
<html>
<head>
<meta charset="utf-8" />
<meta name="viewport" content="width=device-width" />
<title>@ViewBag.Title</title>
<script src="~/Scripts/jquery-1.8.2.min.js"></script>
<script src="~/Scripts/jquery.unobtrusive-ajax.min.js"></script>
</head>
<body>
@RenderBody()
</body>
</html>
现在我们来做一个使用 Unobtrusive Ajax 的例子，从服务器获取一个简单的用户列表。为此我们需要准备一个Model，如下：
namespace MvcApplication1.Models {
public class Person {
public string ID { get; set; }
public string Name { get; set; }
public Role Role { get; set; }
}
public enum Role {
Admin, User, Guest
}
}
我一般习惯先写后台方法，再写UI。创建一个名为 People 的 controller， 在该 controller 中写好要用的 action，代码如下：
public class PeopleController : Controller {
private Person[] personData = {
new Person {ID = "ZhangSan", Name = "张三", Role = Role.Admin},
new Person {ID = "LiSi", Name = "李四", Role = Role.User},
new Person {ID = "WangWu", Name = "王五", Role = Role.User},
new Person {ID = "MaLiu", Name = "马六", Role = Role.Guest}
};
public ActionResult Index() {
return View();
}
public PartialViewResult GetPeopleData(string selectedRole = "All") {
IEnumerable<Person> data = personData;
if (selectedRole != "All") {
Role selected = (Role)Enum.Parse(typeof(Role), selectedRole);
data = personData.Where(p => p.Role == selected);
}
return PartialView(data);
}
public ActionResult GetPeople(string selectedRole = "All") {
return View((object)selectedRole);
}
}
这里添加了 GetPeopleData action方法，根据 selectedRole 获取用户数据并传递给 PartialView 方法。
接着为 GetPeopleData action 创建一个partial view：/Views/People/GetPeopleData.cshtml ，代码如下：
@using MvcApplication1.Models
@model IEnumerable<Person> @foreach (Person p in Model) {
<tr>
<td>@p.ID</td>
<td>@p.Name</td>
<td>@p.Role</td>
</tr>
}
再创建我们的主视图 /Views/People/GetPeople.cshtml，代码如下：
@using MvcApplication1.Models
@model string @{
ViewBag.Title = "GetPeople";
AjaxOptions ajaxOpts = new AjaxOptions {
UpdateTargetId = "tableBody"
};
} <h2>Get People</h2>
<table>
<thead><tr><th>First</th><th>Last</th><th>Role</th></tr></thead>
<tbody id="tableBody">
@Html.Action("GetPeopleData", new { selectedRole = Model })
</tbody>
</table>
@using (Ajax.BeginForm("GetPeopleData", ajaxOpts)) {
<div>
@Html.DropDownList("selectedRole", new SelectList(
new[] { "All" }.Concat(Enum.GetNames(typeof(Role)))))
<button type="submit">Submit</button>
</div>
}
vb.net格式的 model
Public Class Person
Private _iD As String
Public Property ID() As String
Get
Return _iD
End Get
Set(ByVal value As String)
_iD = value
End Set
End Property Private _name As String
Public Property Name() As String
Get
Return _name
End Get
Set(ByVal value As String)
_name = value
End Set
End Property Private _role As Role
Public Property Role() As String
Get
Return _role
End Get
Set(ByVal value As String)
_role = value
End Set
End Property End Class Public Enum Role
Admin
User
Guest
End Enum
PeopleController 代码 这里要注意一点 with 用法，还有默认值可选项 ，还有拉姆达表达式转换
Namespace MvcApplication1
Public Class PeopleController
Inherits System.Web.Mvc.Controller Dim personData() As Person = {
New Person With {
.ID = "ZhangSan", .Name = "张三", .Role = Role.Admin
},
New Person With {
.ID = "LiSi", .Name = "李四", .Role = Role.User
},
New Person With {
.ID = "WangWu", .Name = "王五", .Role = Role.User
},
New Person With {
.ID = "MaLiu", .Name = "马六", .Role = Role.Guest
}
}
'
' GET: /People Function Index() As ActionResult
Return View()
End Function
Public Function GetPeopleData(Optional ByVal selectedRole As String = "All") As PartialViewResult
Dim data As IEnumerable(Of Person) = personData
If (selectedRole <> "All") Then
’Dim selected As Role = CType(selectedRole, Role)
Dim selected As Role = CType([Enum].Parse(GetType(Role), selectedRole), Role)'更改后的
' Role selected = (Role)Enum.Parse(typeof(Role), selectedRole);
data = From p In personData Where p.Role = selected
End If
Return PartialView(data)
End Function
Public Function GetPeople(Optional ByVal selectedRole As String = "All") As ActionResult
Return View(CType(selectedRole, Object))
End Function
End Class
End Namespace
视图需要注意的地方是：html标签的写法，不能像asp.net中那样随便写了，必须在前面加一个@符号 ，否则出现错误。
GetPeopleData 视图
@Imports MvcApplication1.Models @*可以不写的*@
<table>
@For Each p As MvcApplication1.Person In Model @<tr>
<td>@p.ID</td>
<td>@p.Name</td>
<td>@p.Role</td>
</tr>
Next
</table>
GetPeople 视图
@*@Imports MvcApplication1.Models 可以省略*@
@Code
ViewData("Title") = "GetPeople"
Dim ajaxOpts As AjaxOptions = New AjaxOptions With {
.UpdateTargetId = "tableBody"
}
End Code <h2>GetPeople</h2>
<table>
<thead><tr><th>First</th><th>Last</th><th>Role</th></tr></thead>
<tbody id="tableBody">
@Html.Action("GetPeopleData", New With {.selectedRole = Model})
</tbody>
</table>
@Using Ajax.BeginForm("GetPeopleData", ajaxOpts) @<div>
//这里没有转换成功，需要学习 终于成功了
@Html.DropDownList("selectedRole", New SelectList(
New Object() {"All"}.Concat([Enum].GetNames(GetType(MvcApplication1.Role)))))
<button type="submit">Submit</button>
</div> End Using
new[] 对应的vb.net 是 New Object()
没有实现，一直挂在心头，今天终于成功了！也是偶然。
显示效果 图
点击submit后显示
记录一下。
MVC3 之asp.net 与vb.net 互转练习的更多相关文章
- 分享自制的C#和VB Code互转工具
分享自制的C#和VB Code互转工具 作为.NET程序员,往往习惯使用一种语言(据我观察,2006年后的程序员习惯用C#,之前的喜欢VB).而对于另一种语言虽然能读懂但是写起来总是比较费事.尤其面对 ...
- 在MVC3或asp.net中修改KindEditor实现上传图片时添加水印
主要修改两个文件:image.js和upload_json.ashx文件. 一.修改image.js文件 打开kindeditor/plugins/image目录下的image.js文件,找到 '&l ...
- ASP.NET与json对象互转
这两天写这个xml跟json的读写,心累啊,也不是很理解,请大家多指教 首先来个热身菜做一个简单的解析json 在script里写一个简单的弹窗效果 <script> //script里简 ...
- Asp.Net时间戳与时间互转
/// <summary> /// 时间戳转成时间类型 /// </summary> /// <param name="timeStamp">& ...
- ASP.NET MVC3升级到ASP.NET MVC4 的方法
ASP.NET MVC3升级 ASP.NET MVC4 的方法: 1.先去掉引用的System.Web.Mvc.dll(MVC3版本),重新引入System.Web.Mvc.dll(MVC4版本) 2 ...
- Asp.Net MVC3 简单入门第一季（三）详解Controller之Filter
前言 前面两篇写的比较简单,刚开始写这个系列的时候我面向的对象是刚开始接触Asp.Net MVC的朋友,所以写的尽量简单.所以写的没多少技术含量.把这些技术总结出来,然后一简单的方式让更多的人很好的接 ...
- ASP.NET MVC3 系列教程 - 目录
ASP.NET MVC3 系列教程 - 目录 I:ASP.NET MVC3 新增的功能 ASP.NET MVC3 系列教程 - Razor视图引擎基础语法ASP.NET MVC3 系列教程 - V ...
- asp 调用 vb(activex dll) ，参数传递(传引用)需要注意
今天上午测试 vb 与 c(dll) 之间交互,传递参数的时候,没遇到什么太大的问题. 下午在asp中调用vb(activex dll)时, 在asp代码中传参数到 vb(dll)中时,遇到问题了. ...
- asp <----> vb(com,dll) <---> c 来回的调用，生命在于折腾
最近想改进一个两年前写的小程序,原因是最近将运行在托管服务器上的asp程序迁移到阿里云主机上运行. 初次使用阿里云主机,买了一个配置较低的主机(1核,1G内存,年付:1500左右吧) 原来使用的托管的 ...
随机推荐
- python中的接口和依赖注入
首先,我们必须明确的一点是:python里无接口类型,定义接口只是一个人为规定,在编程过程自我约束 python的类是可以写任意个方法的 定义一个接口对继承类进行约束,接口里有什么方法,继承类就必须有 ...
- 岭回归&Lasso回归
转自:https://blog.csdn.net/dang_boy/article/details/78504258 https://www.cnblogs.com/Belter/p/8536939. ...
- 4.12 Routing -- Preventing And Retrying Transitions
一.概述 在一个路由的跳转过程中,Ember路由器传递一个跳转对象到被跳转调用的路由的不同的hooks中.任何一个hook获取这个跳转对象,有能力通过调用transition.abort()终止跳转, ...
- cocos代码研究（19）Widget子类ImageView学习笔记
理论基础 显示图片的小控件,继承自 Widget . 代码实践 static ImageView * create()创建一个空的ImageView static ImageView * create ...
- linux改变apt-get安装源
最近自己装了个ubuntu kylin 在使用的过程中发现,系统的apt-get 的源有毛病,总是安装不了软件. 感觉应该是传说中的墙的原因,所以准备换到阿里云的源. 下面是步骤: 1.复制原文件备份 ...
- 198. House Robber(动态规划)
198. House Robber You are a professional robber planning to rob houses along a street. Each house ha ...
- 2017 ACM/ICPC Asia Regional Qingdao Online Solution
A : Apple 题意:给出三个点,以及另一个点,求最后一个点是否在三个点的外接圆里面,如果在或者在边界上,输出“Rejected”,否则输出"Accepted" 思路:先求一个 ...
- surface知识点
SurfaceView和TextureView 在学习直播的过程遇到一个问题:连麦场景下能够支持大小窗口切换(即小窗口变大,大窗口变小),大窗口是TextView(用于拉流显示),而小窗口是Surfa ...
- Conductor
https://netflix.github.io/conductor/ High Level Architecture
- [one day one question] GIF动画为什么只动一次不能循环
问题描述: GIF动画为什么只动一次不能循环,这怎么破? 解决方案: Photoshop打开Gif文件,Ctrl+Shift+Alt+S,弹出保存页面选项,选择右下角动画:循环选项:一次=>永远 ...