本文整理匯總了VB.NET中System.Data.OleDb.OleDbConnection.DataSource屬性的典型用法代碼示例。如果您正苦於以下問題：VB.NET OleDbConnection.DataSource屬性的具體用法？VB.NET OleDbConnection.DataSource怎麽用？VB.NET OleDbConnection.DataSource使用的例子？那麽, 這裏精選的屬性代碼示例或許可以為您提供幫助。您也可以進一步了解該屬性所在類System.Data.OleDb.OleDbConnection的用法示例。
在下文中一共展示了OleDbConnection.DataSource屬性的2個代碼示例，這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚，您的評價將有助於係統推薦出更棒的VB.NET代碼示例。
示例1: OpenConnection
Public Sub OpenConnection(ByVal connectionString As String)
Using connection As New OleDbConnection(connectionString)
Try
connection.Open()
Console.WriteLine("Server Version: {0} DataSource: {1}", _
connection.ServerVersion, connection.DataSource)
Catch ex As Exception
Console.WriteLine(ex.Message)
End Try
' The connection is automatically closed when the
' code exits the Using block.
End Using
End Sub示例2: MainClass
' 導入命名空間
Imports System
Imports System.Data
Imports System.Data.OleDb
public class MainClass
Shared Sub Main()
Dim connString As String = "provider= microsoft.jet.oledb.4.0;data source=Employee.mdb;"
Dim conn As New OleDbConnection(connString)
Try
conn.Open()
Console.WriteLine("- ConnectionString : {0}", conn.ConnectionString)
Console.WriteLine("- Database : {0}",conn.Database)
Console.WriteLine("- DataSource : {0}",conn.DataSource)
Console.WriteLine("- ServerVersion : {0}",conn.ServerVersion)
Console.WriteLine("- State : {0}", conn.State)
Catch ex As OleDbException
Console.WriteLine("Error: " & ex.ToString())
Finally
conn.Close()
Console.WriteLine("Connection Closed")
End Try
End Sub
End Class