---
title: "körnings fel"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/87545-körnings-fel"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "MizzK"
published: "2003-10-03T11:00:22.000Z"
updated: "2003-10-03T12:18:25.000Z"
replies: 13
views: 262
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/87545-körnings-fel"
---

# körnings fel

## #1 — MizzK, 2003-10-03T11:00Z

när jag inkluderar mitt nyhetsscript på min sida får jag detta felet

Feltyp:
Körningsfel i Microsoft VBScript (0x800A000D)
Inkompatibla typer: 'RecSet'
/VIP/grund/nyheter1/news2.asp, line 112

vad betyder d?? och vad gör jag åt d?

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

## #2 — @nders, 2003-10-03T11:01Z

1) Visa alltid kod.
2) Visa alltid kod.
3) Se 1 & 2.

Kan det vara så att ditt recordset inte heter RecSet?

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

## #3 — MizzK, 2003-10-03T11:03Z

\<%

NyhetPerSida = 5                                   ' Antal nyhetsrubriker per sida
URL                 = "index.asp"                    ' Sidan du inkluderar news2.asp i
db = Server.MapPath("grund/nyheter1/db/news.mdb")   ' Databasens sokvag
Width              = "50"                              ' Bredd pa bilden

%\>

\<table align="left" cellpadding="1" cellspacing="0" width="100%" border="0"\>

\<%Set Conn = Server.CreateObject("ADODB.Connection") 
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & db

If Request.QueryString("ID") = "" Then

Set RecSet = Server.CreateObject("ADODB.Recordset")
Sidan = Request.QueryString("sida")
If Sidan = "" then 
     sida = 1 
Else 
     sida = Sidan 
End If 

With RecSet
    .CursorLocation = 3
    .CacheSize = NyhetPerSida
End With

SQL = "SELECT \* FROM news Order By id desc"
RecSet.Open SQL, Conn

If RecSet.EOF Then%\>
     \<tr\>
        \<td\>\<SPAN class="textheader"\>Inga nyheter inlagda!\</span\>\</td\>
     \</tr\>
\<%Else

With RecSet
  .MoveFirst 
  .PageSize = NyhetPerSida
  .AbsolutePage = sida
End With

Sidor =  RecSet.PageCount
x = 0 
Do While Not RecSet.EOF And x \< RecSet.PageSize%\>
   
\<tr\>
        \<td\>
			\<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0 align="center"\>
				\<TBODY\>
					 \<tr\>
				 		\<td align="left"\>\<br\>\<SPAN class="textheader"\>\<%=RecSet("rubrik")%\>\</SPAN\> \<br\>\<SPAN class="textgraysmall"\>\[\<%=FormatDateTime(RecSet("datum"),1)%\>\]\</span\>\<p\>\</p\>\</td\>
					\</tr\>
				\</TBODY\>
			\</TABLE\>
		\</td\>
   \</tr\>
   \<tr\>		
   		\<td\>
			\<TABLE cellSpacing=0 cellPadding=0 width="93%" border=0 align="center"\>
				\<TBODY\>
					 \<tr\>
				 		\<td valign="top" colspan="2"\>\<SPAN class="textthreadbody"\>\<%If Len(RecSet("nyhet")) \> 145 Then%\>\<%=Left(RecSet("nyhet"),150)%\>...\<%Else%\>\<%=RecSet("nyhet")%\>\<%End If%\>\</SPAN\>\</td\>
					\</tr\>
				\</TBODY\>
			\</TABLE\>
		\</td\>
  \</tr\>
   \<tr\>
      \<td colspan="2" align="right" \>\<A class="linkbig" href="\<%=URL%\>?ID=\<%=RecSet("ID")%\>"\>\<IMG height=10 hspace=0 src="bilder/linkdot.gif" width=9 border=0 alt="dot"\>l&auml;s mer\</a\>\</td\>
   \</tr\>
   \<tr\>
       \<td colspan="2" width="60%" style="BORDER-RIGHT: rgb(231,231,229) 0px solid; BORDER-TOP: rgb(231,231,229) 0px solid; BORDER-LEFT: rgb(231,231,229) 0px solid; BORDER-BOTTOM: rgb(231,231,229) 1px solid"\>
		\<IMG height=1 width=1 hspace=0 src="bilder/transp.gif"alt="transp" \>\</td\>
   \</tr\>

\<%x=x+1 
RecSet.MoveNext
Loop
RecSet.Close
If Sidor \> 1 Then%\>
  \<tr\>
     \<td valign="top" colspan="2"\>
       \<%For Sid = 1 To Sidor
               If (Int(Sid)) = (Int(sida)) Then%\>\<b\>\<%=Sid%\>\</b\>\<%Else%\> \<a href="\<%=URL%\>?sida=\<%=Sid%\>"\>\<%=Sid%\>\</a\> \<%End If
         Next%\> 
    \</td\>
  \</tr\>
\<%End If
  End If
End If
If Request.QueryString("ID") \<\> "" Then
Set RS=Conn.Execute("Select \* From news Where id=" & Request.QueryString("ID"))%\>
     \<tr\>
\<%If RS("bild") \<\> "" Then%\>
        \<td rowspan="3" valign="top"\>\<img src="\<%=RS("bild")%\>" border="1" width="\<%=Width%\>"\>\</td\>
        \<td rowspan="3" width="5"\>\</td\>
\<%End If%\>
        \<td width="6%"\> \<SPAN class="textheader"\>\<%=RecSet("rubrik")%\>\</SPAN\> \<br\>\<SPAN class="textgraysmall"\>\[\<%=FormatDateTime(RecSet("datum"),1)%\>\]\</span\>\</td\>
     \</tr\>
     \<tr\>
        \<td colspan="2"\>\<SPAN class="textthreadbody"\>\<%=Replace(RS("nyhet"),vbCrLf,"\<br\>")%\>\<br\>\<br\>/\<%=RS("namn")%\>\</SPAN\>\</td\>
     \</tr\>
     \<tr\>
        \<td colspan="2"\>\<br\>\<a href="\<%=URL%\>"\>Tillbaka\</a\>\</td\>
     \</tr\>
\<%End If%\>
\</table\>

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

## #4 — MizzK, 2003-10-03T11:03Z

all kod =)

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

## #5 — @nders, 2003-10-03T11:06Z

Glömde tydligen dessa:
4) använd alltid \[kod\]-taggar.
5) markera vilken rad i koden felmeddelandet pekar på.

Mvh

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

## #6 — Broskan, 2003-10-03T11:19Z

Broskan

Jag tycker det ser ut som att du anropar RecSet efter att det har stängts.

```
<td width="6%"> <SPAN class="textheader"><%=RecSet("rubrik")%></SPAN> <br><SPAN class="textgraysmall">[<%=FormatDateTime(RecSet("datum"),1)%>]</span></td> 
</tr>
```

Ska du inte ha RS("rubrik") och RS("datum")

//Broskan

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

## #7 — MizzK, 2003-10-03T11:53Z

alltså problemet uppstår när jag includerar d i min andra sida.. fungerar utmärkt att köra ensamt.. sidan d ska ligga på är vip.hh.se på startsidan..

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

## #8 — Palle, 2003-10-03T11:55Z

> **@nders skrev:**
>
> 5) markera vilken rad i koden felmeddelandet pekar på.

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

## #9 — @nders, 2003-10-03T11:57Z

> **MizzK skrev:**
>
> alltså problemet uppstår när jag includerar d i min andra sida.. fungerar utmärkt att köra ensamt.. sidan d ska ligga på är vip.hh.se på startsidan..

Då får man väl gissa på att du använder samma objektnamn i det scriptet du inkluderar innan du är klar med objekten i den kod som körs innan?

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

## #10 — MizzK, 2003-10-03T11:59Z

denna raden..
 \<td width="6%"\> \<SPAN class="textheader"\>\<%=RecSet("rubrik")%\>\</SPAN\> \<br\>\<SPAN class="textgraysmall"\>\[\<%=FormatDateTime(RecSet("datum"),1)%\>\]\</span\>\</td\>

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

## #11 — Broskan, 2003-10-03T12:10Z

Broskan

Men funkar det inte så här???

\<td width="6%"\> \<SPAN class="textheader"\>\<%=RS("rubrik")%\>\</SPAN\> \<br\>\<SPAN class="textgraysmall"\>\[\<%=FormatDateTime(RS("datum"),1)%\>\]\</span\>\</td\>

//Broskan

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

## #12 — MizzK, 2003-10-03T12:10Z

har löst problemet.. enkla felet att jag bara skulle ändra RecSet till RS så fungerade d utmärkt =))

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

## #13 — Broskan, 2003-10-03T12:13Z

Broskan

Det var ju liksom det jag svarade i mitt första inlägg ;-)

Bra att du fick till det, vart lite fundersam.

//Broskan

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

## #14 — MizzK, 2003-10-03T12:18Z

jepp, såg och testade runt lite så fungerade d =)
tack

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/87545-körnings-fel