在VB.Net更新查询不更新

问题描述:

Dim Query As String 

    Dim con As MySqlConnection = New MySqlConnection("server=localhost;Database=sidhay;User ID=root;Password=1234;") 
    con.Open() 

    Query = "UPDATE pendingloans SET PLStatus ='" + status.Text 
    Query = Query + "' WHERE MemberID = " + loanid.Text 

    Dim cmd As MySqlCommand = New MySqlCommand(Query, con) 
    Dim i As Integer = cmd.ExecuteNonQuery() 
    If (i > 0) Then 
     MessageBox.Show("Success!") 
    Else 
     MessageBox.Show("Failed!") 
    End If 
    con.Close() 

我需要帮助,我的更新功能,它不工作。没有错误,但当我尝试更新时,它总是显示失败!任何人都知道如何解决此问题?在VB.Net更新查询不更新

+0

您需要有try..catch块才能捕获失败的消息,并尝试保留代码。在上面的方法中,你不需要检查你正在检查的方式。有尝试...赶上,如果有任何错误会发生,并会显示您的自定义消息。 – SeeSharp

+0

也许'WHERE MemberID = ...'条件不符合?你可以直接对服务器运行查询,看看它是否执行?或者作为一个测试运行'SELECT * FROM pendingloans WHERE MemberID = ... ' –

+0

什么数据类型是数据库中的MemberID? –

编辑: 你的脚本似乎很好!只需检查数据库中是否存在具有指定标识的记录

+0

试过这个但仍然失败。 Dim con As MySqlConnection = New MySqlConnection(“server = localhost; Database = sidhay; User ID = root; Password = 1234;”) con.Open() Dim query As String =“UPDATE pendingloans SET PLStatus ='”+ status.Text 查询=查询+ “” WHERE MEMBERID =” + loanid.Text 昏暗CMD作为的MySqlCommand =新的MySqlCommand(查询,CON) 昏暗我为整数= cmd.ExecuteNonQuery() 如果(I> 0)然后 MessageBox.Show( “成功”!) 否则 MessageBox.Show( “失败!”) 结束如果 con.Close() – user2765899

+0

@ user2765899它静静地失败或者没有给出一个错误? – Krimson

+0

不给我一个错误,但显示我的消息框包含我的“失败!”自定义消息。 – user2765899