my UPDATE ERROR..

Question

IT_Student_604 0 Light Poster

13 Years Ago

hi.. i'm having problem w/ my UPDATE SYNTAX .. I CAN'T FIGURE OUT WHAT'S WRONG WITH MY SYNTAX.. PLEASE HELP ME.. I REALLY NEED TO FINISH THIS FOR MY DTR SYSTEM THESIS.. i can't move on to my other codes.. please...

--the error that i get is.. UPDATE SYNTAX ERROR..

Private Sub btnEdit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEdit.Click


        i = MessageBox.Show("Are you sure you want to Update the record?", "Confirm Update", MessageBoxButtons.YesNo, MessageBoxIcon.Question)

        If i = MsgBoxResult.Yes Then
            constr = "UPDATE tblEmployee SET LastName='" & txtLName.Text _
                    & "',FirstName='" & txtFName.Text _
                    & "',MI='" & txtMI.Text _
                    & "',Gender='" & cbGender.Text _
                    & "',Status='" & cbStatus.Text _
                    & "',BirthDate='" & DateTimePicker1.Text _
                    & "',Age='" & lblAge.Text _
                    & "',Religion='" & txtReligion.Text _
                    & "',BirthPlace='" & txtBirthplace.Text _
                    & "',Department='" & cbDepartment.Text _
                    & "',Address='" & txtAddress.Text _
                    & "',MobileNo='" & mskMobNo.Text _
                    & "',Access='" & txtAccess.Text _
                    & "',IDNumber='" & mskIDNo.Text _
                    & ",Password='" & txtPassword.Text _
                    & "',Position='" & cbPosition.Text _
                    & "',Shift='" & cbShift.Text _
                    & "',SSSNumber='" & txtSSS.Text _
                    & "',TIN='" & txtTIN.Text _
                    & "',PhilHealth='" & txtPhilHealth.Text _
                    & "',PAG-IBIG='" & txtPAGIBIG.Text _
                    & "' WHERE EmployeeNo=" & txtEmpNo.Text

            cmd = New OleDbCommand(constr, cn)
            cn.Open()
            i = cmd.ExecuteNonQuery()
            MessageBox.Show(i & " Record Updated Successfully!", "Techno-Time Software", MessageBoxButtons.OK, MessageBoxIcon.Information)
            cn.Close()
        End If

        Remove_Binding()
        Create_Table()
        Add_Binding()

    End Sub

sql vb.net

2 Contributors
20 Replies
204 Views
13 Hours Discussion Span
Latest Post 13 Years Ago Latest Post by IT_Student_604

bLuEmEzzy 0 Junior Poster in Training

13 Years Ago

WHERE EmployeeNo= '" & txtEmpNo.Text "'"
in your Condition

bLuEmEzzy 0 Junior Poster in Training

13 Years Ago

it works??
syntax error = syntax error refers to an error in the syntax of a sequence of characters or tokens that is intended to be written in a particular programming language. - wiki

your syntax is wrong that's what i see on your code for your condition... welcome and tnx also...

bLuEmEzzy 0 Junior Poster in Training

13 Years Ago

just check your code... where the error occurs?? can you please put a breakpoint... thanz

bLuEmEzzy 0 Junior Poster in Training

13 Years Ago

try this one... inform me if it works... thank u :)

Private Sub btnEdit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEdit.Click
      i = MessageBox.Show("Are you sure you want to Update the record?", "Confirm Update", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
         
         If i = MsgBoxResult.Yes Then
         constr = "UPDATE tblEmployee SET LastName='" & txtLName.Text _
      & "',FirstName='" & txtFName.Text _
      & "',MI='" & txtMI.Text _
      & "',Gender='" & cbGender.Text _
      & "',Status='" & cbStatus.Text _
        & "',BirthDate='" & DateTimePicker1.Text _
        & "',Age='" & lblAge.Text _
        & "',Religion='" & txtReligion.Text _
        & "',BirthPlace='" & txtBirthplace.Text _
      & "',Department='" & cbDepartment.Text _
      & "',Address='" & txtAddress.Text _
      & "',MobileNo='" & mskMobNo.Text _
      & "',Access='" & txtAccess.Text _
        & "',IDNumber='" & mskIDNo.Text _
      & ",Password='" & txtPassword.Text _
      & "',Position='" & cbPosition.Text _
      & "',Shift='" & cbShift.Text _
      & "',SSSNumber='" & txtSSS.Text _
      & "',TIN='" & txtTIN.Text _
      & "',PhilHealth='" & txtPhilHealth.Text _
      & "',PAG-IBIG='" & txtPAGIBIG.Text _
      & "' WHERE EmployeeNo= '" & txtEmpNo.Text & "'"
      cmd = New OleDbCommand(constr, cn)
      cn.Open()

Dim Commnd as String
 Commnd = cmd.ExecuteNonQuery()
      MessageBox.Show(i & " Record Updated Successfully!", "Techno-Time Software", MessageBoxButtons.OK, MessageBoxIcon.Information)
      cn.Close()
      End If
    
      Remove_Binding()
        Create_Table()
      Add_Binding()
      End Sub

Edited 13 Years Ago by bLuEmEzzy because: n/a

bLuEmEzzy 0 Junior Poster in Training

13 Years Ago

Just Check your code... your comma, single quote or double quote etc.. thanz

Reply to this topic

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.

IT_Student_604 0 Light Poster · Answer 1 · 2011-02-19T12:37:04+00:00

thanks for ur response
uh.. what's wrong it?.. can u please explain?.. i'm sorry if i can't understand quickly

IT_Student_604 0 Light Poster · Answer 2 · 2011-02-19T12:52:46+00:00

no, i just thanked u for having tym to reply to my thread and for you helping me fix this error.. :)

it will not work, i'll just get an error of "End of Statement expected"..

but as i checked the sequence of my columns in my database and my form they are in the same sequence..

IT_Student_604 0 Light Poster · Answer 3 · 2011-02-19T13:02:47+00:00

uhm , if thats the case can u pls. help me correct my condition?..

cause i can't get into my update code anymore.. i've checked for the correct syntax of the sql update but still can't figure out my update problem..

what i wanted 2 do is to edit the info of the selected employee.. then as i clicked save.. it show a confirmation message and as i selected YES then it will save the current informations..

IT_Student_604 0 Light Poster · Answer 4 · 2011-02-19T13:09:38+00:00

my error occurs here..

i = cmd.ExecuteNonQuery()

IT_Student_604 0 Light Poster · Answer 5 · 2011-02-19T13:33:45+00:00

uhm it still has errors.. this is the error..

Syntax error (missing operator) in query expression ''1234567,Password='shunv1',Position='Teacher I',Shift='',SSSNumber='Morning',TIN='2222222',PhilHealth='222222',PAG-IBIG='222222' WHERE EmployeeNo= '2''.

IT_Student_604 0 Light Poster · Answer 6 · 2011-02-19T13:57:31+00:00

uhum.. i fixed that error..
but im back to the sql..

UPDATE syntax error

IT_Student_604 0 Light Poster · Answer 7 · 2011-02-19T13:58:57+00:00

IT_Student_604 0 Light Poster

13 Years Ago

btw thaks again.. for helping me.. :)

bLuEmEzzy 0 Junior Poster in Training · Answer 8 · 2011-02-19T14:05:11+00:00

Private Sub btnEdit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEdit.Click
      i = MessageBox.Show("Are you sure you want to Update the record?", "Confirm Update", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
          
      If i = MsgBoxResult.Yes Then
         constr = "UPDATE tblEmployee SET LastName='" & txtLName.Text _
      & "',FirstName='" & txtFName.Text _
         & "',MI='" & txtMI.Text _
         & "',Gender='" & cbGender.Text _
         & "',Status='" & cbStatus.Text _
        & "',BirthDate='" & DateTimePicker1.Text _
        & "',Age='" & lblAge.Text _
        & "',Religion='" & txtReligion.Text _
      & "',BirthPlace='" & txtBirthplace.Text _
        & "',Department='" & cbDepartment.Text _
      & "',Address='" & txtAddress.Text _
      & "',MobileNo='" & mskMobNo.Text _
      & "',Access='" & txtAccess.Text _
      & "',IDNumber='" & mskIDNo.Text _
        & "',Password='" & txtPassword.Text _
      & "',Position='" & cbPosition.Text _
      & "',Shift='" & cbShift.Text _
      & "',SSSNumber='" & txtSSS.Text _
        & "',TIN='" & txtTIN.Text _
      & "',PhilHealth='" & txtPhilHealth.Text _
      & "',PAG-IBIG='" & txtPAGIBIG.Text _
        & "' WHERE EmployeeNo= '" & txtEmpNo.Text & "'"
      cmd = New OleDbCommand(constr, cn)
      cn.Open()

      Dim Commnd as String
        Commnd = cmd.ExecuteNonQuery()
        MessageBox.Show(i & " Record Updated Successfully!", "Techno-Time Software", MessageBoxButtons.OK, MessageBoxIcon.Information)
        cn.Close()
        End If
      Remove_Binding()
  
      Create_Table()
      Add_Binding()
      End Sub

IT_Student_604 0 Light Poster · Answer 9 · 2011-02-19T14:05:33+00:00

ahm.. ive already fixed the error of missing operator but im still stuck with tha update statement error.. -_-

bLuEmEzzy 0 Junior Poster in Training · Answer 10 · 2011-02-19T14:09:10+00:00

bLuEmEzzy 0 Junior Poster in Training

13 Years Ago

what's wrong??

IT_Student_604 0 Light Poster · Answer 11 · 2011-02-19T14:26:15+00:00

aw.. i can't get rid of this errors.. im just getting back and forth
-_-

Syntax error (missing operator) in query expression ''1234567' ',Password='shunv1' ''.

bLuEmEzzy 0 Junior Poster in Training · Answer 12 · 2011-02-19T14:43:13+00:00

edit your code again ''1234567' it should be IDNumber= '" & mskIDNo.Text & "'

just review your single and double quote... thanx

IT_Student_604 0 Light Poster · Answer 13 · 2011-02-19T19:07:49+00:00

ok, sorry for the very late reply i'll just check it again.. and thankx for helping me.. :)

IT_Student_604 0 Light Poster · Answer 14 · 2011-02-19T19:45:25+00:00

..and still has the same errors.. >.<
i hate this.. :(

thanks for helping me..

IT_Student_604 0 Light Poster · Answer 15 · 2011-02-19T19:47:43+00:00

IT_Student_604 0 Light Poster

13 Years Ago

IDK what to do about this code.. :(