|
-
Nov 24th, 2002, 04:05 PM
#1
Thread Starter
Lively Member
Athley, Thank you for your reply,
Yes I am using CommandBuilder, below is my related code in brief:
' Initiolize ....
Dim mySql = "SELECT * FROM AN_Bank"
Dim myDA As New SqlDataAdapter(mySql, myConn.oConnection)
Dim myCB As New SqlCommandBuilder(myDA)
Dim myDS As New DataSet()
Dim myDR As DataRow
Private Sub frm_Bank_Load
myDA.UpdateCommand = myCB.GetUpdateCommand
myDA.Fill(myDS, "Bank")
' Fill the DataRow
myDR = myDS.Tables("Bank").Rows(0)
Call DataBinding()
End Sub
Private Sub DataBinding()
Me.cbSelect.DataSource = myDS.Tables("bank").DefaultView
Me.cbSelect.DisplayMember = "BankName_e"
Me.txtBankName_e.DataBindings.Add("Text", myDS.Tables("Bank").DefaultView, "BankName_e")
Me.txtBankName_a.DataBindings.Add("Text", myDS.Tables("Bank").DefaultView, "BankName_a")
End Sub
Private Sub btnSave_Click
myDR("bankname_a") = "First Bank" ' This as test
myDA.Update(myDS, "Bank")
myDS.AcceptChanges()
End Sub
Thanks again
<><><><><><><><><><><><><><><><><><>
<><> REMEMBER,,,,KNOWLEDGE IS POWER <><>
<><><><><><><><><><><><><><><><><><>
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|