Domino 9 und frühere Versionen > Entwicklung

SQL mit Notes kommunizieren über ODBC

(1/4) > >>

sculer:
Hallo,

ich hab vor kurz etwas ähnliches gepostet, nun mach ich dies für den einen Fall mal etwas genauer.

Ich möchte gern aus einem Notes Agenten eine SQL DB ansprechen und Werte auslesen.

Nun die erste Frage, wie spreche ich den eine SQL View an!? Ist dies das gleiche als würde ich eine SQL Tabel ansprechen!?

Das andere Problem was ich habe, ist die Tatsache, dass ich keinerlei Werte von der SQL DB erhalte.

Code sieht wie folgt aus... (ist aus einen Musterbeispiel übernommen und angepasst worden)


--- Code: ---Sub Click(Source As Button)
Dim Con As New ODBCConnection
Dim Qry As New ODBCQuery
Dim Res As New ODBCResultSet
Dim IsConnected As Integer
Dim sValue As String
IsConnected = Con.ConnectTo("SDE_SQL")
table=con.ListTables  'Ausgabe alle Tabellen, keine weiter Funktion dahinert
Set Qry.Connection = Con

'Qry.SQL = {SELECT * FROM _SMDBA_Incident Details} ' dies ist die View

Qry.SQL = {SELECT * FROM events} ' hier hab ich es mit einer Tabelle probiert

Set Res.Query = Qry
Res.Execute
'spätestens ab hier würde ich erwarten, dass ich im Debugger einige Werte sehe oder ähnliches.... ist aber nicht der Fall. Auch die Rows stehen nur auf 0 oder 1
IsConnected = Res.FirstRow
Do While IsConnected = True
sValue = Res.GetValue("Nachname")
Print sValue
IsConnected = Res.NextRow
Loop
IsConnected = Res.Close( DB_CLOSE )
IsConnected = Con.Disconnect
End Sub

--- Ende Code ---


hat jemand eine Idee woran dies liegen kann, dass ich garnichts zurück bekomme!?

Danke
Gruß
stan

sculer:
Achso

Ergänzung...
Die Tabell und View `s gibt es in der SQL DB!!!
Dies ist verifiziert...

m3:
1) Was für eine Ziel-DB hast Du? DB2, MS-SQL, Oracle, ODBC, ...
2) Bist Du Dir sicher, dass Du Dich beim Connect nicht anmelden musst?

sculer:
zu 1.
Also die Ziel DB ist eine SQL. Spezifischer weiß ich es noch nicht!! Werde ich aber mal nachhacken!!

zu 2.
ja, ich meld mich beim Connect an.
obwohl das irgendwann auch automatisch laufen muss.
(Hat da auch jemand eine Idee!? - Soll späte ein Agent sein, da kann keine Abfrage erscheinen!! :) )

Gruß

m3:
Deine Aussage
--- Zitat ---ja, ich meld mich beim Connect an.
--- Ende Zitat ---
widerspricht dem Code

--- Code: ---IsConnected = Con.ConnectTo("SDE_SQL")
--- Ende Code ---
status = odbcConnection. ConnectTo( dataSourceName$ [ , userID$ [ , password$ ]] )

Du gibst nur die Datasource an, keine Credentials.

Weiters solltest Du den Rückgabewert der Funktionen auch auswerten. Die liefern ev. Hinweise, was nicht klappt. Z.B. ob der ConnectTo überhaupt geklappt hat.

Navigation

[0] Themen-Index

[#] Nächste Seite