Teil 2: RSS-Newsfeeds mit Access erstellen
Erklärung Listing 1
Außerdem weisen Sie der Variablen strSQL
den notwendigen SQL-Code zu. Hier werden alle Datensätze abgerufen, die in der Tabelle enthalten sind. Sie können natürlich auch eine SQL-Anweisung formulieren, die nur die letzten 10 oder 20 Einträge enthält.
Außerdem erzeugen Sie mit dem Schlüsselwort New
ein neues RecordSet-Objekt. Dieses öffnen Sie dann anschließend mit der Open
-Methode und übergeben die SQL-Anweisung als ersten Parameterwert.
Anschließend prüfen Sie mit der RecordCount
-Eigenschaft, ob die Datensatzgruppe mindestens einen Datensatz enthält. Hierfür durchlaufen Sie die Datensätze mit einer Do
-Schleife.
Innerhalb der Schleife müssen Sie zunächst prüfen, ob für den Datensatz im Feld Link ein Wert eingegeben wurde. Nur dann dürfen Sie nämlich das <link>
-Element ausgeben. Als Wert für das Attribut rdf:about
im <item>
-Element geben Sie in beiden Fällen die ID des Datensatzes aus. Das stellt sicher, dass die Zuordnung zwischen Channel- und About-Block einwandfrei funktioniert. Um zu prüfen, ob der Link definiert wurde, vergleichen Sie den Feldwert einfach mit der Konstanten empty
. Ist das Feld nicht leer, geben Sie anschließend das <link>
-Element in die Variable aus. Am Ende der Schleife dürfen Sie natürlich nicht vergessen, die MoveNext
-Methode aufzurufen, um zum nächsten Datensatz zu wechseln.