Schritt 2: Aufrufen des Serverprogramms (RDS-Lernprogramm)
Wenn Sie eine Methode auf dem Client Proxy-aufrufen, führt das eigentliche Programm auf dem Server die Methode aus. In diesem Schritt führen Sie eine Abfrage auf dem Server aus.
Wichtig
Ab Windows 8 und Windows Server 2012 sind RDS-Serverkomponenten nicht mehr im Windows-Betriebssystem enthalten (weitere Details finden Sie unter Windows 8 und Windows Server 2012 Compatibility Cookbook). RDS-Clientkomponenten werden in einer zukünftigen Version von Windows entfernt. Vermeiden Sie die Verwendung dieses Features in neuer Entwicklungsarbeit, und planen Sie, Anwendungen zu ändern, die derzeit dieses Feature verwenden. Anwendungen, die RDS verwenden, sollten zu WCF Data Servicemigrieren.
Teil A Wenn Sie RDSServer.DataFactory in diesem Lernprogramm nicht verwenden würden, wäre die einfachste Möglichkeit, diesen Schritt auszuführen, das RDS.DataControl-Objekt zu verwenden. Das RDS. DataControl kombiniert den vorherigen Schritt zum Erstellen eines Proxys mit diesem Schritt, der die Abfrage ausgibt.
Legen Sie die RDS fest. DataControl Objekt Server Eigenschaft, um zu ermitteln, wo das Serverprogramm instanziiert werden soll; die Connect-Eigenschaft, um die Verbindungszeichenfolge für den Zugriff auf die Datenquelle anzugeben; und die SQL--Eigenschaft, um den Abfragebefehlstext anzugeben. Geben Sie dann die Refresh-Methode aus, damit das Serverprogramm eine Verbindung mit der Datenquelle herstellt, Zeilen abruft, die von der Abfrage angegeben sind, und geben Sie ein Recordset-Objekt Objekt an den Client zurück.
In diesem Lernprogramm wird das RDS.DataControlnicht verwendet, aber so würde es aussehen, wenn es verwendet würde:
Sub RDSTutorial2A()
Dim DC as New RDS.DataControl
DC.Server = "https://yourServer"
DC.Connect = "DSN=Pubs"
DC.SQL = "SELECT * FROM Authors"
DC.Refresh
...
Weder ruft das Lernprogramm RDS mit ADO-Objekten auf, noch würde es so aussehen, wenn dies der Fall wäre:
Dim rs as New ADODB.Recordset
rs.Open "SELECT * FROM Authors","Provider=MS Remote;Data Source=Pubs;" & _
"Remote Server=https://yourServer;Remote Provider=SQLOLEDB;"
Teil B Die allgemeine Methode zum Ausführen dieses Schritts besteht darin, das RDSServer.DataFactory-Objekt Query-Methode aufzurufen. Diese Methode verwendet eine Verbindungszeichenfolge, die zum Herstellen einer Verbindung mit einer Datenquelle verwendet wird, und einen Befehlstext, der verwendet wird, um die Zeilen anzugeben, die von der Datenquelle zurückgegeben werden sollen.
In diesem Lernprogramm wird das DataFactory Objekt Query-Methode verwendet:
Sub RDSTutorial2B()
Dim DS as New RDS.DataSpace
Dim DF
Dim RS as ADODB.Recordset
Set DF = DS.CreateObject("RDSServer.DataFactory", "https://yourServer")
Set RS = DF.Query ("DSN=Pubs", "SELECT * FROM Authors")
...
Siehe auch
Schritt 3: Server ruft ein Recordset (RDS-Lernprogramm)
RDS-Lernprogramm (VBScript)