dim mybutton as button
mybutton= CType(e.Item.Cells(0).FindControl("BtnDelete"), Button)
If IsManageComment(Session("AuthorityURL"), Session("ArticleID")) Then
mybutton.Visible = True
Else
mybutton.Visible = False
End If
mybutton= CType(e.Item.Cells(0).FindControl("BtnDelete"), Button)
If IsManageComment(Session("AuthorityURL"), Session("ArticleID")) Then
mybutton.Visible = True
Else
mybutton.Visible = False
End If
mybutton=CType(e.Item.Cells(0).FindControl("BtnDelete")
If IsManageComment(Session("AuthorityURL"), Session("ArticleID")) Then
mybutton.Visible = True
Else
mybutton.Visible = false
End If
End Sub
看样子是没找到,但我确实有这个按扭的啊,在第一列,名字为BtnDelete
出错提示:未将对象引用设置到对象的实例。
)才进行相关的操作,别的行(分页的行,头行等等是没有删除按钮的):Public Sub DataGrid_ItemDataBound(ByVal sender As Object, ByVal e As DataGridItemEventArgs) Handles DgComment.ItemDataBound
If e.Item.ItemType = ListItemType.Item Or e.Item.ItemType = ListItemType.AlternatingItem Or e.Item.ItemType = ListItemType.EditItem Then
If IsManageComment(Session("AuthorityURL"), Session("ArticleID")) Then
CType(e.Item.Cells(0).FindControl("BtnDelete"), Button).Visible = True
Else
CType(e.Item.Cells(0).FindControl("BtnDelete"), Button).Visible = False
End If
End If
End Sub