Solved

Update Dataset and Database

Posted on 2007-03-29
8
160 Views
Last Modified: 2010-04-23
I'm  trying to update a dataset and its not working.  
The form has 4 different 'modes' that it opens in for different formatting reasons.  When the user loads the form in Edit Mode, the form loads and I open the connection and fill the data adapter then use the FindBy function to locate the record the user wants (code below):

Me.Con_DWS.Open()
      Da_Main.Fill(Ds_DWSMain1.DWS_Main)
Me.Con_DWS.Close()

Dim drDWS_Main as ds_DWSMain.DWS_MainRow
drDWS_Main = Ds_DWSMain1.DWS_Main.FindBySlip_no(me.txtSlip_no.text)

txtJob_num.text = drDWS_Main.job_no
txtSWO_num.text = drDWS_Main.swo_no
txtDate.text = drDWS_Main.job_date
txtLocation = drDWS_Main.job_site
txtContractor.text = drDWS_Main.contractor
txtdescription.text = drDWS_Main.job_desc

At this point I have the information in the textboxes based on what the user has entered in txtSlip_no.text.

The user can then edit some of the fields.  The user will then save the data and I run the following code:

Public Sub btnSave.....
Con_DWS.Open()
Dim drDWS_Main as ds_DWSMain.DWS_MainRow
drDWS_Main.job_no = txtJob_num.text
drDWS_Main.swo_no = txtSWO_num.text
drDWS_Main.job_date = txtDate.text
drDWS_Main.job_site = txtLocation
drDWS_Main.contractor = txtContractor.text
drDWS_Main.job_desc = txtdescription.text

Da_Main.Update(ds_DWSMain1.DWS_Main)
Con_DWS.Close()

Yet, the update doesn't happen.  
0
Comment
Question by:tobin46
  • 3
  • 2
8 Comments
 
LVL 7

Expert Comment

by:dctuck
ID: 18818730
I assume that ds_DWSMain is a DataSet, in which case, after the Da_Main.Update call, you need to have:

ds_DWSMain.AcceptChanges()
0
 
LVL 1

Author Comment

by:tobin46
ID: 18819004
Tried that it didn't work.  
0
 
LVL 7

Expert Comment

by:dctuck
ID: 18821990
You shouldn't actually need to open your connections for datasets and dataadapters, as it should do that for you automatically. Not sure if that makes any difference, though
0
 
LVL 1

Author Comment

by:tobin46
ID: 18833017
I think you are right.  The textboxes aren't bound to the dataset though.  If they were bound to the dataset, it would automatically update if there are changes.  

0
 
LVL 7

Accepted Solution

by:
dctuck earned 500 total points
ID: 18833055
Just realised - you haven't actually added the row to the dataset.

ds_DWSMain.DWS_Main.AddDWS_MainRow(drDWS_Main)

before Update / AcceptChanges commands
0

Featured Post

Threat Intelligence Starter Resources

Integrating threat intelligence can be challenging, and not all companies are ready. These resources can help you build awareness and prepare for defense.

Join & Write a Comment

Article by: Kraeven
Introduction Remote Share is a simple remote sharing tool, enabling you to see, add and remove remote or local shares. The application is written in VB.NET targeting the .NET framework 2.0. The source code and the compiled programs have been in…
Creating an analog clock UserControl seems fairly straight forward.  It is, after all, essentially just a circle with several lines in it!  Two common approaches for rendering an analog clock typically involve either manually calculating points with…
Excel styles will make formatting consistent and let you apply and change formatting faster. In this tutorial, you'll learn how to use Excel's built-in styles, how to modify styles, and how to create your own. You'll also learn how to use your custo…
Polish reports in Access so they look terrific. Take yourself to another level. Equations, Back Color, Alternate Back Color. Write easy VBA Code. Tighten space to use less pages. Launch report from a menu, considering criteria only when it is filled…

708 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

15 Experts available now in Live!

Get 1:1 Help Now