devotionMedlem sedan jan. 20013 582 inläggFrågan#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!!! :D
Mvh
henrik
