<% Set resPauschalen = connpauschalen.Execute("SELECT * FROM tblPauschalen WHERE topnews = 'ja'") if resPauschalen.EOF then %> <% else while not resPauschalen.EOF intId=resPauschalen.Fields("pauschalenid").value strBild=resPauschalen.Fields("bild").value strUeber=resPauschalen.Fields("ueberschrift").value strTeaser=resPauschalen.Fields("teaser").value strPreis=resPauschalen.Fields("preis").value %> <% resPauschalen.MoveNext wend resPauschalen.Close Set resPauschalen = Nothing connpauschalen.close Set connpauschalen = Nothing end if 'für Abfrage, ob überhaupt 1 Datensatz vorhanden ist %>

Derzeit sind leider keine News verfügbar!

>> <%= strUeber %> <%= strTeaser %>