OleDbDataAdapter error "IErrorInfo.GetDescription failed with E_FAIL(0x80004005)" VB.NET

Question

0.00/5 (No votes)

See more:

i'm using a standard ms access 2000 and 2002-2003 mdb file.
When I debug a system using by VB.NET and run the DataAdapter, i get the following message
The error box title is "OleDBException was unhandled"
and under the error box is
"IErrorInfo.GetDescription failed with E_FAIL(0x80004005)"

My system is link to ms access.

The following is my part of the system code(error code):

Dim sql As String = "Select Options From USERDT Where USERID='" + Label2.Text + "' AND Module='TAS' AND FormName='Staff'"
        Dim cmd As New OleDbCommand(sql, connect)
        dSet.Reset()
        dAdapter.SelectCommand = cmd
        dAdapter.Fill(dSet) '''this part getting error(IErrorInfo.GetDescription failed with E_FAIL(0x80004005))
        If dSet.Tables(0).Rows(0).Item("Options") = "N" Then
            MsgBox("Access Deny!")
        ElseIf dSet.Tables(0).Rows(0).Item("Options") = "R" Or dSet.Tables(0).Rows(0).Item("Options") = "W" Then
            Form12.Show()
        End If

What is the problem? There is no reserved words, I has change all the reserved words.
Please help.

Thanks in advance.

Posted 11-Aug-13 23:55pm

Adrian4263

Updated 11-Jul-18 17:29pm

v3

Add a Solution

Comments

virusstorm 13-Aug-13 15:59pm

See if this helps:
http://forums.asp.net/t/1225443.aspx

I think some of your column names may be reserved words in Access.

Adrian4263 14-Aug-13 4:01am

Thanks your reply,but it doesn't work for me.
I check many times already,there is no reserved words in my Ms Access database.

4 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Maciej Los · Answer 1 · 2013-08-13T23:07:00

Please, read virusstorm's comment to the question and and this post: IErrorInfo.GetDescription failed with E_FAIL(0x80004005)- What does this error means?[^]. Do not use reserved words[^] or put the square brackets [] around the field name or table name, ie:

VB

Dim sql As String = "SELECT [Options] FROM [USERDT] WHERE [USERID]='" & Label2.Text & "' AND Module='TAS' AND FormName='Staff'"

Note: use & to concatenate a string in VB.NET. + is usually used to add numbers. See this: Concatenation Operators in Visual Basic[^]

Member 10867306 · Answer 2 · 2014-06-05T11:51:00

Solution 2

USERID is numeric? If so,

Dim sql As String = "SELECT [Options] FROM [USERDT] WHERE [USERID]='" & Trim(Str(Label2.Text)) & "' AND Module='TAS' AND FormName='Staff'"

Does that work?

Posted 5-Jun-14 11:51am

Member 10867306

Jitendra Patidar · Answer 3 · 2018-07-11T17:29:00

Solution 4

Sql = "SELECT * FROM Sheet3 WHERE Category LIKE 'OBC%'"

Be Sure That Your Write Field Name Correct. No Space And No Symbol Only Underscore

Posted 11-Jul-18 17:29pm

Jitendra Patidar

Updated 11-Jul-18 17:31pm

v2

Chaim Tovim · Answer 4 · 2015-11-23T23:16:00

Solution 3

Your problem is with the word OPTION. Change it to a different field name and it will work

Posted 23-Nov-15 23:16pm

Chaim Tovim