Microsoft JET fejl

Hvordan ser den kode som trigger fejlen ud ?

Og har du en "User Account" i din database ?

dr = db.ExecuteReader

også er der en der hedder module1.vb

som ser sådan ud:

Imports System.Data.OleDb

Module Module1
    Public cur As New Form()
    Public intResponse As Integer
    Public dr As OleDbDataReader
    Public con As String = "Provider= Microsoft.Jet.OLEDB.4.0;Data Source=posdb.mdb"
    Public dc As New OleDbConnection(con)
    Public da As OleDbDataAdapter
    Public ds As DataSet


End Module

Vi skal jo altså se den SQL der udføres ...