2013-10-01 131 views
0
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

編輯: 你的腳本似乎很好!只需檢查數據庫中是否存在具有指定標識的記錄

+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