---
title: "får ett fel när jag gör så här..."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/11758-får-ett-fel-när-jag-gör-så-här"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "FIgg3"
published: "2001-09-24T18:12:00.000Z"
updated: "2001-09-24T18:35:00.000Z"
replies: 6
views: 209
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/11758-får-ett-fel-när-jag-gör-så-här"
---

# får ett fel när jag gör så här...

## #1 — FIgg3, 2001-09-24T18:12Z

Körningsfel i Microsoft VBScript fel '800a01a8' 
Objekt krävs. 

vad är fel????
här är koden

\<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Driver={Microsoft Access Driver (\*.mdb)}; DBQ="& Server.MapPath("stat.mdb")
SQL = "SELECT \* FROM stat ORDER BY ID "
Set RecSet = Connect.Execute(SQL)
Set RecSet2 = Connect.Execute(SQL)
%\>

\<%
total = 0
DO UNTIL Recset2.EOF
total = Int(total) + Int(RecSet2("klick"))
Recset2.MOVENEXT
LOOP
RecSet.Close
Set RecSet = Nothing
%\>

\</b\>\</font\>\</p\>
  \<table border="0" cellspacing="0" cellpadding="0" width="278" height="10"\>
    \<tr\> 
      \<td width="93"\>\<font size="-2" face="Verdana, Arial, Helvetica, sans-serif"\>Namn 
        \</font\>\</td\>
      \<td width="141"\>\<font size="-2" face="Verdana, Arial, Helvetica, sans-serif"\>Senast 
        bes&ouml;kt \</font\>\</td\>
      \<td width="44"\>
        \<div align="right"\>\<font size="-2" face="Verdana, Arial, Helvetica, sans-serif"\>Klickat 
          \</font\>\</div\>
      \</td\>
    \</tr\>
    \<p\> 
  \</table\>
  \<table border="0" cellspacing="0" cellpadding="0" width="276" height="10"\>
    \<%
DO UNTIL Recset.EOF
klick = Int(RecSet("klick"))
klick2 = Round((klick/total)\*100)

nummer = nummer + 1
If nummer Mod 2 = 0 then
color = ""
Else
color = "#999933"
End If
%\> 
    \<tr\> 
      \<td bgcolor="\<%=color%\>" width="99"\>\<font size="-2" face="Verdana, Arial, Helvetica, sans-serif"\>\<a href="default.asp?vidare=intern&ID=\<%=Recset("ID")%\>"\>\<%=Recset("namn")%\>\</a\>\</font\>\</td\>
      \<td bgcolor="\<%=color%\>" width="167"\>\<font size="-2" face="Verdana, Arial, Helvetica, sans-serif"\>\<%=Recset("senaste")%\> 
        \</font\>\</td\>
      \<td bgcolor="\<%=color%\>" width="34"\> 
        \<div align="right"\>\<font size="-2" face="Verdana, Arial, Helvetica, sans-serif"\> 
          \<b\>\<%=klick2%\>% \</b\> \</font\>\</div\>
      \</td\>
    \</tr\>
    \<%
Recset.MOVENEXT
LOOP
%\>

Permalänk: https://www.webforum.nu/p/11758

## #2 — jorgen, 2001-09-24T18:18Z

Hej!

Du skapar 2 Recset till samma SQL-fråga.

Sedan försöker du använda ett Recset som redan är stängt och "dödat".

r: stavfel

mvh Jörgen :)

Permalänk: https://www.webforum.nu/p/287248

## #3 — FIgg3, 2001-09-24T18:20Z

Hur tänker du allså hur ska ja göra för att få det att fungera och skipper fel medelandet

Permalänk: https://www.webforum.nu/p/287249

## #4 — @nders, 2001-09-24T18:20Z

Du stänger och förstör RecSet innan du är klar, dessutom.

```
RecSet.Close
Set RecSet = Nothing
```

Felplacerat alltså.

Men du, välkommen till webForum i alla fall!

Mvh,

Permalänk: https://www.webforum.nu/p/287250

## #5 — FIgg3, 2001-09-24T18:25Z

tack för välkommandet ska testa det du sa kommer till baka om någon minut eller så skulle inte tro jag får rät tpå det :)

Permalänk: https://www.webforum.nu/p/287251

## #6 — FIgg3, 2001-09-24T18:28Z

tack jag löste det tack igen och tack för välkommandet

Permalänk: https://www.webforum.nu/p/287252

## #7 — icaaq, 2001-09-24T18:35Z

Korvfarbrorn hälsar dig välkommen  :) , hoppas du kommer att trivas för att goöra det enkelt för dig kommer hör lite tips :)

kolla in denna [länk](http://cgi.webforum.nu/ssi/wfkod.shtml) den ger dig lite tips hur du kan skriva olika koder :)

Sen kan du alltid söka på olika ämnen i wF´s eminenta söksystem där de flesta frågor redan varit uppe :h 

Hittar du inte vad du söker där kommer det alltid att finnas folk som svarar på dina frågor här :)

Permalänk: https://www.webforum.nu/p/287253

---

Tråden på webben: https://www.webforum.nu/amne/asp/11758-får-ett-fel-när-jag-gör-så-här