请帮助通过文本框更新值 [英] Please help to update values through textbox

问题描述

当我在文本框的帮助下更新值时，它显示成功的消息，但它无法将数据实际更新到数据库.plz帮助我



< b>我尝试了什么：

when i update the values with help of text box it show message of success but it can't update data actually to data base.plz help me

What I have tried:

Protected Sub btnupdate_Click(sender As Object, e As EventArgs) Handles btnupdate.Click
      Con = New SqlConnection("Data Source=VU-IT-INTERN1;Initial Catalog=fuelsystem;User ID=sa;Password=123")

      Try
          Con.Open()
          Cmd = New SqlCommand
          Cmd.Connection = Con
          Cmd.CommandText = "UPDATE fuel  SET GenID= @GenID, F_date= @F_date,S_F_reading=@S_F_reading, E_F_reading=@E_F_reading, Total_Feul=@Total_Feul WHERE Fuel_Id= @Fuel_Id"
          Cmd.CommandType = CommandType.Text
          Cmd.Parameters.Clear()
          Cmd.Parameters.AddWithValue("@GenID", txtGeneratorId.Text)
          Cmd.Parameters.AddWithValue("@F_date", txtDate.Text)
          Cmd.Parameters.AddWithValue("@S_F_reading", txtBeforefilling.Text)
          Cmd.Parameters.AddWithValue("@E_F_reading", txtAfterfilling.Text)
          Cmd.Parameters.AddWithValue("@Total_Feul", TxtTottal.Text)
          Cmd.Parameters.AddWithValue("@Fuel_Id", txtfillingid.Text)


          'Cmd.ExecuteNonQuery()

          lblmessage.Text = Cmd.ExecuteNonQuery().ToString & "Your Data has succesully Updated"

          'For Each p As SqlParameter In Cmd.Parameters
          '    Cmd.Parameters.Remove(p)
          'Next
      Catch ex As Exception
          lblmessage.Text = ex.ToString

      Finally
          Con.Close()
      End Try

  End Sub

推荐答案

正如评论中所指出的，Cmd.ExecuteNonQuery（）是将在sql server上执行你的sql的代码行，但是你已将它注释掉了。

As pointed out in the comments, Cmd.ExecuteNonQuery() is the line of code that will execute your sql on the sql server, but you have it commented out.

这篇关于请帮助通过文本框更新值的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！