🔒 Closed Update error

[Netflix]

Please help pull me out , I'm making an update on an event(button). In this form which is giving me an error "NO value given for one or more required parameters" My TextBox1 is set to TextBox1.Enable=False

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

       Dim sample As String
       sample = Label11.Text
       cn = New OleDbConnection(con)
       cn.Open()
       With cmd
           .Connection = cn
           .CommandText = "UPDATE [Borrower] SET [Borrower_Name]='" & TextBox2.Text & _
               "',[Type]='" & ComboBox1.Text & _
               "',[Course]='" & ComboBox2.Text & _
               "',[Year]='" & ComboBox3.Text & _
               "',[Address]='" & TextBox5.Text & _
               "',[Contact_No]='" & TextBox6.Text & _
               "',[Penalty]='" & sample & "' WHERE Val(Borrower_ID)=" & Integer.Parse(TextBox1.Text) & ""
           .ExecuteNonQuery()

       End With
       MsgBox("Borrower Successfully Updated")
       cn.Close()
       cmd.Dispose()

       End Sub

 

[Ashtra]

Good day sir , try to find some web developing forums , more people will help you there

 

[PHC-BRYLE]

Good day sir , Try to post this at Stackoverflow , more people will help you there

Oyy advertising boss .. mukhang bawal yan ..

 

[Ashtra]

Ayy bawal ba sorry :x

 

[dudoylami]

tanggalin nyo po yung [ ] sa query na update

 

[Wash]

boss ol ka i can help you out in your problem.

 

[Wash]

i know the problem try to ommit val in your where clause.

 

[Wash]

if val works i guess the problem is in the input side

 

[kje999]

Mukhang Kulang ka din ng dalawang single quotes like this ''

Before(in this line):
WHERE Val(Borrower_ID)=" & Integer.Parse(TextBox1.Text) & "

After correction:

WHERE Val(Borrower_ID)='" & Integer.Parse(TextBox1.Text) & "'

 

[Ulaap]

Mukhang Kulang ka din ng dalawang single quotes like this ''

Before(in this line):
WHERE Val(Borrower_ID)=" & Integer.Parse(TextBox1.Text) & "

After correction:

WHERE Val(Borrower_ID)='" & Integer.Parse(TextBox1.Text) & "'

pag numbers okay lang kahit walang single quote... un ang pagkakaalam ko hehehehe

 

[RunzZ]

Mukhang Kulang ka din ng dalawang single quotes like this ''

Before(in this line):
WHERE Val(Borrower_ID)=" & Integer.Parse(TextBox1.Text) & "

After correction:

WHERE Val(Borrower_ID)='" & Integer.Parse(TextBox1.Text) & "'

parang tama ka bro