Подключение к SOTAMAS90 ODBC?

Question

Как подключиться к файлу Mas90 с помощью ODBC, который они устанавливают - SOTAMAS90? как это сделать в vb.net?

Answer 1

Я found this as an example - я не пробовал себя знать 100% уверен, что, если он работает или нет, и я не исповедую себя как vb.net программист, но это по крайней мере что-то попробовать ...

Imports System.Data 
Imports Microsoft.Data.Odbc 

' Database Connection 
Public dbConn As OdbcConnection = Nothing 
Public dbCmnd As OdbcCommand 
Public dbReader As OdbcDataReader 
Public dbConnStr As String 
Public dbError As Exception 

' Connect to MAS90 using ODBC; dbError stores the 
' exception if any 
Sub connectToDatabase(ByVal company As String, ByVal uid As String, ByVal pwd As String) 

    Dim dsn As String = "SOTAMAS90" 
    Dim timeout As String = "360" 

    ' Build the connection string 
    dbConnStr = "DSN=" + dsn + _ 
      ";Directory=M:\MAS90" + _ 
      ";Prefix=M:\MAS90\soa\" + _ 
      ";ViewDLL=M:\MAS90\Home\" + _ 
      ";SERVER=NotTheServer" + _ 
      ";Company=" + company + _ 
      ";UID=" + uid + ";PWD=" + pwd + ";" 

    ' Connect if not already 
    If (dbConn Is Nothing) Then 
     Try 
      dbConn = New OdbcConnection(dbConnStr) 
      dbConn.ConnectionTimeout = timeout 
      dbConn.Open() 
      dbError = Nothing 
     Catch ex As Exception 
      dbError = ex 
      dbConn = Nothing 
     End Try 
    End If 
End Sub