舞蹈我的祖国串词:动态生成ASP.NET控件

来源:百度文库 编辑:查人人中国名人网 时间:2024/04/29 03:43:09
是这样的一个情况,我写了一个过程
大致内容如:
'SQL语句,数据内容(控件名称,对应数据库中的名称,类型{1.文本,2.单选,3.列表,4.多选})
Public Sub DataBindFinish(ByVal strSql, ByVal strField)
Dim ds As DataTable = SelectSql(strSql, "DataBindTable").Tables(0)
Dim i, j
If strField = "" Then
Exit Sub
ElseIf InStr(strField, "|") > 0 Then '多数据
Dim strSplitField() As String = Split(strField, "|")
For i = 0 To UBound(strSplitField)
Dim strOneSplit() As String = Split(strSplitField(i), ",")
Select Case CInt(strOneSplit(2))
Case 1
Dim strData As Object
strData.ID = strOneSplit(1)
strData.Text = ds.Rows(0).Item(strOneSplit(1))
Case 2
Dim strData1 As Object
Dim strData2 As Object
strData1.ID = strOneSplit(0) & "1".ToString()
strData2.ID = strOneSplit(0) & "2".ToString()
If strOneSplit(1) = "false" Then
strData1.Checked = False
strData2.Checked = True
Else
strData1.Checked = True
strData2.Checked = False
End If
Case 3

Case 4

End Select
Next
Else '单数据
Dim strSplitField() As String = Split(strField, ",")

End If
End Sub
我想问一下,有办法让页面调用这个过程时自动根据内容生成控件吗?
怎么弄也不行,各位给看一下,谢谢~