vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Brandneu! sevEingabe v3.0 - Das Eingabecontrol der Superlative!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB & Datenbanken
ADO problem gelöst 
Autor: majoo
Datum: 24.05.04 21:29

Hallo,
die Lösung (Select über unterschiedliche Datenbanken) ist relativ simpel.

Hier ein Beispiel:

Dim db1 As ADODB.Connection
Dim rs1 As ADODB.Recordset
Dim SQLSTR

Set db1 = New ADODB.Connection
With db1
.Provider = meinSQLdatenbankzugriff
.CursorLocation = adUseClient
.Open
End With

Set rs1 = New ADODB.Recordset

hier das wesentliche

Select distinct DB1.dbo.Tabelle.Feld2, Db1.dbo.Tabelle.Feld2,
Db2.dbo.Tabelle.feld1 , Db2.dbo.Tabelle.Feld21 FROM DB2.dbo.Tabelle INNER JOIN
Db1.dbo.Tabelle ON Db2.dbo.Tabelle.Indexfeld1 = DB1.dbo.^Tabelle.Indexfeld1
RIGHT OUTER JOIN DB1.dbo.Tabelle ON DB1.dbo.Tabelle.Indexfeld1 = Db1.dbo.Tabelle.IndexFeld1"

rs1.Open SQLSTR, db1, adOpenDynamic, adLockBatchOptimistic

Der Trick war den Datenbanknamen und den TabellenOwner voran zustellen.
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
ADO861majoo18.05.04 20:29
Re: ADO585look24.05.04 07:59
Re: ADO571majoo24.05.04 20:03
ADO problem gelöst588majoo24.05.04 21:29
Re: ADO problem gelöst537neoberlin228.06.04 15:51

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel