| Ukážka | ||||
| Script | <SCRIPT LANGUAGE=vbscript><!-- dim i Sub Tl_onclick i=i+1 Vyber.length=i'nastav pocet poloziek OPTION Vyber.options(i-1).text =Txt.value'zapis polozky Vyber.options(i-1).style.backgroundcolor=rgb(i*20,+i*10,150+i*15) Vyber.options(i-1).style.color=rgb(255,0,0) Vyber.selectedIndex=i-1'vyber polozky txt.value="Košice " & vyber.length'text End Sub --></SCRIPT> |
|||
| Objekty | <SELECT id=vyber style="WIDTH:200px"> <OPTION> </OPTION> </SELECT> <INPUT type="submit" id="Tl" name="Submit" value="Zapíš tento text do SELECT" style="WIDTH: 250px" width="300"> <INPUT id=txt name="textfield" style="WIDTH: 250px" width="300" value=Košice> |