hello i am trying to add data to my access(2007) database using visual basic 2008.
i got no errors or anything but it wont add what can be the problem... this is my code
Imports Access = Microsoft.Office.Interop.Access
Imports System.Data
Imports System.Data.OleDb
Public Class Form1
Dim provider As String
Dim dataFile As String
Dim connString As String
Dim myConnection As OleDbConnection = New OleDbConnection
Private Sub SaveButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SaveButton.Click
provider = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source ="
dataFile = "transport.accdb"
connString = provider & dataFile
myConnection.ConnectionString = connString
myConnection.Open()
If True Then
Dim str As String
str = "insert into Details ([Name], [Number], [Destination]) values (?, ?, ?)"
Dim cmd As OleDbCommand = New OleDbCommand(str, myConnection)
cmd.Parameters.Add(New OleDbParameter("Name", CType(txtName.Text, String)))
cmd.Parameters.Add(New OleDbParameter("Number", CType(txtNumber.Text, String)))
cmd.Parameters.Add(New OleDbParameter("Destination", CType(txtdes.Text, String)))
Try
cmd.ExecuteNonQuery()
Catch ex As Exception
MsgBox(ex.Message)
End Try
txtName.Clear()
txtNumber.Clear()
txtdes.Clear()
myConnection.Close()
MessageBox.Show(" Data Added")
End If
End Sub
End Class