VB.NET

data not adding to database properly!

Please support our VB.NET advertiser: Programming Forums - DaniWeb Sister Site

Thread Solved

•

Join Date: Apr 2008

Posts: 115

Reputation: ninjaimp is an unknown quantity at this point

Solved Threads: 6

ninjaimp

Offline

Junior Poster

data not adding to database properly!

Nov 19th, 2008

Hi

I have a form which adds data to a dataset, which can be viewed in a datagrid as it happens and then they finish and this adds it to the database - but after a short while the data that was added seems to rdissapear ffrom the database! Wondered if anyone could see where i may have gpne wrong!

 Help with Code Tags 
 VB.NET Syntax (Toggle Plain Text) 
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 
        Dim drNew As System.Data.DataRow
 
        drNew = Me.UrlsDataSet.AllowedUrls.NewRow
        drNew.Item("URL") = urlTextBox.Text
        Me.UrlsDataSet.AllowedUrls.Rows.Add(drNew)
 
        Changes = True
 
    End Sub
 
    Sub AddData() ' add the new urls to the database
 
        Me.Validate()
        Me.AllowedUrlsBindingSource.EndEdit()
        Me.AllowedUrlsTableAdapter.Update(Me.UrlsDataSet.AllowedUrls)
 
        MsgBox("All new data added successfully!")
 
        Me.Close()
 
    End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim drNew As System.Data.DataRow

        drNew = Me.UrlsDataSet.AllowedUrls.NewRow
        drNew.Item("URL") = urlTextBox.Text
        Me.UrlsDataSet.AllowedUrls.Rows.Add(drNew)

        Changes = True
        
    End Sub

    Sub AddData() ' add the new urls to the database

        Me.Validate()
        Me.AllowedUrlsBindingSource.EndEdit()
        Me.AllowedUrlsTableAdapter.Update(Me.UrlsDataSet.AllowedUrls)

        MsgBox("All new data added successfully!")

        Me.Close()

    End Sub