If CType(dgtDrawTemp.Items(i).FindControl("chkSelected"), CheckBox).Checked Then  
修改为:
If CType(dgtDrawTemp.Items(i).cell(chkselected所在dgtdrawtemp的列数).FindControl("chkSelected"), CheckBox).Checked Then

解决方案 »

  1.   

    我改成这样:
    If CType(dgtDrawTemp.Items(i).Cells(0).FindControl("chkSelected"), CheckBox).Checked Then我的chkSelected是第一列。但还是只执行else部分??
      

  2.   

    try:If (CType(dgtDrawTemp.Items(i).Cells(0).FindControl("chkSelected"), CheckBox)).Checked Then
      

  3.   

    你最好还是分开写的比较好调试
    dim chk as checkbox
    chk=ctype(dgtDrawTemp.Items(i).cell(0).FindControl("chkSelected"), checkbox)
    if chk.checked= true then
    ....
    else
    ....
    end if
    调试看看没有有找到那个CHECKBOX
      

  4.   

    没用…………:(
    我改成这样,为什么还是只执行else部分??????
            For i = 0 To dgtDrawTemp.Items.Count - 1
                If CType(dgtDrawTemp.Items(i).FindControl("chkSelected"), CheckBox).Checked Then   '判断是否选择了复选框
                    Response.Write("Checked")
                    strSQL = "UPDATE z_draw_temp SET flag='2',reject_='"
                    strSQL += strRe
                    strSQL += "' WHERE product_id='"
                    strSQL += objDataSetProductID.Tables(0).Rows(i).Item("product_id") + "' AND "
                    strSQL += "ctrl_no ='"
                    strSQL += Request("message")
                    strSQL += "'"
                    strFlag = objWebform1.UpdateData(strSQL)
                Else
                    Response.Write("NoChecked")
                    strSQL = "UPDATE z_draw_temp SET flag='3',reject_='"
                    strSQL += strRe
                    strSQL += "' WHERE product_id='"
                    strSQL += objDataSetProductID.Tables(0).Rows(i).Item("product_id") + "' AND "
                    strSQL += "ctrl_no ='"
                    strSQL += Request("message")
                    strSQL += "'"
                    strFlag = objWebform1.UpdateData(strSQL)
                End If
            Next
      

  5.   

    请问大家有没有动态添加含有checkbox的模版列