VB .NET - Os novos
provedores de dados .NET
A cada dia novos provedores de dados são lançados para a plataforma .NET . Vou relacionar os principais provedores de dados para a plataforma .NET existentes na atualidade.
Este provedor permite o uso nativo dos provedores OLE DB (Ex: Microsoft.JET.OLEDB.4.0) através do interop COM para o acesso a dados. Exemplos de strings de conexão:
Para IBM AS/400 OLE DB Provider
' VB.NET
Imports System.Data.OleDb
...
Dim oOleDbConnection As OleDbConnection
Dim sConnString As String = _
"Provider=IBMDA400.DataSource.1;" & _
"Data source=MeuAS400DbName;" & _
"User Id=MeuNomeUsuario;" & _
"Password=MinhaSenha"
oOleDbConnection = New OleDb.OleDbConnection(sConnString)
oOleDbConnection.Open()
Para JET OLE DB Provider
' VB.NET
Imports System.Data.OleDb
...
Dim oOleDbConnection As OleDbConnection
Dim sConnString As String = _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\MeuPath\MeuJet.mdb;" & _
"User ID=Admin;" & _
"Password="
oOleDbConnection = New OleDb.OleDbConnection(sConnString)
oOleDbConnection.Open()
Para Oracle OLE DB Provider
' VB.NET
Imports System.Data.OleDb
...
Dim oOleDbConnection As OleDbConnection
Dim sConnString As String = _
"Provider=OraOLEDB.Oracle;" & _
"Data Source=MeuOracleDB;" & _
"User ID=MeuNomeUsuario;" & _
"Password=MinhaSenha"
oOleDbConnection = New OleDb.OleDbConnection(sConnString)
oOleDbConnection.Open()
Para SQL Server OLE DB Provider
' VB.NET
Imports System.Data.OleDb
...
Dim oOleDbConnection As OleDbConnection
Dim sConnString As String = _
"Provider=sqloledb;" & _
"Data Source=MeuServerName;" & _
"Initial Catalog=MeuBancoDados;" & _
"User Id=MeuNomeUsuario;" & _
"Password=MinhaSenha"
oOleDbConnection = New OleDb.OleDbConnection(sConnString)
oOleDbConnection.Open()
Provedor ODBC que permite o acesso a drivers ODBC nativos da mesma forma que o provedor OLE DB .NET .Exemplos de strings de conexão:
Para SQL Server ODBC Driver
' VB.NET
Imports System.Data.Odbc
...
Dim oODBCConnection As OdbcConnection
Dim sConnString As String = _
"Driver={SQL Server};" & _
"Server=MeuSQLServerName;" & _
"Database=MeuBancoDados;" & _
"Uid=MeuNomeUsuario;" & _
"Pwd=MinhaSenha"
oODBCConnection = New Odbc.OdbcConnection(sConnString)
oODBCConnection.Open()
Para Oracle ODBC Driver
' VB.NET
Imports System.Data.Odbc
...
Dim oODBCConnection As OdbcConnection
Dim sConnString As String = _
"Driver={Microsoft ODBC for Oracle};" & _
"Server=OracleServer.world;" & _
"Uid=MeuNomeUsuario;" & _
"Pwd=MinhaSenha"
oODBCConnection = New Odbc.OdbcConnection(sConnString)
oODBCConnection.Open()
Para Access (JET) ODBC Driver
' VB.NET
Imports System.Data.Odbc
...
Dim oODBCConnection As OdbcConnection
Dim sConnString As String = _
"Driver={Microsoft Access Driver (*.mdb)};" & _
"Dbq=c:\somepath\Meudb.mdb;" & _
"Uid=Admin;" & _
"Pwd="
oODBCConnection = New Odbc.OdbcConnection(sConnString)
oODBCConnection.Open()
Para os demais drivers ODBC
' VB.NET
Imports System.Data.Odbc
...
Dim oODBCConnection As OdbcConnection
Dim sConnString As String = "Dsn=MeuDsn;" & _
"Uid=MeuNomeUsuario;" & _
"Pwd=MinhaSenha"
oODBCConnection = New Odbc.OdbcConnection(sConnString)
oODBCConnection.Open()
Este provedor de dados permite o acesso ao banco de dados MySQL usando o protocolo de rede MySQL nativo ou o cliente MySQL sem usar OLE DB ou ODBC. Exemplo de string para conexão:
Usando VB.NET
Imports CoreLab.MySql
Dim oMySqlConn As MySqlConnection = New MySqlConnection()
oMySqlConn.ConnectionString = "User ID=MeuNomeUsuario;" & _
"Password=MinhaSenha;" & _
"Host=localhost;" & _
"Port=3306;" & _
"Database=MeuBancoDados;" & _
"Direct=true;" & _
"Protocol=TCP;" & _
"Compress=false;" & _
"Pooling=true;" & _
"Min Pool Size=0;" & _
"Max Pool Size=100;" & _
"Connection Lifetime=0"
oMySqlConn.Open()
Usando C#
Using CoreLab.MySql;
MySqlConnection oMySqlConn = new MySqlConnection();
oMySqlConn.ConnectionString = "User ID=MeuNomeUsuario;" +
"Password=MinhaSenha;" +
"Host=localhost;" +
"Port=3306;" +
"Database=MeuBancoDados;" +
"Direct=true;" +
"Protocol=TCP;" +
"Compress=false;" +
"Pooling=true;" +
"Min Pool Size=0;" +
"Max Pool Size=100;" +
"Connection Lifetime=0";
oMySqlConn.Open();
Este provedor permite o acesso a um banco de dados Oracle usando a chamada da interface Oracle (OCI). A versão Oracle 8i Release 3 (8.17) CLient ou superior precisa estar instalada para o provedor funcionar. (Este provedor esta incluido na versão 1.1 do .NET Framework). Exemplos de strings de conexão :
Usando C#:
Usando System.Data.OracleClient;
OracleConnection oOracleConn = new OracleConnection();
oOracleConn.ConnectionString = "Data Source=Oracle8i;" +
"Integrated Security=SSPI";
oOracleConn.Open();
Usando VB.NET:
Imports System.Data.OracleClient
Dim oOracleConn As OracleConnection = New OracleConnection()
oOracleConn.ConnectionString = "Data Source=Oracle8i;" & _
"Integrated Security=SSPI";
oOracleConn.Open()
PostgreSQLDirect .NET Data Provider
CoreLab.PostgreSql - download
Este provedor permite o acesso a um banco de dados PostgreSQL usando o procotolo nativo. Exemplo de string de conexão:
Usando C#
Using CoreLab.PostgreSql;
PgSqlConnection oPgSqlConn = new PgSqlConnection();
oPgSqlConn.ConnectionString = "User ID=MeuNomeUsuario;" +
"Password=MinhaSenha;" +
"Host=localhost;" +
"Port=5432;" +
"Database=MeuBancoDados;" +
"Pooling=true;" +
"Min Pool Size=0;" +
"Max Pool Size=100;" +
"Connection Lifetime=0";
oPgSqlConn.Open();
Usando VB.NET
Imports CoreLab.PostgreSql
Dim oPgSqlConn As PgSqlConnection = New PgSqlConnection()
oPgSqlConn.ConnectionString = "User ID=MeuNomeUsuario;" & _
"Password=MinhaSenha;" & _
"Host=localhost;" & _
"Port=5432;" & _
"Database=MeuBancoDados;" & _
"Pooling=true;" & _
"Min Pool Size=0;" & _
"Max Pool Size=100;" & _
"Connection Lifetime=0"
oPgSqlConn.Open()
Permite a conexão com um banco de dados Microsoft SQL Server 7.0 ou 2000 . Para a versão Microsoft SQL Server 6.5 utilize o provedor OLE DB .NET.
Usando C#:
Using System.Data.SqlClient;
...
SqlConnection oSQLConn = new SqlConnection();
oSQLConn.ConnectionString = "Data Source=(local);" +
"Initial Catalog=MeuBancoDados;" +
"Integrated Security=SSPI";
oSQLConn.Open();
Usando VB.NET:
Imports System.Data.SqlClient
...
Dim oSQLConn As SqlConnection = New SqlConnection()
oSQLConn.ConnectionString = "Data Source=(local);" & _
"Initial Catalog=MeuBancoDados;" & _
"Integrated Security=SSPI"
oSQLConn.Open()
Conexão remota (via endereço IP):
oSQLConn.ConnectionString = "Network Library=DBMSSOCN;" & _
"Data Source=xxx.xxx.xxx.xxx,1433;" & _
"Initial Catalog=MeuBancoDados;" & _
"User ID=MeuNomeUsuario;" & _
"Password=MinhaSenha"
Boa conexão , e , até a mais ver...
...
![]()
José Carlos Macoratti