基于VB.NET的WEB數(shù)據(jù)庫(kù)應(yīng)用

摘 要：以網(wǎng)絡(luò)實(shí)驗(yàn)信息管理系統(tǒng)為研究背景，應(yīng)用VB.NET將數(shù)據(jù)庫(kù)信息發(fā)布到Internet上，很好地實(shí)現(xiàn)了WEB數(shù)據(jù)庫(kù)建立、綁定、查詢、編輯等操作，功能齊全，便于擴(kuò)展。

關(guān)鍵詞：VB.NET 實(shí)驗(yàn)信息管理 B/S（Browser/Server）模式 Internet 信息服務(wù) 軟件設(shè)計(jì)

中圖分類號(hào)：TP391.9 文獻(xiàn)標(biāo)識(shí)碼：A 文章編號(hào)：1672-3791（2013）04（a）-0045-02

1 VB.NET概述[1]

在ADO中，如果脫離了數(shù)據(jù)提供者用來(lái)保存和描述數(shù)據(jù)的結(jié)構(gòu)，數(shù)據(jù)將不能獨(dú)立存在。系統(tǒng)的開(kāi)發(fā)難點(diǎn)主要是對(duì)數(shù)據(jù)庫(kù)的操作，ADO.NET用以下對(duì)象來(lái)實(shí)現(xiàn)對(duì)數(shù)據(jù)庫(kù)的操作：

Connections--連接和管理數(shù)據(jù)庫(kù)事務(wù)。

Commands--向數(shù)據(jù)庫(kù)發(fā)送的命令。

DataReaders--直接讀取流數(shù)據(jù)。

DateSets 和 DateSetCommands--對(duì)駐留內(nèi)存中的數(shù)據(jù)進(jìn)行存儲(chǔ)和操作。

2 核心源碼

2.1 數(shù)據(jù)建立

在系統(tǒng)中創(chuàng)建一個(gè)公用模塊改模塊中實(shí)現(xiàn)對(duì)數(shù)據(jù)庫(kù)的所有訪問(wèn)。

//引入訪問(wèn)SQLServer數(shù)據(jù)庫(kù)[2]的命名空間

Imports System

Imports System.Data

Imports System.Data.SqlClient

Module Module1

//在模塊中定義一些公共變量，用于在窗體之間傳遞數(shù)據(jù)

Public Connstr As String = "server=（local）；database=lab；Trusted_connection=yes"

Public DataAdapter as SqlDataAdapter

Public DataConnection as SqlConnection

Public DataSet as DataSet

//定義一個(gè)用于返回?cái)?shù)據(jù)集的公共查詢函數(shù)，如果正常訪問(wèn)數(shù)據(jù)庫(kù)則返回查詢結(jié)果，改結(jié)果以一個(gè)數(shù)據(jù)集來(lái)表現(xiàn)，否則則返回Nothing

Public Function GetDataFromSql（ByVal sqlstr As String） As DataSet

Try

DataConnection = New SqlConnection（Connstr）

DataAdapter = New SqlDataAdapter（sqlstr，DataConnection）

DataSet = New DataSet

DataSet.Clear（）

DataAdapter.Fill（DataSet）

DataConnection.Close（）