Visual Basic ASP NET MVC网站构建

Visual Basic与ASP.NET MVC简介

Visual Basic（VB）是一种由微软开发的结构化、模块化、面向对象的编程语言，它具有简单易用、开发效率高的特点，在Windows应用程序开发领域有着广泛的应用。而ASP.NET MVC是微软推出的基于模型 - 视图 - 控制器（MVC）设计模式的Web应用程序开发框架，它将业务逻辑、用户界面和应用程序流程分离，提高了代码的可维护性和可测试性。

将Visual Basic与ASP.NET MVC结合，可以充分发挥两者的优势，构建出功能强大、易于维护的Web应用程序。Visual Basic的简洁语法使得开发人员能够快速上手，而ASP.NET MVC的架构模式则为大型项目提供了良好的组织结构。

环境搭建

在开始使用Visual Basic构建ASP.NET MVC网站之前，需要确保开发环境已正确搭建。

安装Visual Studio： Visual Studio是微软提供的集成开发环境（IDE），它为开发ASP.NET MVC应用程序提供了丰富的工具和支持。可以从微软官方网站下载并安装最新版本的Visual Studio。在安装过程中，确保选择了“ASP.NET和Web开发”相关的工作负载。
创建ASP.NET MVC项目：打开Visual Studio，选择“创建新项目”。在项目模板中，选择“ASP.NET Web应用程序”，然后点击“下一步”。在“配置新项目”对话框中，输入项目名称和位置，然后点击“创建”。在“创建新的ASP.NET Web应用程序”对话框中，选择“MVC”模板，确保“框架”选择为合适的.NET版本（如.NET 5.0或更高版本），然后点击“创建”。此时，一个基于Visual Basic的ASP.NET MVC项目就创建好了。

项目结构解析

创建好项目后，需要了解项目的基本结构。

Controllers文件夹：该文件夹存放控制器类。控制器负责处理用户请求，从模型获取数据，并将数据传递给视图。例如，创建一个名为HomeController.vb的控制器类：

Imports System.Web.Mvc

Namespace Controllers
    Public Class HomeController
        Inherits Controller

        Function Index() As ActionResult
            Return View()
        End Function
    End Class
End Namespace

上述代码定义了一个HomeController类，其中Index方法是默认的操作方法，它返回一个视图。

Models文件夹：存放应用程序的模型类。模型代表应用程序的数据和业务逻辑。例如，创建一个简单的Product.vb模型类：

Namespace Models
    Public Class Product
        Public Property Id As Integer
        Public Property Name As String
        Public Property Price As Decimal
    End Class
End Namespace

这个Product类定义了产品的基本属性。

Views文件夹：包含应用程序的视图文件。视图负责呈现用户界面，它从控制器接收数据并进行显示。视图文件通常以.aspx或.razor为扩展名（在ASP.NET MVC 5及以前版本常用.aspx，ASP.NET Core MVC常用.razor）。例如，在Views/Home文件夹下创建一个Index.aspx视图文件（假设使用.aspx视图引擎）：

<%@ Page Language="VB" MasterPageFile="~/Views/Shared/Site.Master" Inherits="System.Web.Mvc.ViewPage" %>

<asp:Content ID="Content1" ContentPlaceHolderID="TitleContent" runat="server">
    Home Page
</asp:Content>

<asp:Content ID="Content2" ContentPlaceHolderID="MainContent" runat="server">
    <h2>Welcome to my ASP.NET MVC site!</h2>
</asp:Content>

这个视图文件设置了页面标题和主要内容。

App_Start文件夹：包含应用程序启动时执行的配置代码。例如，RouteConfig.vb文件用于配置应用程序的路由规则：

Imports System.Web.Mvc
Imports System.Web.Routing

Namespace App_Start
    Public Class RouteConfig
        Public Shared Sub RegisterRoutes(ByVal routes As RouteCollection)
            routes.IgnoreRoute("{resource}.axd/{*pathInfo}")

            routes.MapRoute(
                name:="Default",
                url:="{controller}/{action}/{id}",
                defaults:=New With {.controller = "Home",.action = "Index",.id = UrlParameter.Optional }
            )
        End Sub
    End Class
End Namespace

上述代码定义了默认的路由规则，将请求映射到相应的控制器和操作方法。

控制器详解

控制器在ASP.NET MVC应用程序中起着关键作用，它负责处理用户请求并协调模型和视图之间的交互。

操作方法：操作方法是控制器类中的公共方法，它处理特定的用户请求。操作方法可以返回不同类型的结果，如视图、JSON数据、文件等。例如，修改HomeController的Index方法，使其传递数据给视图：

Function Index() As ActionResult
    Dim products As New List(Of Product)
    products.Add(New Product With {.Id = 1,.Name = "Product 1",.Price = 10.99D })
    products.Add(New Product With {.Id = 2,.Name = "Product 2",.Price = 19.99D })
    Return View(products)
End Function

在这个例子中，Index方法创建了一个Product列表，并将其传递给视图。

参数绑定：操作方法可以接受参数，这些参数可以从URL、表单数据或JSON数据中获取。例如，添加一个接受产品ID的操作方法：

Function Details(ByVal id As Integer) As ActionResult
    Dim product = GetProductById(id)
    If product Is Nothing Then
        Return HttpNotFound()
    End If
    Return View(product)
End Function

Private Function GetProductById(ByVal id As Integer) As Product
    '这里可以从数据库或其他数据源获取产品
    Dim products As New List(Of Product)
    products.Add(New Product With {.Id = 1,.Name = "Product 1",.Price = 10.99D })
    products.Add(New Product With {.Id = 2,.Name = "Product 2",.Price = 19.99D })
    Return products.FirstOrDefault(Function(p) p.Id = id)
End Function

在Details方法中，id参数从URL中获取，然后通过GetProductById方法获取相应的产品并传递给视图。如果产品不存在，则返回404页面。

过滤器：过滤器是ASP.NET MVC提供的一种机制，用于在操作方法执行前后执行一些通用的逻辑，如身份验证、授权、日志记录等。例如，使用AuthorizeAttribute过滤器进行授权：

<Authorize(Roles:="Admin")>
Function AdminOnly() As ActionResult
    Return View()
End Function

上述代码表示只有属于“Admin”角色的用户才能访问AdminOnly操作方法。

模型与数据访问

模型代表应用程序的数据和业务逻辑，而数据访问则负责从数据源（如数据库）中获取和保存数据。

数据模型设计：在实际项目中，数据模型通常与数据库表结构相对应。可以使用实体框架（Entity Framework）等ORM（对象关系映射）工具来简化数据模型与数据库的交互。例如，使用实体框架创建一个Product数据模型：首先，在项目中安装实体框架包（可以通过NuGet包管理器）。然后，创建一个ProductContext.vb类：

Imports System.Data.Entity

Namespace Models
    Public Class ProductContext
        Inherits DbContext
        Public Property Products As DbSet(Of Product)
    End Class
End Namespace

这里ProductContext继承自DbContext，并定义了一个Products属性，用于表示Product表。

数据访问层：可以创建一个数据访问层（DAL）来封装数据访问逻辑。例如，创建一个ProductRepository.vb类：

Namespace DAL
    Public Class ProductRepository
        Private context As New ProductContext

        Public Function GetAllProducts() As IEnumerable(Of Product)
            Return context.Products.ToList()
        End Function

        Public Function GetProductById(ByVal id As Integer) As Product
            Return context.Products.Find(id)
        End Function

        Public Sub AddProduct(ByVal product As Product)
            context.Products.Add(product)
            context.SaveChanges()
        End Sub

        Public Sub UpdateProduct(ByVal product As Product)
            context.Entry(product).State = EntityState.Modified
            context.SaveChanges()
        End Sub

        Public Sub DeleteProduct(ByVal id As Integer)
            Dim product = context.Products.Find(id)
            If product IsNot Nothing Then
                context.Products.Remove(product)
                context.SaveChanges()
            End If
        End Sub
    End Class
End Namespace

这个ProductRepository类提供了对Product数据的增删改查操作。

在控制器中使用数据访问层：在控制器中，可以实例化数据访问层类并调用其方法。例如，修改HomeController：

Imports DAL

Namespace Controllers
    Public Class HomeController
        Inherits Controller

        Private repository As New ProductRepository

        Function Index() As ActionResult
            Dim products = repository.GetAllProducts()
            Return View(products)
        End Function

        Function Details(ByVal id As Integer) As ActionResult
            Dim product = repository.GetProductById(id)
            If product Is Nothing Then
                Return HttpNotFound()
            End If
            Return View(product)
        End Function
    End Class
End Namespace

这样，控制器就可以通过数据访问层从数据库中获取数据并传递给视图。

视图与视图引擎

视图负责呈现用户界面，而视图引擎则负责将视图文件解析并呈现为HTML页面。

Razor视图引擎： Razor是ASP.NET MVC中常用的视图引擎，它具有简洁的语法，允许在视图中混合编写HTML和代码。例如，创建一个Index.cshtml视图（假设使用Razor视图引擎）：

@model IEnumerable(Of Models.Product)

@{
    ViewBag.Title = "Product List";
}

<h2>Product List</h2>

<table class="table">
    <thead>
        <tr>
            <th>ID</th>
            <th>Name</th>
            <th>Price</th>
        </tr>
    </thead>
    <tbody>
        @For Each product In Model
            <tr>
                <td>@product.Id</td>
                <td>@product.Name</td>
                <td>@product.Price</td>
            </tr>
        Next
    </tbody>
</table>

在这个视图中，@model声明了视图所使用的模型类型，@{}块用于定义视图相关的逻辑，如设置页面标题。@For Each循环用于遍历模型中的产品并显示在表格中。

视图布局：视图布局允许定义一个通用的页面结构，其他视图可以继承该布局。在Views/Shared文件夹下创建一个_Layout.cshtml文件：

<!DOCTYPE html>
<html lang="en">
<head>
    <meta charset="utf - 8" />
    <meta name="viewport" content="width=device-width, initial-scale=1.0" />
    <title>@ViewBag.Title</title>
    @Styles.Render("~/Content/css")
    @Scripts.Render("~/bundles/modernizr")
</head>
<body>
    <div class="container body-content">
        @RenderBody()
        <hr />
        <footer>
            <p>&copy; @DateTime.Now.Year - My ASP.NET MVC Application</p>
        </footer>
    </div>

    @Scripts.Render("~/bundles/jquery")
    @Scripts.Render("~/bundles/bootstrap")
    @RenderSection("scripts", required:=False)
</body>
</html>

_Layout.cshtml定义了页面的基本结构，包括头部、主体和底部。@RenderBody()用于渲染具体视图的内容。

部分视图：部分视图是可以在多个视图中重用的视图片段。例如，创建一个_ProductSummary.cshtml部分视图：

@model Models.Product

<div class="panel panel-default">
    <div class="panel-heading">@Model.Name</div>
    <div class="panel-body">
        <p>ID: @Model.Id</p>
        <p>Price: @Model.Price</p>
    </div>
</div>

在其他视图中，可以通过@Html.Partial("_ProductSummary", product)来引用这个部分视图，其中product是具体的产品模型实例。

表单处理与验证

在Web应用程序中，表单处理和验证是常见的功能。

创建表单视图：在Views/Home文件夹下创建一个Create.cshtml视图用于创建产品：

@model Models.Product

@{
    ViewBag.Title = "Create Product";
}

<h2>Create Product</h2>

@Using (Html.BeginForm())
    @Html.AntiForgeryToken()

    <div class="form-horizontal">
        <h4>Product</h4>
        <hr />
        @Html.ValidationSummary(True, "", New With {.class = "text-danger" })
        <div class="form-group">
            @Html.LabelFor(Function(model) model.Name, New With {.class = "control-label col-md-2" })
            <div class="col-md-10">
                @Html.EditorFor(Function(model) model.Name)
                @Html.ValidationMessageFor(Function(model) model.Name, "", New With {.class = "text-danger" })
            </div>
        </div>
        <div class="form-group">
            @Html.LabelFor(Function(model) model.Price, New With {.class = "control-label col-md-2" })
            <div class="col-md-10">
                @Html.EditorFor(Function(model) model.Price)
                @Html.ValidationMessageFor(Function(model) model.Price, "", New With {.class = "text-danger" })
            </div>
        </div>
        <div class="form-group">
            <div class="col-md-offset-2 col-md-10">
                <input type="submit" value="Create" class="btn btn-default" />
            </div>
        </div>
    </div>
End Using

这个视图使用Html.BeginForm创建一个表单，并使用Html.EditorFor和Html.ValidationMessageFor生成表单字段和验证消息。

处理表单提交：在HomeController中添加处理表单提交的操作方法：

<HttpPost>
Function Create(ByVal product As Product)
    If ModelState.IsValid Then
        Dim repository As New ProductRepository
        repository.AddProduct(product)
        Return RedirectToAction("Index")
    End If
    Return View(product)
End Function

HttpPost特性表示该方法处理HTTP POST请求。如果模型状态有效（即表单数据通过验证），则将产品添加到数据库并重定向到产品列表页面；否则，返回包含验证错误的视图。

模型验证：可以在模型类中使用数据注释（Data Annotations）进行验证。例如，修改Product模型类：

Imports System.ComponentModel.DataAnnotations

Namespace Models
    Public Class Product
        <Key>
        Public Property Id As Integer

        <Required(ErrorMessage:="Name is required")>
        Public Property Name As String

        <Required(ErrorMessage:="Price is required")>
        <Range(0.01, Double.MaxValue, ErrorMessage:="Price must be greater than 0")>
        Public Property Price As Decimal
    End Class
End Namespace

这里使用Required和Range数据注释来验证Name和Price字段。

部署ASP.NET MVC网站

完成网站开发后，需要将其部署到服务器上供用户访问。

发布项目：在Visual Studio中，右键点击项目，选择“发布”。在发布对话框中，可以选择发布目标，如文件系统、IIS、Azure等。如果选择发布到文件系统，指定一个目标文件夹，然后点击“发布”。Visual Studio会将项目编译并生成部署文件到指定文件夹。
配置IIS（如果部署到IIS）：在服务器上安装IIS（Internet Information Services）。打开IIS管理器，创建一个新的网站或应用程序。在网站或应用程序的“基本设置”中，将物理路径指向发布的文件所在的文件夹。确保应用程序池的.NET版本与项目所使用的版本一致。
部署到Azure（可选）：如果选择部署到Azure，可以在发布对话框中选择Azure作为目标。按照向导提示登录Azure账号，选择订阅、资源组和应用服务计划等，然后完成发布。Azure会自动配置服务器环境并部署应用程序。

通过以上步骤，就可以将基于Visual Basic的ASP.NET MVC网站成功部署并提供给用户访问。在实际部署过程中，还需要考虑安全性、性能优化等方面的问题，以确保网站的稳定运行和良好的用户体验。

通过对Visual Basic与ASP.NET MVC的结合使用，从环境搭建、项目结构、控制器、模型、视图、表单处理到部署等方面的详细介绍，相信开发者能够构建出功能丰富、可维护性强的Web应用程序。在实际开发过程中，不断探索和实践，结合具体业务需求，充分发挥两者的优势，将有助于开发出高质量的网站。