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.