建站
咨詢
售后
建站咨詢
新聞中心
VB.NET的編寫方式和其他語言相比有許多不同之處，比如在構建三層架構方面。我們就可以通過本文介紹的內容對此進行一個詳細的解讀。我們主要介紹的是VB.NET三層數據結構的實現，以及將介紹如何創(chuàng)建一個Web Service服務。#t#
成都網站制作、成都網站設計、外貿營銷網站建設介紹好的網站是理念、設計和技術的結合。成都創(chuàng)新互聯擁有的網站設計理念、多方位的設計風格、經驗豐富的設計團隊。提供PC端+手機端網站建設，用營銷思維進行網站設計、采用先進技術開源代碼、注重用戶體驗與SEO基礎，將技術與創(chuàng)意整合到網站之中，以契合客戶的方式做到創(chuàng)意性的視覺化效果。
該結構分三個層次：表示層、業(yè)務層、數據層。
數據層：代表物理數據庫。
業(yè)務層：負責數據層與表示層之間的數據傳輸。
表示層：應用程序的客戶端，它通過業(yè)務層來訪問數據庫。
表示層所操作的是駐留在內存中的本地數據，當需要更新數據庫數據時，要通過業(yè)務層提供的更新方法實現。這樣可以大大提高應用程序的性能，而且，什么時候更新數據完全由你決定，提高了編程的靈活性。
VB.NET三層數據結構實例：
這里我們具體做一個實例來看看如何用VB.NET三層數據結構的應用程序。
數據庫：我們選擇SQL SERVER 的NorthWind數據庫。
業(yè)務層：我們創(chuàng)建一個WebService作為中間層。（需要安裝IIS服務）
表示層：我們寫一個Windows Form
第一步：創(chuàng)建WebService.
VB.NET三層數據結構具體步驟如下：
1. 新建一個項目，選擇ASP.NET Web服務，命名為：“WebService For 業(yè)務層”。
2. 添加兩個Sql DataAdapter，一個為Customer_da，它指向NorthWind數據庫的Customers表，另一個為Order_da，指向Northwind數據庫的Orders表。
3. 然后生成一個Typed DataSet（選擇“數據”菜單的“生成數據集”），命名為：Super_ds.
4. 數據庫連接已經完成，下一步我們將考慮它與表示層之間的通信，這里我們定義兩個方法。一個為：Get_DataSet，它返回一個Super_ds類型的數據集，另一個為：Update_DataSet，它負責更新數據庫數據， 方法代碼如下：
- < WebMethod（）> Public
Function Get_Dataset（）
As super_ds- customer_da.Fill
（Super_ds1.Customers）- order_da.Fill（Super_ds1.Orders）
- Return Super_ds1
- End Function
- < WebMethod（）> Public
Sub Update_Dataset（）- Super_ds1.AcceptChanges（）
- End Sub
你可以運行測試一下你建立的這個WebService.它將提供兩個方法。返回的DataSet是以XML表示的。
業(yè)務層的完整代碼如下：
- Imports System.Web.Services
- Public Class Service1
- Inherits System.Web.Services
.WebService- ‘Web Services Designer
Generated Code……。- < WebMethod（）> Public Function
Get_Dataset（） As super_ds- customer_da.Fill（Super_ds1.Customers）
- order_da.Fill（Super_ds1.Orders）
- Return Super_ds1
- End Function
- < WebMethod（）> Public Sub
Update_Dataset（）- Super_ds1.AcceptChanges（）
- End Sub
- ' WEB SERVICE EXAMPLE
- ' The HelloWorld（） example service
returns the string Hello World.- ' To build， uncomment the following
lines then save and build the project.- ' To test this web service， ensure
that the .asmx file is the start page- ' and press F5.
- '
- '< WebMethod（）> Public Function
HelloWorld（） As String- ' HelloWorld = "Hello World"
- ' End Function
- End Class
VB.NET三層數據結構之創(chuàng)建表示層
具體步驟如下：
1. 新建一個Windows應用程序，命名為：“Windows Form For 表示層”。
2. 在窗體上添加一個DataGrid，一個Button，Button1的text為“Load”，作用是：從業(yè)務層讀取數據。
3. 在解決方案窗體中添加Web 引用，將我們自己建立的Web Service for 業(yè)務層引入到當前項目中。
4. 向Button1的Click事件添加如下代碼：
- Dim Customer_Ds As New
localhost.super_ds（）- Dim ser1 As New local
host.Service1（）- Customer_Ds.Merge
（ser1.Get_Dataset）- DataGrid1.DataSource
= Customer_Ds
這里我們調用了Web Service的Get_DataSet函數，Update_DataSet方法的調用與此完全相同。
#p#
表示層的完整代碼如下：
- Imports Data_Access_表示層
- Public Class Form1
- Inherits System.Windows.Forms.Form
- #Region " Windows Form Designer
generated code "- Public Sub New（）
- MyBase.New（）
- 'This call is required by the
Windows Form Designer.- InitializeComponent（）
- 'Add any initialization after the
InitializeComponent（） call- End Sub
- 'Form overrides dispose to clean
up the component list.- Protected Overloads Overrides Sub
Dispose（ByVal disposing As Boolean）- If disposing Then
- If Not （components Is Nothing） Then
- components.Dispose（）
- End If
- End If
- MyBase.Dispose（disposing）
- End Sub
- Friend WithEvents Button1 As
System.Windows.Forms.Button- Friend WithEvents Button2 As
System.Windows.Forms.Button- Friend WithEvents Button3 As
System.Windows.Forms.Button- Friend WithEvents Client_DataSet
As Data_Access_表示層。localhost.super_ds- Friend WithEvents DataGrid1 As
System.Windows.Forms.DataGrid- 'Required by the Windows Form Designer
- Private components As System.
ComponentModel.Container- 'NOTE： The following procedure is
required by the Windows Form Designer- 'It can be modified using the
Windows Form Designer.- 'Do not modify it using the code editor.
- < System.Diagnostics.Debugger
StepThrough（）> Private Sub
InitializeComponent（）- Me.Button1 = New System.
Windows.Forms.Button（）- Me.Button2 = New System.
Windows.Forms.Button（）- Me.Button3 = New System.
Windows.Forms.Button（）- Me.Client_DataSet = New
Data_Access_表示層。localhost
.super_ds（）- Me.DataGrid1 = New System.Windows.
Forms.DataGrid（）- CType（Me.Client_DataSet， System
.ComponentModel.ISupportInitialize）。
BeginInit（）- CType（Me.DataGrid1， System.
ComponentModel.ISupportInitialize）。
BeginInit（）- Me.SuspendLayout（）
- '
- 'Button1
- '
- Me.Button1.Location = New System.
Drawing.Point（88， 360）- Me.Button1.Name = "Button1"
- Me.Button1.TabIndex = 0
- Me.Button1.Text = "load"
- '
- 'Button2
- '
- Me.Button2.Location = New System.
Drawing.Point（232， 360）- Me.Button2.Name = "Button2"
- Me.Button2.TabIndex = 1
- Me.Button2.Text = "update"
- '
- 'Button3
- '
- Me.Button3.Location = New System
.Drawing.Point（376， 360）- Me.Button3.Name = "Button3"
- Me.Button3.TabIndex = 2
- Me.Button3.Text = "clear"
- '
- 'Client_DataSet
- '
- Me.Client_DataSet.DataSetName =
"Client_DataSet"- Me.Client_DataSet.Locale = New
System.Globalization.CultureInfo（"zh-CN"）- Me.Client_DataSet.Namespace =
"http://www.tempuri.org/CustomerDs.xsd"- '
- 'DataGrid1
- '
- Me.DataGrid1.DataMember = ""
- Me.DataGrid1.Location = New
System.Drawing.Point（40， 56）- Me.DataGrid1.Name = "DataGrid1"
- Me.DataGrid1.Size = New System.
Drawing.Size（480， 264）- Me.DataGrid1.TabIndex = 3
- '
- 'Form1
- '
- Me.AutoScaleBaseSize = New
System.Drawing.Size（6， 14）- Me.ClientSize = New System.
Drawing.Size（568， 429）- Me.Controls.AddRange（New
System.Windows.Forms.Control（）
{Me.DataGrid1， Me.Button3，
Me.Button2， Me.Button1}）- Me.Name = "Form1"
- Me.Text = "Form1"
- CType（Me.Client_DataSet，
System.ComponentModel.
ISupportInitialize）。EndInit（）- CType（Me.DataGrid1， System.
ComponentModel.ISupportInitialize）。EndInit（）- Me.ResumeLayout（False）
- End Sub
- #End Region
- Private Sub Button1_Click（ByVal
sender As System.Object， ByVal e
As System.EventArgs） Handles Button1.Click- Dim Customer_Ds As New localhost.super_ds（）
- Dim ser1 As New localhost.Service1（）
- Customer_Ds.Merge（ser1.Get_Dataset）
- DataGrid1.DataSource = Customer_Ds
- End Sub
- End Class
總結：可見，VB.NET三層數據結構中的表示層窗體上完全沒有數據庫連接控件，它與數據庫的連接任務是通過業(yè)務層來完成的，這樣，程序的結構更加清晰，當然業(yè)務層的實現也可以用其他方法，比如：寫一個自己的類來完成與數據庫的數據傳輸。
文章名稱：VB.NET三層數據結構構建方式分析
轉載注明：http://www.fisionsoft.com.cn/article/coceoej.html
