Domino 9 und frühere Versionen > ND8: Entwicklung

ODBCConnection Problem

(1/7) > >>

Pavel:
Hallo,

vielleicht kann mir jemand helfen, ich komme irgendwie nicht weiter.
Ich verwende folgenden Testcode um überhaupt erstmal mit ODBC warm zu werden.

   Set con = New ODBCConnection
   Dim dataSource As String
   Dim userName As String
   Dim password As String
   dataSource = "odbcsource"
   userName = "username"
   password = "pwd"
   If Not con.ConnectTo(dataSource, userName, password) Then
      Messagebox "Could not connect to " & dataSource
   End If
   Messagebox con.GetExtendedErrorMessage
   con.Disconnect

Leider bringt mir das Script immer eine Fehlermeldung "could not connect to dbname" und die Messagebox liefert "missing argument".
Aber was fehlt denn?
In der ODBC Verwaltung ist alles korrekt und der Testconnect klappt.

MfG
René

atbits:
Hallo

Hast Du eine System oder eine User-DSN angelegt?

Grüße David

Pavel:
System DSN, habe aber auch User DSN getestet, damit ging es auch nicht

atbits:
Stimmen denn wirklich die Werte für dsnname (als datasource) und user und pwd?

Der Sample Code aus der Designer-Hilfe sieht ziemlich ähnlich aus.
Hier kannst Du die Daten eingeben, ohne jedesmal neu zu kompilieren.


--- Code: ---Uselsx "*LSXODBC"
Dim con As ODBCConnection
Sub Postopen(Source As Notesuidocument)
  Set con = New ODBCConnection
End Sub
Sub Click(Source As Button)
  Dim dataSource As String
  Dim userName As String
  Dim password As String
  dataSource = Inputbox$ _
  ("Enter name of data source", "Data source?")
  userName = Inputbox$ _
  ("Enter user name, if required", "User name?")
  If userName = "" Then
    If Not con.ConnectTo(dataSource) Then
      Messagebox "Could not connect to " & dataSource
    End If
  Else
    password = Inputbox$("Enter password", "Password?")
    If Not con.ConnectTo(dataSource, _
    userName, password) Then
      Messagebox "Could not connect to " & dataSource
    End If
  End If
End Sub
Sub Queryclose(Source As NotesUIDocument, Continue As Variant)
  con.Disconnect
End Sub

--- Ende Code ---

Grüße David

Pavel:
Hallo,

genau das Beispiel habe ich zuerst verwendet, es kam die gleiche Fehlermeldung.
Per ODBC wollte ich übrigens auf eine Oracle DB zugreifen und habe die entsprechenden Client ODBC Treiber mitinstalliert.

MfG
René

Navigation

[0] Themen-Index

[#] Nächste Seite