2011-08-21 47 views
0

我試圖編輯列的數據。我在文本框中加載列並讓用戶編輯字段。但現在將其插入,我知道我可以刪除列,並添加一個新的,但我不能只是簡單地覆蓋在列中的數據?使用插入在列中編輯數據?

謝謝!

'Edit Customer 
Dim bllKlant As New bllKlant 
Dim objKlant As New Klant 
objKlant.KlantNaam = txtNaam.Text 
objKlant.KlantBtwNr = txtBtw.Text 
objKlant.KlantCode = txtCode.Text 
objKlant.KlantAdminLidID = ddlLeden.SelectedValue 
objKlant.KlantDealerID = ddlDealers.SelectedValue 

'Edit+ checks 
bllKlant.bewerkKlant(objKlant) 

在bllKlant中,我調用插入/更新列的函數。

在dalKlant我使用的功能,並返回一個布爾值的更新是否成功。 Klant =客戶,它只是在荷蘭。

+3

['UPDATE'](http://dev.mysql.com/doc/refman/5.0/en/update.html)查詢。如果您向我們展示了一些代碼,我們可以爲您的案例提供解決方案。 – Shef

+0

爲我編輯我的文章。 – CustomX

+0

哇...這是一種語言,我不「說話」。我想這是VB,你應該添加該標籤以及您的帖子。除此之外,還有一個函數定義缺少'bewerkKlant()'。 – Shef

回答

2

好了,這是我如何解決它。

在aspx.vb頁我做了以下

Dim bllCust As New bllCust 
Dim objCust As New Cust 
objCust.Custname = txtName.Text 
objCust.CustBtwNr = txtBtw.Text 
objCust.CustCode = txtCode.Text 
objCust.CustAdminUserID = ddlUsers.SelectedValue 
objCust.CustDealerID = ddlDealers.SelectedValue 

'Edit+ checks 
Try 
    bllCust.EditCust(objCust) 
Catch ex As Exception 
    lblFeedback.Text = ex.Message 
End Try 

在bllCust:在dalCust

Public Function EditCust(ByVal objCust As Cust) As Boolean 
<!-- I have checks here to see whether the values don't already excist. --> 

    If dataKlant.EditCust(objCust) Then 
     Throw New Exception("Customer was edited.") 
     Return True 
    Else 
     Throw New Exception("Customer couldn't be edited, try again.") 
     Return False 
    End If 
End Function 

後來總算:

Public Function EditCust(ByVal objCust As Cust) As Boolean 
    myconn.Open() 

    Dim result As New Boolean 

    Dim SQL As String = "update Cust set CustName= @CustName, CustCode = @CustCode where CustID= @CustID" 
    Dim cmd As New MySqlCommand(SQL, myconn) 

    cmd.Parameters.AddWithValue("@CustID", objCust.CustID) 
    cmd.Parameters.AddWithValue("@CustName", objCust.CustName) 
    cmd.Parameters.AddWithValue("@CustCode", objCust.CustCode) 

    result= cmd.ExecuteNonQuery() 

    myconn.Close() 
    Return result 
End Function 

這就是我是如何做到的。我也把荷蘭語翻譯成英文,所以每個人都能更好地理解它。