I have changed the code somewhat, and it gives a 0x800A0E7D
dim objRsMenner,AlleMann,m
set objRsMenner=server.createobject("ADODB.Recordset")
(line 71) objRsMenner.open "SELECT COUNT(1) as m FROM Produkt WHERE ProduktKjonn = '" & mann & "' GROUP BY ProduktKjonn"'", kobling, adOpenStatic, adLockReadonly, adcmdtext
AlleMann = objRsMenner("m").Value
objRsMenner.Close
set objRsMenner = Nothing
Feiltype:
ADODB.Recordset (0x800A0E7D)
Tilkoblingen kan ikke brukes til å utføre denne operasjonen. Den er enten lukket eller ugyldig i denne sammenhengen.
/innsjekk/treff_yngre.asp, linje 71
Med vennlig hilsen
grstad