ServerName;" & _ "Database=MyDatabaseName;" & _ "Uid=MyUsername;" & _ "Pwd=MyPassword;"
oODBCConnection = New Odbc.OdbcConnection(sConnString) oODBCConnection.Open()
For Oracle ODBC Driver:
Dim oODBCConnection As Odbc.OdbcConnection Dim sConnString As String
'''' Create and open a new ODBC Connection sConnString = "Driver={Microsoft ODBC for Oracle};" & _ "Server=OracleServer.world;" & _ "Uid=myUsername;" & _ "Pwd=myPassword;"
oODBCConnection = New Odbc.OdbcConnection(sConnString) oODBCConnection.Open()
For Access (JET) ODBC Driver:
Dim oODBCConnection As Odbc.OdbcConnection Dim sConnString As String
'''' Create and open a new ODBC Connection sConnString = "Driver={Microsoft Access Driver (*.mdb)};" & _ "Dbq=c:\somepath\mydb.mdb;" & _ "Uid=Admin;" & _ "Pwd=;"
oODBCConnection = New Odbc.OdbcConnection(sConnString) oODBCConnection.Open()
For all other ODBC Drivers:
Dim oODBCConnection As Odbc.OdbcConnection Dim sConnString As String
'''' Create and open a new ODBC Connection sConnString = "Dsn=myDsn;" & _ "Uid=myUsername;" & _ "Pwd=myPassword;"
oODBCConnection = New Odbc.OdbcConnection(sConnString) oODBCConnection.Open()
上一页 [1] [2] [3] [4] 没有相关教程
|