Dear All
Please help to insert data to my access db,i need code for insert data to msaccess db
i m developing one project in database i m using for msaccess but i am unable to insert below my code posing please help were i m doing mistake.
This is My Code
Public Class Party
Dim cnnOLEDB As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\webapps\ArrowJet\CP.mdb")
Dim cmdOLEDB As New OleDbCommand
Dim cmdInsert As New OleDbCommand
Dim cmdUpdate As New OleDbCommand
Dim cmdDelete As New OleDbCommand
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Try
Dim InsertQuery As String
InsertQuery = "INSERT INTO party (PartyName, PartyAccount, PayTo,PartyInfo) VALUES (@PartyName, @PartyAccount, @PayTo,@PartyInfo)"
Dim cmd As OleDbCommand = New OleDbCommand(InsertQuery, cnnOLEDB)
cmd.Parameters.AddWithValue("@PartyName", ComboBox1.Text)
cmd.Parameters.AddWithValue("@PartyAccount", paTextBox2.Text)
cmd.Parameters.AddWithValue("@PayTo", ptTextBox3.Text)
cmd.Parameters.AddWithValue("@PartyInfo", pfTextBox4.Text)
cnnOLEDB.Open()
cmdOLEDB = New OleDbCommand(InsertQuery, cnnOLEDB)
cmdOLEDB.ExecuteNonQuery()
cnnOLEDB.Close()
Catch ex As Exception
MessageBox.Show("Record Added")
End Try