1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44
| <html>
<head>
<Script language="javascript">
</Script>
<SCRIPT LANGUAGE=vbscript>
<!--
dim staffBuf
function SelectStaff
dim objSelect, i, iLen
SelectStaff = False
staffBuf = staffBuf & Chr(window.event.keyCode)
iLen = len(staffBuf)
set objSelect = document.form1.FilterStaff
for i = 0 to objSelect.Options.length - 1
if strcomp(left(objSelect.Options(i).Text, iLen), staffBuf, 1) = 0
then
objSelect.SelectedIndex = i
exit function
end if
next
staffBuf = ""
end function
-->
</script>
<body onload="form1.FilterStaff.focus()">
<form name="form1">
<select name="FilterStaff" width="20" onKeyPress="return SelectStaff();">
<option value="AAA">AAA</option>
<option value="ABB">ABB</option>
<option value="ABC">ABC</option>
<option value="BAA">BAA</option>
<option value="BBA">BBA</option>
<option value="BBC">BBC</option>
<option value="CAA">CAA</option>
<option value="CAB">CAB</option>
<option value="CBB">CBB</option>
</select>
</form>
</body>
</html> |
Partager