if Anweisung bei Datenbankabfrage

[stefan]

hallo,
ich möchte beim Auslesen einer Datenbank bestimmte Datensätze nicht mit auslesen.
Diese Datensätze sind zwar mit in der Tabelle gespeichert, möchte sie aber über eine
If Then Anweisung aussortieren. Die Werte in der Spalte „erweitert“ in der Tabelle sind entweder auf 0 oder auf 1 gesetzt und die Datensätze, die bei erweitert den Wert 0 haben, sollen ausgelesen werden. Die mit Wert 1 nicht.  Folgendes Script funktioniert noch nicht so, wie ich mir das
vorstelle: (würde mich riesig über Hilfe freuen:)
<%
' ADO Connection-Objekt erzeugen und öffnen
Set cnHol = Server.CreateObject("ADODB.Connection")
cnStHol = "driver={Microsoft Access-Treiber (*.mdb)};" & _
          "dbq=" & Server.MapPath("db1.mdb")
cnHol.Open cnStHol,"",""
' ADO Recordset-Objekt erzeugen und öffnen.
Set rsCat = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM angebote ORDER BY datum DESC;"
rsCat.Open sql, cnHol, adOpenStatic, adLockReadOnly
' Recordset-Objekt durchlaufen und jeden Datenbank anzeigen
If erweitert=0 Then
Do While Not rsCat.EOF
  %>
<tr align="center" bgcolor="#CCCCCC">
<td valign="top"><%=rsCat("datum")%></td>
<td valign="top"><%=rsCat("Taetigkeit")%></td>
<td valign="top"><% Response.Write "<a href=" & _
Chr(34) & _
"probe151.asp?" & _
"qnummer=" & rsCat("nummer")& _
Chr(34) & ">" & _
rsCat("Anbieter") & _
"</a>"%></td>
    <td valign="top"><%=rsCat("Region")%></td>
<td valign="top"><%=rsCat("ab dem")%></td>
<tr>
<td bgcolor="#DDDDDD"> </td>
<td bgcolor="#DDDDDD"> </td>
<td bgcolor="#DDDDDD"> </td>
<td bgcolor="#DDDDDD"> </td>
<td bgcolor="#DDDDDD"> </td>
</tr>

</tr>
  <%
  rsCat.MoveNext
Loop
End If
' Recordset- und Connection-Objekt schließen und entfernen.
rsCat.Close
Set rsCat = Nothing
cnHol.Close
Set cnHol = Nothing
%>