|
Add control dynamically |
Dim J As Integer = 0
For Each Item In MyArray
ddl1(J) = New DropDownList()
ddl1(J).ID = "ddlID" & J
ddl1(J).DataTextField = "Name"
ddl1(J).DataValueField = "ID"
Panel1.Controls.Add(ddlSuper(J))
If Not IsPostBack Then
Dim sqlText As String = "SQL select statement"
ddl1(J).DataSource = ConfigurationManager.ConnectionStrings("connString").ConnectionString
ddl1(J).DataBind()
Dim liItem As ListItem = New ListItem("(None Selected)", 0)
ddl1(J).Items.Insert(0, liItem)
Dim ddli As ListItem = Nothing
ddli = ddl1(J).Items.FindByValue(myparm)
If ddli IsNot Nothing Then
ddli.Selected = True
End If
End If
J = J + 1
Next
|