So hier direkt ein kleiner Codeauszug, wie ich die Verbindung hergestellt habe:
Public Function OraConnect() As Boolean Dim sUser As String = "yourUserName" Dim sPasswd As String = "yourPassword" 'Mit Oracle DB verbinden Try Dim sConnString = "Data Source=(DESCRIPTION = (ADDRESS_LIST = (ADDRESS = (PROTOCOL = TCP) (HOST = %DEINHOST%)(PORT = 1521)) (ADDRESS = (PROTOCOL = TCP) (HOST = %DEINHOST)(PORT = 1521))) (LOAD_BALANCE=ON) (FAILOVER=ON) (CONNECT_DATA = (SERVICE_NAME=SERVICE_RAC) (FAILOVER_MODE=(TYPE=SELECT)(METHOD=BASIC)(RETRIES=10)(DELAY=5))));" & _ "USER=" & sUser & "; password=" & sPasswd _oConn.ConnectionString = sConnString _oConn.Open() Return True Catch ex As Exception 'Fehlerbehandlungen - evt. E-Mail an Programmierer senden End Try Return False End Function
Eine recht nützliche Website zu dem Thema: www.connectionstrings.com