ASP.NET使用VB - 家庭記帳簿05 - 如何連接資料庫資料表 - 3

今天要介紹的第三種方法是撰寫程式碼連結SQL Server資料庫。一樣，先打開 Visual Studio，開啟Details.aspx.vb 檔案，如下圖步驟。

Imports System.Data 和 Imports System.Data.SqlClient 是通知編譯器我要使用到的NET Framework套件。如果要連結到 SQL Server，請加上這二行。然後再如下圖步驟：

Daily_Details_Load 是指當網頁要載入時所進行的動作。程式碼如下圖



好，現在打開IIS，如下畫面。

連線成功。程式碼於後，供參酌。' 表註解。
*******************************************************************

Private Sub Daily_Details_Load(sender As Object, e As EventArgs) Handles Me.Load

    If Not IsPostBack Then
        Dim strSQL As String = "SELECT * FROM [dbo].[Diary] ORDER by [日期] DESC"
         'SQL語法 , 選取 Diary 資料表 , 日期排序, 最新的在最上面。

        Dim MyConnection As SqlConnection        '定義對 SQL Server 資料庫連線
        Dim MyCommand As SqlCommand          '定義對 SQL Server 資料庫的執行程序

MyConnection = New SqlConnection("Data Source=localhost\SQLEXPRESS;Initial Catalog=myDatabase;Integrated Security=True")

' Data Source要連到的資料庫來源

' localhost\SQLEXPRESS 連線的伺服器名稱

' Initial Catalog=myDatabase 連線的資料庫

' Integrated Security=True 使用Windows 驗證連線

MyConnection.Open()     '開啟連線

MyCommand = New SqlCommand(strSQL, MyConnection)

 '執行連線動作(SQL指令,連線的資料來源)

Dim da As New SqlDataAdapter(MyCommand)

 '執行指令後，得到一組資料，存入資料快取DataSet

Dim dt As New DataTable()     '設定DataTable，準備承接資料快取中的資料

da.Fill(dt)   ' 將資料快取的資料放入DataTable，此時的資料表是在記憶體中。

MyConnection.Close()      '關閉連線

GV_Details.DataSource = dt   '定義 GridView 的資料來源是記憶體中的資料表

GV_Details.DataBind()    '產生資料

   End If

End Sub

************************************************************************