Private Sub genBtn(ByVal btnText As String) Dim b As New LinkButton b.Attributes.Add("OnClick", "setMode('" + btnText + "')") b.Text = btnText + " " b.ID = "btn" + btnText b.Height = 23 b.BorderStyle = BorderStyle.None b.ClientIDMode = UI.ClientIDMode.Static b.Font.Bold = True b.Font.Name = "comic Sans MS" b.Font.Size = "11" b.ForeColor = Drawing.Color.White 'b.Enabled = True b.Attributes.Add("style", "cursor:hand") modeTd.Controls.Add(b) ModeBtnCnt = ModeBtnCnt + 1 AddHandler b.Click, EnableDisabledMenu() If ModeBtnCnt = 1 Then hdnModeList.Value = b.ID Else hdnModeList.Value = hdnModeList.Value + "," + b.ID End If End Sub
for (var i = 0; i < document.forms(0).elements.length; i++) { alert(document.forms(0).elements(i).name); }
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)