Why isn't the column name specified in code found on the table?

B

Big Moxy

Problem URL - http://projects.zanalysts.com/ariviewer/display.asp?ID=11

I'm using Access as the "database".

I get this error in the above URL:

ADODB.Fields error '800a0cc1'
Item cannot be found in the collection corresponding to the requested
name or ordinal.
/ariviewer/display.asp, line 498

I know it's telling me that it cannot find the column name on the
table.

Here is line 498:

If tables(tableID) <> "Husqvarna Equpment" Then
Response.Write("<td>" & Recordset1.Fields.Item("Day").Value & "</
td>")
Response.Write("<td>" & Recordset1.Fields.Item("Week").Value & "</
td>")
Response.Write("<td>" & Recordset1.Fields.Item("Month").Value &
"</td>")
Else
Response.Write("<td>" & Recordset1.Fields.Item("Price").Value &
"</td>")
End If

However if you go to this URL - http://projects.zanalysts.com/ariviewer/test.asp
- it displays the table name followed by the column names for this
table delimited by "-".

-Husqvarna Equipment-
-Equipment Description-
-ID-
-Price-

Unless my eyes are totally deceiving me, there is a column called
"Price" in the Husqvarna table. The code below is used to display the
column names.

For Each objTable in objADOXDatabase.Tables
If objTable.Type = "TABLE" then
tables(i) = objTable.Name
If tables(i) = "Husqvarna Equipment" Then
Response.Write("-" & tables(i) & "-" & "<br>")
For Each objColumn in objTable.Columns
Response.Write("-" & objColumn.Name & "-" & "<br>")
Next
End If
i = i + 1
End If
Next

Can someone please help me identify what I am missing?

Thank you!
 
B

Big Moxy

Problem URL -http://projects.zanalysts.com/ariviewer/display.asp?ID=11

I'm using Access as the "database".

I get this error in the above URL:

ADODB.Fields error '800a0cc1'
Item cannot be found in the collection corresponding to the requested
name or ordinal.
/ariviewer/display.asp, line 498

I know it's telling me that it cannot find the column name on the
table.

Here is line 498:

If tables(tableID) <> "Husqvarna Equpment" Then
Response.Write("<td>" & Recordset1.Fields.Item("Day").Value & "</
td>")
Response.Write("<td>" & Recordset1.Fields.Item("Week").Value & "</
td>")
Response.Write("<td>" & Recordset1.Fields.Item("Month").Value &
"</td>")
Else
Response.Write("<td>" & Recordset1.Fields.Item("Price").Value &
"</td>")
End If

However if you go to this URL -http://projects.zanalysts.com/ariviewer/test.asp
- it displays the table name followed by the column names for this
table delimited by "-".

-Husqvarna Equipment-
-Equipment Description-
-ID-
-Price-

Unless my eyes are totally deceiving me, there is a column called
"Price" in the Husqvarna table. The code below is used to display the
column names.

For Each objTable in objADOXDatabase.Tables
If objTable.Type = "TABLE" then
tables(i) = objTable.Name
If tables(i) = "Husqvarna Equipment" Then
Response.Write("-" & tables(i) & "-" & "<br>")
For Each objColumn in objTable.Columns
Response.Write("-" & objColumn.Name & "-" & "<br>")
Next
End If
i = i + 1
End If
Next

Can someone please help me identify what I am missing?

Thank you!

Duh! I misspelled the table name in my code.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Members online

Forum statistics

Threads
473,731
Messages
2,569,432
Members
44,835
Latest member
KetoRushACVBuy

Latest Threads

Top