oledb connection error

shingo99

Active member
Joined
Jul 19, 2004
Messages
31
hello
i have build a database using MS ACCESS and write a coding in VB.NET to connect it as below

Code:
Imports System.Data.OleDb

Public Class addItem
    Inherits System.Windows.Forms.Form
    Dim myconnection As New OleDbConnection("provider=microsoft.jet.oledb.4.0; datasource = Application.ExecutablePath + \LibrarySystem.mdb")

Private Sub saveB_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles saveB.Click
        myconnection.Open()
        Dim mycom As New OleDbCommand("INSERT INTO Product(product_code) VALUES (" & productTb.Text & ")", myconnection)
        Dim MyReader As OleDbDataReader = mycom.ExecuteReader()
        mycom.ExecuteNonQuery()
        myconnection.Close()
        MyReader.Close()
        mycom.Dispose()
    End Sub

but when i click on the saveB button, the error below show up
An unhandled exception of type System.Data.OleDb.OleDbException occurred in system.data.dll

and this error points to the code below
Code:
myconnection.Open()

may i know what i did wrong?
i follow the instruction that was given by this thread
http://www.computerhelp.forum/showthread.php?t=69746
but i still getting the same error
can please help?
thank you in advance
 
Dim myconnection As New OleDbConnection("provider=microsoft.jet.oledb.4.0; datasource = Application.ExecutablePath + \LibrarySystem.mdb")


You mix some code (Application.ExecutablePath) in your connection string.
 
Hi,
First of all, which line is the one producing the exception?
Thats where you should start searching for something wrong.

Secondly,
shingo99 said:
Dim MyReader As OleDbDataReader
Youre executing a query which dont yield any resulting rows, I wouldnt have used a DataReader to insert records. Id use a OleDbCommand object...


HTH
/Kejpa
 
hi michael n kejpa
1st of all the code that produce this error
An unhandled exception of type System.Data.OleDb.OleDbException occurred in system.data.dll
is from this line of coding
myconnection.Open()

2nd even without the
Dim MyReader As OleDbDataReader
i still get the same error

3rd even if i didnt set it to (Application.ExecutablePath)
it still give me that error

i really dont know where when wrong
since in the tutorial is stated clear that this code will work
 
try
Code:
Dim myconnection As New OleDbConnection("provider=microsoft.jet.oledb.4.0; datasource = " & Application.ExecutablePath & " \LibrarySystem.mdb")
 
thx...but still get the same error.
is the problem of the error arise from my database?
i create it seperately and just paste it to the bin
my friend say that i need to create the Access databse using vb in order for the codind to work
is this true?
sorry to trouble u all
 
Back
Top