PHP كود :
Dim BBTab As DB.Beda = New DB.Beda
Dim UpdateData As New DB.Data_BedaDataContext
Public Function EditRec(ByVal t As DB.Beda, ByVal i As String) As DB.Beda
Dim nn = (From h In UpdateData.Bedas Where h.Beda_id = i Select h).Single
With nn
.Beda_Name = t.Beda_Name
.Beda_Note = t.Beda_Note
.Mabee_Price = t.Mabee_Price
.Shra_Price = t.Shra_Price
End With
UpdateData.SubmitChanges()
Return nn
End Function
Private Sub btn_Save_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_Save.Click
With BBTab
.Beda_Name = txt_beda_Name.Text
.Shra_Price = txt_Shra_Price.Text
.Mabee_Price = txt_Mabee_Price.Text
.Beda_Note = txt_Note.Text
End With
EditRec(BBTab,txt_beda_id.Text)
MsgBox("Data Updated")
End Sub
مش خساره فيك ... وتحيا الوحده العربيه .
