5月 06
在使用 DataAdapter 來作為資料來源橋接器時，我們必須自己寫 DataAdapter 的 SelectCommand、InsertCommand、UpdateCommand、DeleteCommand 這幾個 SQL 陳述式的屬性，沒錯！是挺累人的！
不過卻有一個函數可以來幫我們自動產生這一些 SQL 陳述式：CommandBuilder
看了一些網路上的文章，有人不太喜歡這一些自動產生的東西，的確！通用的東西的確在效能上會有一點差別，不過這還是要取捨於開發進度，不可否認的，CommandBuilder 可以幫我們節省很多 Coding 的時間！
Visual Basic:
這篇文章沒有標籤.. -
Imports System.Data.OleDb
-
Public Class Form1
-
Function CONNSTR()
-
Dim str As String = _
-
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + _
-
Application.StartupPath + "\test.mdb;" + _
-
"Jet OLEDB:Database Password=XXXXXX"
-
Return str
-
End Function
-
-
Dim da As New OleDbDataAdapter
-
Dim ds As New DataSet
-
-
Private Sub Form1_Load(ByVal sender As System.Object, _
-
ByVal e As System.EventArgs) Handles MyBase.Load
-
-
Dim conn As New OleDbConnection(CONNSTR())
-
Dim sqlstr As String = _
-
"select * from product where (company like '測試用')"
-
-
da.SelectCommand = New OleDbCommand(sqlstr, conn)
-
-
conn.Open()
-
da.Fill(ds, "pro")
-
DataGridView1.DataSource = ds.Tables("pro")
-
conn.Close()
-
End Sub
-
-
Private Sub Button1_Click(ByVal sender As System.Object, _
-
ByVal e As System.EventArgs) Handles Button1.Click
-
-
Dim cb As New OleDbCommandBuilder(da)
-
-
Dim count As Integer
-
count = da.Update(ds, "pro")
-
MsgBox(count)
-
-
End Sub
-
-
Private Sub Button2_Click(ByVal sender As System.Object, _
-
ByVal e As System.EventArgs) Handles Button2.Click
-
-
ds.Clear()
-
da.Fill(ds, "pro")
-
End Sub
-
End Class
本篇文章引用網址：
|
其他隨機文章： |
