Inserting a checkbox value into bit field sql server 2000

Edited by SomeNewKid. Please post code between<code> and</code> tags.

---

This is probaly the easiest question you've ever read but here goes.

I have a simple checkbox value that i want to insert into the database but whatever i do it does not seem to let me.

Here is my code:

Sub AddSection_Click(Sender As Object, e As EventArgs)
 Dim myCommand As SqlCommand
 Dim insertCmd As String
 ' Build a SQL INSERT statement string for all the input-form
 ' field values.
 insertCmd = "insert into Customers values (@.SectionName, @.SectionLink, @.Title, @.NewWindow, @.LatestNews, @.Partners, @.Support);"
 ' Initialize the SqlCommand with the new SQL string.
 myCommand = New SqlCommand(insertCmd, myConnection)
 ' Create new parameters for the SqlCommand object and
 ' initialize them to the input-form field values.
 myCommand.Parameters.Add(New SqlParameter("@.SectionName", SqlDbType.nVarChar, 50))
 myCommand.Parameters("@.SectionName").Value = Section_name.Value
 myCommand.Parameters.Add(New SqlParameter("@.SectionLink", SqlDbType.nVarChar, 80))
 myCommand.Parameters("@.SectionLink").Value = Section_link.Value
 myCommand.Parameters.Add(New SqlParameter("@.Title", SqlDbType.nVarChar, 50))
 myCommand.Parameters("@.Title").Value = Section_title.Value
 If New_window.Checked = false Then
 myCommand.Parameters.Add(New SqlParameter("@.NewWindow", SqlDbType.bit, 1))
 myCommand.Parameters("@.NewWindow").Value = 0
 else
 myCommand.Parameters.Add(New SqlParameter("@.NewWindow", SqlDbType.bit, 1))
 myCommand.Parameters("@.NewWindow").Value = 1
 End If
 If Latest_news.Checked = false Then
 myCommand.Parameters.Add(New SqlParameter("@.LatestNews", SqlDbType.bit, 1))
 myCommand.Parameters("@.LatestNews").Value = 0
 else
 myCommand.Parameters.Add(New SqlParameter("@.LatestNews", SqlDbType.bit, 1))
 myCommand.Parameters("@.LatestNews").Value = 1
 End If
 If Partners.Checked = false Then
 myCommand.Parameters.Add(New SqlParameter("@.Partners", SqlDbType.bit, 1))
 myCommand.Parameters("@.Partners").Value = 0
 else
 myCommand.Parameters.Add(New SqlParameter("@.Partners", SqlDbType.bit, 1))
 myCommand.Parameters("@.Partners").Value = 1
 End If
 If Support.Checked = false Then
 myCommand.Parameters.Add(New SqlParameter("@.Support", SqlDbType.bit, 1))
 myCommand.Parameters("@.Support").Value = 0
 else
 myCommand.Parameters.Add(New SqlParameter("@.Support", SqlDbType.bit, 1))
 myCommand.Parameters("@.Support").Value = 1
 End If
 myCommand.Connection.Open()
 ' Test whether the new row can be added and display the
 ' appropriate message box to the user.
 Try
 myCommand.ExecuteNonQuery()
 Message.InnerHtml = "Record Added<br>" & insertCmd
 Catch ex As SqlException
 If ex.Number = 2627 Then
 Message.InnerHtml = "ERROR: A record already exists with " _
 & "the same primary key"
 Else
 Message.InnerHtml = "ERROR: Could not add record, please " _
 & "ensure the fields are correctly filled out"
 Message.Style("color") = "red"
 End If
 End Try
 myCommand.Connection.Close()
 BindGrid()
 End Sub

Any response would be appreciatedYou're right; it's easier than you think. Try this:

myCommand.Parameters.Add(New SqlParameter("@.Partners", SqlDbType.bit, 1))
myCommand.Parameters("@.Partners").Value = Partners.Checked

|||thanks a lot and sorry for the late reply that worked