ADO.net ASP.net如何填寫數據表？

Question

我是新來的....如何正確填寫這個數據表？編輯不喜歡這個代碼，它給了我潦草的字跡康涅狄格州的最後一次出現下面和填寫

Imports System.Data.OleDb 
Imports System.Data.SqlClient 
Public Class WebForm4 
Inherits System.Web.UI.Page 

Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 

    Dim connstring As String 
    connstring = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Z:\CompanyData.mdb" 

    Dim conn As OleDbConnection 
    conn = New OleDbConnection(connstring) 

    conn.Open() 

    Dim strSql As String 
    strSql = "select * from Company" 

    Dim cmd As SqlCommand 
    cmd = New SqlCommand(strSql, conn) 

    Dim da As SqlDataAdapter 
    da = New SqlDataAdapter 
    da.SelectCommand = cmd 

    Dim dt As DataTable 
    dt = New DataTable 
    da.Fill(dt, "Company") 

End Sub 

Answer 1

您使用的是OleDb使用一個MS-Access數據庫。你應該使用OleDb類的一切。您創建了SqlCommand和SqlDataAdapter，這些類適用於Sql Server，但不適用於OleDb。

Dim connstring = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Z:\CompanyData.mdb" 
Dim strSql = "select * from Company" 

Using conn = New OleDbConnection(connstring) 
Using cmd = New OleDbCommand(strSql, conn) 
    conn.Open() 

    Using da = New OleDbDataAdapter 
     da.SelectCommand = cmd 
     Dim dt = New DataTable 
     da.Fill(dt, "Company") 
    End Using 
End Using 

我更改了一下您的代碼以顯示如何使用Using Statement。這條語句對於保持代碼清潔非常重要，因爲它關閉並處理了using行中聲明的每個可丟棄對象。