Client side Selection box changing

hdougl1 · Apr 24, 2002

How do I change the value of a selection box off a client side click event?
Here's the condensed view of the selection wraped in the form.

Response.Write "<form name=modify action=track2k.asp method=post>"
Response.Write "<Select name=WorkChoice >"
Response.Write "<Option value='NA'>NA</Option>"
Response.Write "<Option value='Modify'>Modify</Option>"
Response.Write "</Select>"
Response.Write "<input type=button value='Select All' name=selector onclick=changeall()>"
Response.Write "</form>"

Here's my attemp at changing the selection from the buttons click event client side.

<SCRIPT LANGUAGE="VBScript">

</SCRIPT>

Thanks for looking at this.
Henry

durug · Apr 24, 2002

Try to use Javascript because there are more free example on the net
Go check this site

http://javascript.internet.com/forms/

there a lot of scripts playing with comboboxes

Regards,
Durug

cbokowski · Apr 24, 2002

here is a bit of VBScript.
'oFld is the name of your object
'sValue is the string you want to find

sub SetOptionIndex(oFld, sValue)
dim bFound

bFound = false
for x = 0 to oFld.length - 1
if oFld.options(x).value = sValue or oFld.options(x).text = sValue then
oFld.selectedindex = x
bFound = true
exit for
end if
next
if not bFound then oFld.selectedindex = -1

end sub

Jonax · Apr 24, 2002

Here you go...

Code:

<BODY BGCOLOR=&quot;#FFFFFF&quot;>
<form name=modify action=track2k.asp method=post>
<Select size=8 multiple name=WorkChoice >
<Option value='NA'>NA</Option>
<Option value='Modify'>Modify</Option>
</Select>
<input type=button value='Select All' name=selector onclick=changeall()>
</form>

Here's my attemp at changing the selection from the buttons click event client side.

<SCRIPT LANGUAGE=&quot;VBScript&quot;>
<!--
Sub changeall()
	for each jonax in document.modify.workchoice
	jonax.selected = true
	next
End Sub
-->
</SCRIPT>
</BODY>
</HTML>

This is not a bug - it's an undocumented feature...
;-)

hdougl1 · Apr 24, 2002

Awesome that worked THANKS A LOT!
fyi
I modified your instructions to stay with in my style of codeing. ex.

Sub changeall()
for i = 0 to document.modify.WorkChoice.length -1
document.modify.WorkChoice(i).selectedindex = 1
next
End Sub

hdougl1 · Apr 24, 2002

Thanks cbokowski and Jonax
Henry

Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Client side Selection box changing

hdougl1

Programmer

durug

Technical User

cbokowski

Programmer

Jonax

Programmer

hdougl1

Programmer

hdougl1

Programmer

Similar threads

Part and Inventory Search

Sponsor