本文整理汇总了VB.NET中System.Data.Odbc.OdbcConnection类的典型用法代码示例。如果您正苦于以下问题:VB.NET OdbcConnection类的具体用法?VB.NET OdbcConnection怎么用?VB.NET OdbcConnection使用的例子?那么, 这里精选的类代码示例或许可以为您提供帮助。
在下文中一共展示了OdbcConnection类的2个代码示例,这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞,您的评价将有助于系统推荐出更棒的VB.NET代码示例。
示例1: InsertRow
Private Sub InsertRow(ByVal connectionString As String)
Dim queryString As String = _
"INSERT INTO Customers (CustomerID, CompanyName) Values('NWIND', 'Northwind Traders')"
Dim command As New OdbcCommand(queryString)
Using connection As New OdbcConnection(connectionString)
command.Connection = connection
connection.Open()
command.ExecuteNonQuery()
' The connection is automatically closed at
' the end of the Using block.
End Using
End Sub
示例2: New OdbcConnection
' 导入命名空间
Imports System
Imports System.Data
Imports System.Data.Odbc
Module OdbcProvider
Sub Main()
' Set up connection string
Dim ConnString As String = "dsn=NorthwindOdbc"
' Set up query string
Dim CmdString As String = "SELECT * FROM employees"
'Declare Connection and DataReader variables
Dim Conn As OdbcConnection
Dim Reader As OdbcDataReader
Try
'Open Connection
Conn = New OdbcConnection(ConnString)
Conn.Open()
'Execute Query
Dim Cmd As New OdbcCommand(CmdString, Conn)
Reader = Cmd.ExecuteReader()
'Display output header
Console.WriteLine("Querying database {0} with query {1}" & _
ControlChars.NewLine, Conn.Database, Cmd.CommandText)
Console.WriteLine("FirstName" & ControlChars.Tab & "LastName")
'Process The Result Set
While (Reader.Read())
Console.WriteLine(Reader("FirstName").PadLeft(9) & _
ControlChars.Tab & Reader(1))
End While
Catch ex As Exception
Console.WriteLine("Error: {0}", ex)
Finally
'Close Connection
Reader.Close()
Conn.Close()
End Try
End Sub
End Module