五月 20
一、使用 ConnectionStringBuilder
1.連接 Access
VB.NET:
-
Dim builder As New OleDbConnectionStringBuilder
-
builder.Provider = "Microsoft.Jet.OLEDB.4.0"
-
builder.DataSource = "|DataDirectory|\test.mdb"
-
builder.Add("Jet OLEDB:Database Password", "123456")
-
Dim str As String = builder.ConnectionString
-
Return str
2.連接 SQLServer
VB.NET:
-
Dim builder As New SqlConnectionStringBuilder
-
builder.DataSource = "(local)\SQLEXPRESS"
-
builder.InitialCatalog = "北風貿易"
-
builder.IntegratedSecurity = True
-
Dim str As String = builder.ConnectionString
-
Return str
3.連接 MySql (必須安裝 MySql.Data 外掛) 請參考...
VB.NET:
-
Imports MySql.Data
-
Imports MySql.Data.MySqlClient
-
-
Public Class Form1
-
Private Sub Form1_Load(ByVal sender As System.Object, _
-
ByVal e As System.EventArgs) Handles MyBase.Load
-
-
Dim builder As New MySqlConnectionStringBuilder
-
builder.Server = "localhost"
-
builder.UserID = "root"
-
builder.Password = "123456"
-
builder.Database = "test"
-
Dim str As String = builder.ConnectionString
-
-
Dim conn As New MySqlConnection(str)
-
Dim commCMD As String = "select * from product"
-
Dim da As New MySqlDataAdapter(commCMD, conn)
-
Dim ds As New DataSet
-
conn.Open()
-
da.Fill(ds, "pro")
-
DataGridView1.DataSource = ds.Tables("pro")
-
conn.Close()
-
End Sub
-
End Class
二、使用自行撰寫連線字串，此方法容易因為人為疏失而產生錯誤
1.連接 SQLServer
VB.NET:
標籤： ADO.NET, VB.NET-
Me.SqlConnection1.ConnectionString = _
-
"Data Source=(local)\SQLEXPRESS; _
-
Initial Catalog=北風貿易; _
-
Integrated Security=True"
本篇文章引用網址：
|
其他隨機文章： |
