Remote Data Services (RDS)

5. Oktober 2015 von Centron GmbH

Die folgenden Beispiele zeigen, wie Sie zu einer entfernten Datenbank unter Verwendung des RDS Data Control verbinden. Wenn Sie die Eigenschaften des RDS DatqControls für Server, Verbindung und SQL benutzen, greift der RDS DataControl auf die RDS DataFactory des entfernten Servers zurück. Falls Sie die URL-Property der RDS DataControls nutzen, wird die RDS DataFactory nicht verwendet.

WARNUNG: RDS wird von Microsoft als veraltet angesehen!

— RDS DataControl – Connect Property

Falls der RDS Standard-Handler deaktiviert ist:

With oRdc
    .Server = "http://myServerName"
    .Sql = "Select * From Authors Where State = 'CA'"
    .Connect = "Provider=sqloledb;" & _
               "Data Source=(local);" & _
               "Initial Catalog=pubs;" & _
               "User Id=myUsername;" & _
               "Password=myPassword"
    .Refresh
End With

With oRdc

.Server = "http://myServerName"

.Sql = "Select * From Authors Where State = 'CA'"

.Connect = "Provider=sqloledb;" & _

"Data Source=(local);" & _

"Initial Catalog=pubs;" & _

"User Id=myUsername;" & _

"Password=myPassword"

.Refresh

End With

Falls der RDS Standard-Handler aktiviert ist:

With oRdc
    .Server = "http://myServerName"
    .Handler = "MSDFMAP.Handler"
    .Connect = "Data Source=MyConnectTag;"
    .Sql = "MySQLTag(""CA"")"
    .Refresh
End With

With oRdc

.Server = "http://myServerName"

.Handler = "MSDFMAP.Handler"

.Connect = "Data Source=MyConnectTag;"

.Sql = "MySQLTag(""CA"")"

.Refresh

End With

Die entsprechenden CONNECT- und SQL-Sektionen in der Standard-Handler-Datei \WINNT\MSDFMAP.INI wären:

[connect MyConnectTag]
Access = ReadWrite
Connect = "Provider=sqloledb;
           Data Source=(local);
           Initial Catalog=pubs;
           User Id=sa;
           Password="    (put these lines on a on single line!)

[sql MySQLTag]
Sql = "Select * From Authors Where State = '?'"

[connect MyConnectTag]

Access = ReadWrite

Connect = "Provider=sqloledb;

Data Source=(local);

Initial Catalog=pubs;

User Id=sa;

Password=" (put these lines on a on single line!)

[sql MySQLTag]

Sql = "Select * From Authors Where State = '?'"

— RDS DataControl – URL Property

Um Einträge aus einer entfernten Datenbank zu holen:

With oRdc
    .URL = "http://myServerName/AuthorsGet.asp?state=CA"
    .Refresh
End With

With oRdc

.URL = "http://myServerName/AuthorsGet.asp?state=CA"

.Refresh

End With

Um abzuspeichern, stellen Sie die URL Property auf eine ASP-Website ein

With oRdc
    .URL = "http://myServerName/AuthorsSave.asp"
    .SubmitChanges
End With

With oRdc

.URL = "http://myServerName/AuthorsSave.asp"

.SubmitChanges

End With

Hinweis: Sie müssen MDAC 2.5 (oder höher) benutzen