devotionMedlem sedan jan. 20013 582 inläggTrådstart#1 Hej! 
Jag har denna koden:
<%
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.ConnectionString = "DSN=uppdragNu"
objConn.Open
sSQL = "SELECT supplierName, supplierId FROM tblExSupplier ORDER BY supplierName"
Set objRS = objConn.Execute (sSQL)
Do While not objRS.EOF
sSupplier = "" & objRS("supplierName")
iSupplierId = "" & objRS("supplierId")
Response.Write "<td class='supplierName'>" & sSupplier & " <input name='suppliers' type='checkbox' value=" & iSupplierId & "></td>"
objRS.MoveNext
Loop
objRS.Close
Set objRS = Nothing
objConn.Close
Set objConn = Nothing
%>
Hur skulle man kunna göra ett script som förhindrar att man kan avmarkera alla checkboxar? dvs en checkbox måste alltid vara vald
Mvh
Henrik
PPeter SMedlem sedan dec. 20025 483 inlägg Hejsan!
<script>
var suppliers = 0;
function stay_ch(inp)
{
suppliers = suppliers - (inp.checked ? -1 : 1);
if (suppliers == 0){
inp.checked = true;
++suppliers;
}
}
window.onload = function()
{
var elms = document.forms["namn_på_formulär"].elements["suppliers"],
len = elms.length;
if (len){
for (var i = 0; i < len; ++i){
elms[i].checked && ++suppliers;
}
} else {
suppliers = elms[0].checked;
}
}
</script>
<form>
<input type="checkbox" name="suppliers" onclick="stay_ch(this)">
<input type="checkbox" name="suppliers" onclick="stay_ch(this)">
<input type="checkbox" name="suppliers" onclick="stay_ch(this)">
</form>
devotionMedlem sedan jan. 20013 582 inlägg Nu blir jag glad igen 
i alla fall halvglad.... måste dock lösa SQL-problematiken innan jag blir helglad igen...
Tack så mycket Peter S det funkade finfint!!! 
Mvh
henrik
