Jump to content
Xtreme .Net Talk

Recommended Posts

Posted

Thought I would share this with you, since you all helped me out.

 

 

*** ADD RECORDS ***

value1 = "hello"

value2 = "there"

Dim mycon As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & "C:/database.mdb")

Dim mycmd As OleDbCommand = New OleDbCommand

mycmd.Connection = mycon

mycmd.CommandText = "INSERT Into email (name,email) Values ('" & Value1 & "','" & Value2 & "')"

mycon.Open()

mycmd.ExecuteNonQuery()

mycon.Close()

 

 

*** DELETE RECORDS ***

Dim mycon As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & "C:/database.mdb")

Dim mycmd As OleDbCommand = New OleDbCommand

mycmd.Connection = mycon

mycmd.CommandText = "DELETE FROM email WHERE name='hello'"

mycon.Open()

mycmd.ExecuteNonQuery()

mycon.Close()

 

 

*** UPDATE/EDIT RECORDS ***

Dim mycon As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & "C:/database.mdb")

Dim mycmd As OleDbCommand = New OleDbCommand

mycmd.Connection = mycon

mycmd.CommandText = "UPDATE email SET email='no e-mail' WHERE name='hello'"

mycon.Open()

mycmd.ExecuteNonQuery()

mycon.Close()

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...