Asp.net 复选框。选中总是在中继器中返回false
我对Repeater中的复选框总是返回假值有问题。我读过很多关于这方面的问题,总是指给我绑定数据时使用Asp.net 复选框。选中总是在中继器中返回false,asp.net,Asp.net,我对Repeater中的复选框总是返回假值有问题。我读过很多关于这方面的问题,总是指给我绑定数据时使用而不是Page.IsPostBack,我已经完成了我发现的所有示例问题,但仍然没有解决我的问题 下面是如何绑定复选框: Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Try If Not Page.IsPostBack Then
而不是Page.IsPostBack
,我已经完成了我发现的所有示例问题,但仍然没有解决我的问题
下面是如何绑定复选框:
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Try
If Not Page.IsPostBack Then
Call Load_menu()
End If
Catch ex As Exception
Response.Write("Page_Load Exception :<br>" & ex.ToString)
End Try
End Sub
Private Sub Load_menu()
Try
sqlstring = "SELECT a.menuID, a.name, b.[status] " & _
"FROM masterMenu a LEFT JOIN rolesDetail b ON b.menuID=a.menuID " & _
"WHERE a.[status] = 1 and b.RoleID = '" & roleID & "' " & _
"ORDER BY a.menuID "
DS = SQLExecuteQuery(sqlstring)
DT = DS.Tables(0)
rptMenu.DataSource = DT
rptMenu.DataBind()
Catch ex As Exception
Response.Write("Load_Menu Exception :<br>" & ex.ToString)
End Try
End Sub
Private Sub rptMenu_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.RepeaterItemEventArgs) Handles rptMenu.ItemDataBound
Try
If e.Item.ItemType = ListItemType.Item Or e.Item.ItemType = ListItemType.AlternatingItem Then
Dim lblID As Label = e.Item.FindControl("LblID")
Dim lblName As Label = e.Item.FindControl("LblName")
Dim cblChild As CheckBox = e.Item.FindControl("cblChild")
Dim dr As DataRowView = e.Item.DataItem
lblID.Text = dr.Item("menuID").ToString
lblName.Text = dr.Item("name").ToString
If dr.Item("status").ToString = "1" Then
cblChild.ID = dr.Item("menuID").ToString
cblChild.Checked = True
Else
cblChild.ID = dr.Item("menuID").ToString
cblChild.Checked = False
End If
End If
Catch ex As Exception
Throw New Exception("<b>Error RptMenu Data bound :</b>" & ex.ToString)
End Try
End Sub
我在SQL Server中使用探查器跟踪它,它总是返回0
值,这意味着cblChild。选中的总是返回False
我不知道我错过了什么。尝试使用HtmlInputCheckBox
控件,而不是CheckBox
换行
Dim cblChild As CheckBox = item.FindControl("cblChild")
到
这还需要将html复选框控件与runat=“server”
一起使用:
Protected Sub btSimpan_Click(sender As Object, e As EventArgs) Handles btSimpan.Click
Try
sqlstring = ""
For i As Integer = 0 To rptMenu.Items.Count - 1
Dim item As RepeaterItem = rptMenu.Items(i)
Dim lblID As Label = item.FindControl("LblID")
Dim cblChild As CheckBox = item.FindControl("cblChild")
Dim status As String = "0"
If cblChild.Checked Then
status = "1"
End If
sqlstring = sqlstring & " UPDATE rolesDetail SET [status] = " & status & " " & _
" WHERE roleID = '" & roleID & "' AND menuID = '" & lblID.Text.ToString.Replace("'", "''") & "'; "
Next
If SQLExecuteNonQuery(sqlstring) > 0 Then
Response.Redirect("roles.aspx")
End If
Catch ex As Exception
Response.Write("Error btSimpan_Click <BR> " & ex.ToString)
End Try
End Sub
Dim cblChild As CheckBox = item.FindControl("cblChild")
Dim cblChild As HtmlInputCheckBox = DirectCast(item.FindControl("cblChild"), HtmlInputCheckBox)
<input type="checkbox" runat="server" id='cblChild'/>
cblChild.ID = dr.Item("menuID").ToString