Check boks (ja/nej)
Jeg har et problem med at min check boks ikke bliver sat ind i databasen (true/false)her er der lidt kode:
<%
End If
Case \"retlink\"
If State = 0 Then
Set RS = Conn.Execute(\"SELECT * FROM Soeger WHERE ID = \" & ID)
Linknavn = RS(\"Linknavn\")
Linkbeskrivelse = RS(\"Linkbeskrivelse\")
Link = RS(\"Link\")
Kat = RS(\"Kat\")
Navn = RS(\"Navn\")
Adresse = RS(\"Adresse\")
Post = RS(\"Post\")
Byen = RS(\"Byen\")
Tlf = RS(\"Tlf\")
Plus = RS(\"Plus\")
Email = RS(\"Email\")
Bemerk = RS(\"Bemerk\")
Godkend = RS(\"Godkend\")
ShowlinketForm
Else
SQLstmt = \"UPDATE Soeger SET \"
SQLstmt = SQLstmt & \"Linknavn = \'\" & Linknavn & \"\', \"
SQLstmt = SQLstmt & \"Linkbeskrivelse = \'\" & Linkbeskrivelse & \"\', \"
SQLstmt = SQLstmt & \"Link = \'\" & Link & \"\', \"
SQLstmt = SQLstmt & \"Kat = \'\" & Kat & \"\', \"
SQLstmt = SQLstmt & \"Navn = \'\" & Navn & \"\', \"
SQLstmt = SQLstmt & \"Adresse = \'\" & Adresse & \"\', \"
SQLstmt = SQLstmt & \"Post = \'\" & Post & \"\', \"
SQLstmt = SQLstmt & \"Byen = \'\" & Byen & \"\', \"
SQLstmt = SQLstmt & \"Tlf = \'\" & Tlf & \"\', \"
SQLstmt = SQLstmt & \"Plus = \" & Plus & \", \"
SQLstmt = SQLstmt & \"Email = \'\" & Email & \"\', \"
SQLstmt = SQLstmt & \"Bemerk = \'\" & Bemerk & \"\', \"
SQLstmt = SQLstmt & \"Godkend = \" & Godkend & \" \"
SQLstmt = SQLstmt & \"WHERE ID = \" & ID
Conn.Execute SQLstmt
%>
<p align=\"center\" class=\"p\">Linket er blevet tilføjet.<br>Men kan ikke ses før at det er blevet godkendt<br>
<a CLASS=\"Link2\" href=\"default.asp\">Tilbage til startsiden</a>
Dette er i toppen af siden:
<%
if Request.form(\"Godkend\") = \"on\" then
Godkend = \"True\"
Else
Godkend = \"False\"
End If
%>
Lige meget hvad jeg gør kommer der ikke noget i databasen
