Tom Kruse: DB Feld in eine "if...else.." Anweisung einbinden

Beitrag lesen

Liebes Forum,

nach Stunden des Probierens bin ich ein wenig am Ende. Ich möchte ein DB Field in eine "if..else.." Anweisung einbinden. Leider bekomme ich es nicht hin. Anbei erhaltet Ihr den Code, den ich benutze. Wenn ich ihn benutze, bekomme ich manchmal einen Syntaxfehler, wenn ich den Code ändere mal einen anderen Fehler. Ich habe schon mit (, <>, doppelten " hin und her gespielt. Leider ohne Erfolg.

Vielleicht hat einer (oder eine) von Euch eine zündende Idee..???

Einen lieben Gruß

Tom

<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "Lundbeck News"
SQL = "SELECT * FROM News where Abteilung = 'IM' AND Freigabe = 1 AND Datum<= Date() Order by Datum DESC"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn, 3, 3
rs.MoveFirst
n=0
If rs.eof then
response.write "<i><font size=1>Sorry, zur Zeit sind keine Nachrichten vorhanden.</font></i>"
else
do while (Not rs.eof) AND (n<2)
%>
<%
if (rs.Fields("high")) = true then
response.write ""<br><%=rs.Fields("Datum")%>""
else
response.write "Das Feld ist false"
end if
%>
<%
On Error Resume Next
rs.MoveNext
n=n+1
loop
end if
%>