Tuesday, October 25, 2005

Adding/removing a combobox item using client side scripting

Here are some sample codes in VBscript:

1. To remove an item from a combo box named 'Color'
Sub RemoveItem

Dim oChild
Set oChild =
document.GetElementById("Color").children(3)
document.GetElementById("Color").removeChild(oChild)

Set oChild = Nothing

End Sub

2. To add an item to a combo box named 'Color'
Dim a
a=1

Sub AddItem
Dim objOptSet
objOpt= document.CreateElement("OPTION")
objOpt.Value = a
objOpt.Text = "Green"
Color.add objOpt
Set objOpt = Nothing
a = a + 1
End Sub

0 Comments:

Post a Comment

<< Home