Hallo,
kann sein, dass ich in dem Thread irgendwas überlesen habe.
Doch ich bin ganz der Meinung von dey , dass es so nicht funktionieren kann. Du öffnest zwar eine Verbindung zur DB, aber
keinen Recordset.
<%
Set db = CreateObject("ADODB.Connection")
db.Open("AbsenzDB")
%>
Wenn AbsenzDB eine DSN ist, sollte das okay sein.
<%
dim query
query="SELECT wert FROM tbl_personen WHERE person='sandro mueller'"If query="1" Then Response.Write ("<")End If
%>
Du weist der Variablen query doch den Wert "SELECT ..." als String
zu, wie kann query dann "1" sein?
<%
Set rst = Server.CreateObject("ADODB.Recordset")
query="SELECT wert FROM tbl_personen WHERE person='sandro mueller'"
rst.Open query, db
If rst("wert")= "1" Then
response.write("<input type='checkbox' value='1' name='sandro' checked>")
End If%>
Hab es jetzt nicht getestet, aber so sollte es funktionieren.
Grüße, Stefan