|
<%@ Page Language=VB Debug=true %>
<script runat=server>
Sub SubmitBtn_Click(Sender As Object, E As EventArgs)
Dim I as Integer
Dim J as Integer
For I = 1 to txtNumber.Text
Dim MyDDL = New DropDownList
MyDDL.ID = "ddlDynamic" & I
For J = 1 to 3
Dim MyLI as New ListItem
MyLI.Text = "Control Number: " & I & "-" & J
MyLI.Value = I & J
MyDDL.Items.Add(MyLI)
Next
frmMyPage.Controls.Add(MyDDL)
Dim MyLiteral = New LiteralControl
MyLiteral.Text = "<BR><BR>"
frmMyPage.Controls.Add(MyLiteral)
Next
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>Creating a DropDownList Control in Code</TITLE>
</HEAD>
<Body LEFTMARGIN="60">
<form
id="frmMyPage"
runat="server"
>
<B>Enter the number of DropDownList controls you want:</B><BR><BR>
<asp:TextBox
id="txtNumber"
runat=server
/>
<BR><BR>
<asp:button
id="butOK"
text="OK"
onclick="SubmitBtn_Click"
runat="server"
/>
<BR><BR>
</form>
</BODY>
</HTML>
|
