OnlineKnowledgeRepository


For Questions and Assistance please use the proper Category.. please..
 
HomeCalendarFAQSearchMemberlistUsergroupsRegisterLog in
Welcome guys!!.. In order for you guys to post your Questions and assistance requests,, please REGISTER first.. Only members can post.. If you have requests then feel free to email ADMIN neuron or SPAMMER onatzky.. thanks!
Search
 
 

Display results as :
 
Rechercher Advanced Search
Donation box
Latest topics
» Convert signed ZD to PD
Thu Sep 01, 2016 7:57 pm by neuron

» Abia State Polytechnic Admission form for 2013/2014 out!
Tue Oct 08, 2013 9:30 am by stevejoo

» Convert ZD to SIGNED PD
Sun Sep 08, 2013 9:22 pm by neuron

» How to Speed Up My PC
Tue Feb 26, 2013 9:15 am by alphysudaria143

» Hi I'm alphysudaria143
Sun Feb 17, 2013 12:25 am by alphysudaria143

» How to Copy all the Generations of a GDG
Thu Oct 11, 2012 8:30 am by neuron

» Remove Duplicates in a dataset though Sort
Thu Oct 11, 2012 8:23 am by neuron

» how to insert data into your access database vb.net
Tue Aug 14, 2012 9:56 am by neuron

» how to populate combobox in vb.net during form load
Tue Aug 14, 2012 9:53 am by neuron

Navigation
 Portal
 Index
 Memberlist
 Profile
 FAQ
 Search
Help
Please support me my registering to NEOBUX
advertisements
Affiliates
free forum
 



Share | 
 

 how to insert data into your access database vb.net

View previous topic View next topic Go down 
AuthorMessage
neuron
Administrator
Administrator
avatar

Posts : 38
Join date : 2009-08-06

PostSubject: how to insert data into your access database vb.net   Tue Aug 14, 2012 9:56 am

here is a sample code:

Code:

Private Sub historyupdate()

        Dim con As New OleDb.OleDbConnection
        Dim ds As New DataSet
        Dim da As OleDb.OleDbDataAdapter
        Dim sql As String
        Dim appath As String



        Dim dsNewRow As DataRow

        appath = Application.StartupPath()

        con.ConnectionString = "PROVIDER=Microsoft.jet.oledb.4.0;data Source = " & appath & "\SISdatabase.mdb"
        sql = "SELECT * FROM History_log"
        da = New OleDb.OleDbDataAdapter(sql, con)
        da.Fill(ds, "SISdatabase")


        Dim cb As New OleDb.OleDbCommandBuilder(da)
        dsNewRow = ds.Tables("SISdatabase").NewRow()

        dsNewRow.Item("xUsername") = UsernameTextBox.Text
        dsNewRow.Item("xHistory_type") = "A"
        dsNewRow.Item("xDescription") = "Logged in to the BCSIS"
        dsNewRow.Item("xDate") = Format(Now, "MM-dd-yyyy")
        dsNewRow.Item("xTime") = Format(Now, "hh:mm")
     
        ds.Tables("SISdatabase").Rows.Add(dsNewRow)
        da.Update(ds, "SISdatabase")

        con.Close()
        User = UsernameTextBox.Text

    End Sub


_________________
credit goes to the original uploader of the codes..

In this forum we will share the knowledge we have to every single individual who shows respect and interest.. If you stay.. you learn.. if not.. then please go.........

--it's me Admin"D"
Back to top Go down
View user profile http://myonlinekr.forumotion.com
 
how to insert data into your access database vb.net
View previous topic View next topic Back to top 
Page 1 of 1
 Similar topics
-
» Can anyone access bid documents?
» Bid Data Sheet
» Bid Data Sheet vs Instruction to Bidders (Infrastructure)
» Bid Data Sheet ITB clause 1.2
» CBI ECONOMIC DATA 5-29-2012

Permissions in this forum:You cannot reply to topics in this forum
OnlineKnowledgeRepository :: All About PC :: Programming :: VB.NET-
Jump to: