一、使用 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:

Me.SqlConnection1.ConnectionString = _
"Data Source=(local)\SQLEXPRESS; _
Initial Catalog=北風貿易; _
Integrated Security=True"
arrow
arrow
    全站熱搜

    JL8051 發表在 痞客邦 留言(0) 人氣()