Hallo,
mit einer hinzgefügten if- entscheidung geht es auch
dim zaehler
zaehler = =
do While Not rsSearch.EOF
if zaehler < 100 then
if Request.Form("autor") <>"" then
Response.Write "<SPAN CLASS='document'>" & _
rsSearch("DocAuthor") & "</SPAN><BR>"
end if
.
.
.
zaehler = zaehler + 1
rsSearch.MoveNext
loop
oder auch eine verknüpfte do-anweisung...
do while not rssearch.eof or zaehler < 100
.
.
.
loop
Odium