nextrecordset

Problem med nextrecordset när jag kört en stored procedure (SP)
alla data (c:a 10st) läggs i andra recordseten, men när jag ska stega fram till nästa produkt med
"rs.movenext" så blir det
"Objektet stöder inte egenskapen eller metoden.: 'movenext'"
Hur löser jag det? Den stöder inga objekt alls typ rs.eof mm

ASP koden ser så här:
---------------------------------------
sql = "sp_visa_produkter_i_varugrupp @varugrupp='" & varugrupp & "', @medl = '" & session("medlemsnr") & "'"
set rs = conn.execute (SQL)
If (rs.BOF = -1) Then ' empty recordset
rs =rs.NextRecordset ' move to the next, it should be in there instead
End If
reponse.write (rs("Art nr"))
-----------------------------------------

SP:n ser så här:
-----------------------------------------
CREATE PROCEDURE sp_visa_produkter_i_varugrupp @varugrupp nvarchar(50),@medl nvarchar(50) AS

DECLARE @medlnr CHAR(50)
DECLARE @fraga nvarchar(2048)

set @medlnr='tblMedl'+@medl

EXEC('SELECT varugrupp FROM tblMedlEgnaArt WHERE (medlnr='+@medl+') AND (varugrupp='''+@varugrupp+''')')

if @@rowcount>0
begin
set @fraga = 'SELECT
tblMedlEgnaArt.[Art nr],
tblMedlEgnaArt.[Benämning],
tblMedlEgnaArt.Enhet,
tblMedlEgnaArt.Varugrupp,
tblMedlEgnaArt.Leverantör,
tblMedlEgnaArt.[Ca-pris inkl moms],
tblMedlEgnaArt.Hemsida,
['+@medlnr+'].[installationskostnad inkl moms]
FROM
tblMedlEgnaArt
LEFT JOIN
['+@medlnr+']
ON
['+@medlnr+'].[Art nr]=tblMedlEgnaArt.[Art nr]
WHERE
(tblMedlEgnaArt.varugrupp='''+@varugrupp+''') AND (tblMedlEgnaArt.medlnr='''+@medl+''')'
end
ELSE
begin
set @fraga = 'SELECT
tblBadprislista.[Art nr],
tblBadprislista.[Benämning],
tblBadprislista.Enhet,
tblBadprislista.Varugrupp,
tblBadprislista.Leverantör,
tblBadPriser.[Ca-pris inkl moms],
[VVS-I Abonnent].Hemsida AS hemsida,
[VVS-I Artiklar].ProduktHemsida AS ProduktHemsida,
['+@medlnr+'].[installationskostnad inkl moms],
tblBadBilder.BildNamn

FROM
tblBadprislista
LEFT JOIN
tblBadpriser
ON
tblBadpriser.[Art nr]=tblBadprislista.[Art nr]
LEFT JOIN
[VVS-I Artiklar]
ON
[VVS-I Artiklar].RSK=tblBadprislista.[Art nr]
LEFT JOIN
[VVS-I Abonnent]
ON
[VVS-I Abonnent].abnr=[VVS-I Artiklar].Tillverkare_Id
LEFT JOIN
['+@medlnr+']
ON
['+@medlnr+'].[Art nr]=tblBadPrislista.[Art nr]
LEFT JOIN
tblBadBilder
ON
tblBadBilder.RSK=tblBadprislista.[Art nr]
WHERE
tblBadprislista.varugrupp='''+@varugrupp+'''
ORDER BY hemsida,ProduktHemsida ASC'
end

EXEC(@fraga)

/*select @fraga*/
GO