How Do I Insert Datagridr Checkbox Into SQL Bit Fields Using A SqlDataSource

Dim strStatus As String

Dim strGroup As String

Dim strLicense As String = dtgPhysician.DataKeys(e.Item.ItemIndex)

Dim strUpdateStatus As String

Dim strUpdateGroup As String

Dim strName As String

Dim strDate As String

Dim strSubject As String

Dim blPDA As Boolean

Dim strPDA As Byte

strStatus = CType(e.Item.FindControl("lstStatus"), DropDownList).SelectedItem.Text

strGroup = CType(e.Item.FindControl("txtGroup"), TextBox).Text

strName = e.Item.Cells(1).Text.Trim

strDate = CType(e.Item.FindControl("txtDate"), TextBox).Text

strSubject = CType(e.Item.FindControl("dpTraining"), DropDownList).SelectedItem.Text

blPDA = CType(e.Item.FindControl("ckPDA"), CheckBox).Checked

strPDA = Convert.ToString(blPDA)



strUpdateStatus = "UPDATE DoctorMaster SET Status = @p_Status , PGroup=@p_Group , @p_PDA wHERE (PLIC= @p_License);"

' ... Make a SQL call to update the database ...

'UpdatePhysician

Dim strConn As String

strConn = ConfigurationSettings.AppSettings("ConString")

If strConn = String.Empty Then

myConn = New SqlConnection()

Else

myConn = New SqlConnection(strConn)

End If

myConn.Open()

Dim daPhysician As New SqlDataAdapter()

Dim comUpdate As New SqlCommand()

comUpdate.Connection = myConn

daPhysician.UpdateCommand = comUpdate

comUpdate.CommandType = CommandType.Text

comUpdate.CommandText = strUpdateStatus

'Return the DataGrid to its pre-editing state

comUpdate.Parameters.Add(New System.Data.SqlClient.SqlParameter("@p_Status", System.Data.SqlDbType.Char, 3, "Status")).Value = strStatus

comUpdate.Parameters.Add(New System.Data.SqlClient.SqlParameter("@p_Group", System.Data.SqlDbType.NVarChar, 15, "PGroup")).Value = strGroup

comUpdate.Parameters.Add(New System.Data.SqlClient.SqlParameter("@p_License", System.Data.SqlDbType.NVarChar, 15, "PLIC")).Value = strLicense

 

comUpdate.Parameters.Add(New System.Data.SqlClient.SqlParameter("@p_PDA", System.Data.SqlDbType.Bit, "PDA")).Value = CType(e.Item.FindControl("ckPDA"), CheckBox).Checked.ToString



comUpdate.ExecuteNonQuery()



comUpdate.Dispose()

 

Thanks.

It kept givimg me data  format error.