Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.OleDb
Imports Microsoft.Data.Odbc
Imports System.IO Dim ODBC_ConString As OdbcConnection
    Dim ODBC_Command As OdbcCommand
    Dim ODBC_DA As OdbcDataAdapter  Temp = "Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;SourceDB=" + Server.MapPath(".") + "/dbf" + ";Exclusive=No;"
                ODBC_ConString = New OdbcConnection(Temp)  ODBC_ConString.Open()
                ODBC_DA.Fill(Ds, SourceTableName)
                Data_Dv = Ds.Tables(SourceTableName).DefaultView

解决方案 »

  1.   

    For SQL Server ODBC Driver' VB.NET
    Dim oODBCConnection As Odbc.OdbcConnection
    Dim sConnString As String = _
              "Driver={SQL Server};" & _
              "Server=MySQLServerName;" & _
              "Database=MyDatabaseName;" & _
              "Uid=MyUsername;" & _
              "Pwd=MyPassword"
    oODBCConnection = New Odbc.OdbcConnection(sConnString)
    oODBCConnection.Open()
     
    For Oracle ODBC Driver' VB.NET
    Dim oODBCConnection As Odbc.OdbcConnection
    Dim sConnString As String = _
             "Driver={Microsoft ODBC for Oracle};" & _
             "Server=OracleServer.world;" & _
             "Uid=myUsername;" & _
             "Pwd=myPassword"
    oODBCConnection = New Odbc.OdbcConnection(sConnString)
    oODBCConnection.Open()
     
    For Access (JET) ODBC Driver' VB.NET
    Dim oODBCConnection As Odbc.OdbcConnection
    Dim sConnString As String = _
             "Driver={Microsoft Access Driver (*.mdb)};" & _
             "Dbq=c:\somepath\mydb.mdb;" & _
             "Uid=Admin;" & _
             "Pwd="
    oODBCConnection = New Odbc.OdbcConnection(sConnString)
    oODBCConnection.Open()
     
    For Sybase System 11 ODBC Driver // C#
    string myConnStr = "Driver={Sybase System 11};" + 
                       "SRVR=mySybaseServerName;" + 
                       "DB=myDatabaseName;" + 
                       "UID=myUsername;" + 
                       "PWD=myPassword";
    OdbcConnection myConnection = new OdbcConnection(myConnStr);
    myConnection.Open();
     
    For all other ODBC Drivers' VB.NET
    Dim oODBCConnection As Odbc.OdbcConnection
    Dim sConnString As String = "Dsn=myDsn;" & _
                                "Uid=myUsername;" & _
                                "Pwd=myPassword"
    oODBCConnection = New Odbc.OdbcConnection(sConnString)
    oODBCConnection.Open()