Microsoft VBScript-kørselsfejl error '800a01a8'
HejEn hidtil velfungerende hjemmeside som henter data fra SQL-tabeller giver mig følgende fejlmeddelelse:
Der opstod en Microsoft VBScript-kørselsfejl error '800a01a8'
Et objekt er obligatorisk
/fil.asp, line 169
------------------------------------------------------------
Scriptet omkring linje 169 ser således ud:
163 <%
164 antalvarer = 0
165 SQL = "ab_STOREDPROCEDURE_ " & Session("ShopID")
166 'SQL = "ab_STOREDPROCEDURE 3"
167 dbQuery SQL
168 More = 0
169 while not dbRS.eof
170 ca_id = dbRS("ca_id")
171 More = ca_id
172
173 go_name = dbRS("go_name")
174 Count = dbRS("ca_count")
175 Name = dbRS("Fornavn") & " " & dbRS("eftnavn")
176 ' Alle adresseoplysninger er lagt i Adresse2-feltet
177 Address = dbRS("Adresse2")
178 useremail = dbRS("username")
179' Address = dbRS("Adresse1") & " " & dbRS("HusNr")
180' if Trim("" & dbRS("Etage")) <> "" then
181' Address = Address & ", " & dbRS("Etage")
182' end if
183 Address = Address & "<br>" & dbRS("Postnr") 184& " " & dbRS("Bynavn")
185 Land = dbRS("Land")
186 TransID = dbRS("ID")
187 XX_Closed = dbRS("XX_Closed")
--------------------------------------------------------------
Jeg er temmelig sikker på at problemet opstår når der skal hentes data fra SQL, og den pågældende stored procedure ser således ud:
USE [database]
GO
/****** Object: StoredProcedure [dbo].[ab_get_exshop_close] Script Date: 10/26/2011 12:32:14 ******/
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
ALTER PROCEDURE [dbo].[ab_STOREDPROCEDURE]
@shopid int
AS
select a.*, g.*, c.*, r.*, p.ID
--select *
from ab_goodattributes a, ab_goods g, ab_cart c, respinfo r, resppoint p
where g.go_id = c.go_id
and g.go_id = a.go_id
and r.userid = c.userid
and p.ca_id = c.ca_id
and a.go_id in (select go_id from ab_goodattributes where at_name = 'exshop_id' and at_value = @shopid)
and c.XX_closed is not null
and c.SHOP_closed is null
--and a.at_name in ('exshop_id', 'price_kr')
order by c.go_id, c.se_id, a.at_name
Den nederste del hvor der selectes data kører fint i SQL-query.
Alle input og ideer til hjælp er velkomne :)