Joined
Last Seen
0 Reputation Points
Unknown Quality Score
No one has voted on any posts yet. Votes from other community members are used to determine a member's reputation amongst their peers.
0 Endorsements
Ranked #72.7K
|
here's my code [CODE] Dim suppQuery As String = "SELECT [Supplier ID],[Company],[Last Name],[First Name],[Email Address],[Mobile Phone],[Office Phone],[Address],[City],[ZIP/Postal Code],[Notes] FROM [Suppliers]" Dim dsSupp As New DataSet Dim daSupp As New OleDbDataAdapter(suppQuery, cnPharma) Dim cbSupp As New OleDbCommandBuilder(daSupp) Try daSupp.Fill(dsSupp, "Suppliers") Dim rownum As Integer rownum = listSupplier.SelectedIndex With dsSupp.Tables("Suppliers") .Rows(rownum).Item("Company") = …
|