DaniWeb Forum Index > Web Development > ASP

error '80020009' Exception occurred.

Please support our ASP advertiser: PostgreSQL or MySQL? Compare and contrast the two most popular open source databases

•

Join Date: Jan 2007

Posts: 2

Reputation: quicknk is an unknown quantity at this point

Solved Threads: 0

quicknk

Offline

Newbie Poster

error '80020009' Exception occurred.

Jan 31st, 2007

For some reason I keep getting the following error:

Help with Code Tags

asp Syntax (Toggle Plain Text)

error '80020009' Exception occurred.

It applies to the line of code:

 Help with Code Tags 
 asp Syntax (Toggle Plain Text) 
    If (cInt(objRS("User_ID")) = Cookie_ID) Then
    If (cInt(objRS("User_ID")) = Cookie_ID) Then

for some reason it freaks out with "cInt(objRS("User_ID"))" when it runs through the db to find a User ID that matches that in their cookie. I have also found that if I alter the code, remove cInt(objRS("User_ID"))" from the above line of code, and add in an incremental integer based variable, it seems to work fine. I know it's not compairing the info from the DB, but this was the way I found what was causing the problem.

 Help with Code Tags 
 asp Syntax (Toggle Plain Text) 
Dim conn, mydb
mydb=server.mappath("\fpdb\temp.mdb")
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open mydb
 
Dim objRS, bolFound
 
set objRS = Server.CreateObject("ADODB.recordset")
objRS.Open "User_Info", conn, , 3, 2 
 
bolFound = False
 
Do Until objRS.EOF or bolFound
    If (cInt(objRS("User_ID")) = Cookie_ID) Then
        BolFound = True
    Else
        objRS.MoveNext
    End If
 
Loop
Dim conn, mydb
mydb=server.mappath("\fpdb\temp.mdb")
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open mydb

Dim objRS, bolFound

set objRS = Server.CreateObject("ADODB.recordset")
objRS.Open "User_Info", conn, , 3, 2 

bolFound = False

Do Until objRS.EOF or bolFound
    If (cInt(objRS("User_ID")) = Cookie_ID) Then
        BolFound = True
    Else
        objRS.MoveNext
    End If

Loop

•

Join Date: Sep 2004

Posts: 89

Reputation: msaqib is an unknown quantity at this point

Solved Threads: 1

msaqib

Offline

Junior Poster in Training

Re: error '80020009' Exception occurred.

Feb 2nd, 2007

Try to find out whether objRS("User_ID") has some records or not? Another thing is the data type of User_ID, is it int?

Mostly this exception occurs if you try to casst different data types of variables.

C and C++ Programming Resources and Source Code

Muhammad Saqib

•

Join Date: Jan 2007

Posts: 2

Reputation: quicknk is an unknown quantity at this point

Solved Threads: 0

quicknk

Offline

Newbie Poster

Re: error '80020009' Exception occurred.

Feb 2nd, 2007

•

Originally Posted by msaqib

Try to find out whether objRS("User_ID") has some records or not? Another thing is the data type of User_ID, is it int?

Mostly this exception occurs if you try to casst different data types of variables.

cool, thanks. I figured out yesterday. The Access DB file had held on to a deletion from it's original programer leaving a "#deleted" in all fields for that spacific record. Causing the int data type for the User_ID to have an error. Im wasn't sure why it holds on to this deletion note, and it would not allow me to remove this record at all. I had to export it as a new Access DB file and then it allowed me to remove this record.

thanks again.