ADODB.Recordset error '800a0cc1' Item cannot be found in the collection correspondin

Collapse
X
 
  • Time
  • Show
Clear All
new posts
  • yanivi
    New Member
    • Mar 2015
    • 1

    ADODB.Recordset error '800a0cc1' Item cannot be found in the collection correspondin

    hi i need help ? eroor line 14

    Code:
    <%
    	'Luach Vars
    	strSQL = "SELECT * FROM tblMetaTags WHERE LuachID = " & Session("LuachID")
    	Set rsConfig = NewRecordSet(strSQL)
    	If Not rsConfig.EOF Then
    	'General
    	LuachTitle = rsConfig("LuachTitle")
    	HeaderImage = rsConfig("Header")
    	SmallHeaderImage = rsConfig("SmallHeader")
    	NoPhotoImage = rsConfig("NoPhoto")
    	NoPhotoSmallImage = rsConfig("NoPhotoSmall")
    	'Built By
    	CopyRight = rsConfig("CopyRight")
    	BottomPage = rsConfig("BottomPage")
    	'Routes Private
    	Route1Title = rsConfig("Route1Title")
    	Route1Price = rsConfig("Route1Price")
    	Route1Photo = rsConfig("Route1Photo")
    	Route1AutoApprove = rsConfig("Route1AutoApprove")
    	Route2Title = rsConfig("Route2Title")
    	Route2Price = rsConfig("Route2Price")
    	Route2Photo = rsConfig("Route2Photo")
    	Route2AutoApprove = rsConfig("Route2AutoApprove")
    	Route3Title = rsConfig("Route3Title")
    	Route3Price = rsConfig("Route3Price")
    	Route3Photo = rsConfig("Route3Photo")
    	Route3AutoApprove = rsConfig("Route3AutoApprove")
    	'Routes Business
    	Route1TitleBusiness = rsConfig("Route1TitleBusiness")
    	Route1PriceBusiness = rsConfig("Route1PriceBusiness")
    	Route1PhotoBusiness = rsConfig("Route1PhotoBusiness")
    	Route1AutoApproveBusiness = rsConfig("Route1AutoApproveBusiness")
    	Route2TitleBusiness = rsConfig("Route2TitleBusiness")
    	Route2PriceBusiness = rsConfig("Route2PriceBusiness")
    	Route2PhotoBusiness = rsConfig("Route2PhotoBusiness")
    	Route2AutoApproveBusiness = rsConfig("Route2AutoApproveBusiness")
    	Route3TitleBusiness = rsConfig("Route3TitleBusiness")
    	Route3PriceBusiness = rsConfig("Route3PriceBusiness")
    	Route3PhotoBusiness = rsConfig("Route3PhotoBusiness")
    	Route3AutoApproveBusiness = rsConfig("Route3AutoApproveBusiness")
    	End If
    	rsConfig.Close
    	Set rsConfig = Nothing
    Last edited by Rabbit; Mar 22 '15, 03:46 PM. Reason: Please use [code] and [/code] tags when posting code or formatted data.
  • Rabbit
    Recognized Expert MVP
    • Jan 2007
    • 12517

    #2
    Please use code tags when posting code or formatted data.

    It's saying there's nothing in the record set named BottomPage

    Comment

    Working...