Access: Massendaten zum Testen erzeugen

So ziemlich für jede Datenbank benötigen Sie während der Entwicklung Beispieldaten zum Testen. Damit irgendetwas vorhanden ist, tippen Sie schnell „asdf“ für Texte, „4711“ für Zahlenfelder und „1.1.01“ für ein Datum. Das wird noch dreimal kopiert und muss dann reichen. Warum so geizig? Testdaten lassen sich mit wenig Aufwand jederzeit in beliebiger Menge beschaffen, so dass auch von Anfang an Performancemessungen möglich sind.

Schreiben Sie eine Prozedur wie in Listing 1, welche in eine Tabelle eine beliebige Menge Daten hineinschreibt. Für dieses Beispiel benötigen Sie eine Tabelle tblMengen mit den Feldern wie in Tabelle 1.

Tabelle 1: Benötigte Felder

Feldname

Typ

Größe

Mtext

Text

255

Mzahl

Zahl

Double

Mdatum

Datum

Dann können Sie mittels Zufallsfunktion und einer Schleife viele zufallsgesteuerte Datensätze erzeugen. Listing 1 ermittelt mit der Rnd-Funktion einen Wert zwischen 0 und 1, der mit der Differenz zwischen jeweiligem Minimum und Maximum multipliziert wird. Falls beispielsweise das Minimum 3 und das Maximum 10 war, ergeben sich Werte zwischen 0 und 7 inklusive. Zu diesem Wert muss dann das Minimum wieder addiert werden. Diese Formel gilt sowohl für eine Double-Zahl als auch für das Datum. Wenn Sie ganzzahlige Ergebnisse oder ein Datum ohne Uhrzeit benötigen, entfernt die Funktion CLng (ConvertToLong) die jeweiligen Nachkommastellen. Diese Prozedur erzeugt schon die gewünschten Zahlen und Datumswerte, nur noch keine Texte.