Private Sub EnterNewRecordToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles EnterNewRecordToolStripMenuItem.Click
Dim conString1 As SqlConnection = New SqlConnection("Data Source=DHONE-one02;Initial Catalog=testing;User ID=rXXXX;Password=XXXXXXXXXXXXXXXXXX")
Dim addEntry As SqlCommand = New SqlCommand("INSERT INTO dbo.account (" + "custid,Date,phone,fname,lname,altphone,address1,a ddress2,city,state,zip,email,service,uname,passwor d)" + "VALUES(@fname,@lname,@address1,@address2,@city,@s tate,@zip,@email,@phone,@altphone,@custid,@date,@s ervice,@uname,@password)", conString1)
addEntry.Parameters.Add("@custid", SqlDbType.Char, 10).Value = txtcustid.Text
addEntry.Parameters.Add("@fname", SqlDbType.VarChar, 50).Value = txtfname.Text
addEntry.Parameters.Add("@lname", SqlDbType.VarChar, 50).Value = txtlname.Text
addEntry.Parameters.Add("@address1", SqlDbType.VarChar, 100).Value = txtaddress1.Text
addEntry.Parameters.Add("@address2", SqlDbType.VarChar, 50).Value = txtaddress2.Text
addEntry.Parameters.Add("@city", SqlDbType.VarChar, 50).Value = txtcity.Text
addEntry.Parameters.Add("@state", SqlDbType.Char, 2).Value = txtstate.Text
addEntry.Parameters.Add("@zip", SqlDbType.Char, 5).Value = txtzip.Text
addEntry.Parameters.Add("@phone", SqlDbType.Char, 14).Value = txtphone.Text
addEntry.Parameters.Add("@altphone", SqlDbType.Char, 14).Value = txtaphone.Text
addEntry.Parameters.Add("@email", SqlDbType.VarChar, 50).Value = txtemail.Text
addEntry.Parameters.Add("@date", SqlDbType.VarChar, 30).Value = txtdate.Text
addEntry.Parameters.Add("@service", SqlDbType.VarChar, 200).Value = txtservice.Text
addEntry.Parameters.Add("@uname", SqlDbType.VarChar, 50).Value = txtuname.Text
addEntry.Parameters.Add("@password", SqlDbType.VarChar, 50).Value = txtpassword.Text
conString1.Open()
addEntry.ExecuteNonQuery()
conString1.Close()
MessageBox.Show("Success")
End Sub

The error Im getting is: String or binary data would be truncated.
The statement has been terminated.


When I try to insert into the database the program seems to be ignoring the values I assign to each field and it ignores the values it is getting from the database. Any help would be greatly appreciated.