---
title: "error '80020009' Exception occurred."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/132805-error-80020009-exception-occurred"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "airwolf"
published: "2005-08-15T16:51:58.000Z"
updated: "2005-08-15T22:02:06.000Z"
replies: 9
views: 373
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/132805-error-80020009-exception-occurred"
---

# error '80020009' Exception occurred.

## #1 — airwolf, 2005-08-15T16:51Z

Jag har följande kod på en sida för att se om det
finns nåt PM:

```
	<%
	'/Check for user message	
	Set Rs = Server.CreateObject("ADODB.Recordset")
			
	SQL = "Select * From tbl_users WHERE folder='" & Session("folder") & "'"
	Rs.Open SQL, Conn, 3,3
			
	Do Until Rs.EOF
	
	If Rs("message") <> "" Then
		%>

		<p>

		<img src="img/inbox.gif"> <a href="inbox.asp">Du har ett nytt personligt meddelande</a>
		<%
		End If
	
	Rs.MoveNext
	Loop
			
	Rs.Close
	Set Rs = nothing
	%>
```

Allt funkar i frid och fröjd så länge det finns ett meddelande. 
Men finns inget meddelande får jag fel:

 error '80020009'
 Exception occurred.

 /pictures.asp, line 19

Rad 19 är: 	If Rs("message") \<\> "" Then

Vad har jag missat?

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

## #2 — mozilla, 2005-08-15T17:15Z

kanske för att RS är EOF men du försöker anropa den ändå? Lägg till en **if(NOT rs.EOF) Then**

*(var ett tag sedan jag pillade med asp, kan hända att jag lagt argumenten fel :e)*

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

## #3 — UlfT, 2005-08-15T17:16Z

Det finns inget i Rs, eftersom det inte fanns några meddelanden. Pröva istället:

If Rs.EOF = false then

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

## #4 — airwolf, 2005-08-15T17:30Z

Nu har jag 

```
	<%
	'/Check for user message	
	Set Rs = Server.CreateObject("ADODB.Recordset")
			
	SQL = "Select * From tbl_users WHERE folder='" & Session("folder") & "'"
	Rs.Open SQL, Conn, 3,3
	Do Until Rs.EOF

	If Rs.EOF = false then
	%>
		<p>
		<img src="img/inbox.gif"> <a href="inbox.asp">Du har ett nytt personligt meddelande</a>
	<%

	Else
	End If
	
	Rs.MoveNext
	Loop
			
	Rs.Close
	Set Rs = nothing
	%>
```

 

Men den skriver alltid ut Du har ett nytt personligt meddelande
Fast fältet är tomt, varför?!

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

## #5 — N0M0NEY, 2005-08-15T18:52Z

1\. Prova istället för
	If Rs.EOF = false then
Använd
	If Not Rs.EOF then
2\. Du behöver inte else i en if sats om du inte ska göra om villkoret är tvärtom..

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

## #6 — doggelito, 2005-08-15T19:13Z

du behöver också vända lite på koden, du kan få error annars:

```
If Not RS.Eof Then
     Do Until Rs.EOF
	%>
		<p>
		<img src="img/inbox.gif"> <a href="inbox.asp">Du har ett nytt personligt meddelande</a>
<%
     Rs.MoveNext
     Loop
End If
```

//red
och varför en loop?

```
If Not RS.Eof Then
%>
		<p>
		<img src="img/inbox.gif"> <a href="inbox.asp">Du har ett nytt personligt meddelande</a>
<%
End If
```

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

## #7 — mozilla, 2005-08-15T19:53Z

> **mozilla (kl 19:15) skrev:**
>
> kanske för att RS är EOF men du försöker anropa den ändå? Lägg till en **if(NOT rs.EOF) Then**

\*host\*  :stud

Och som doggelito säger, du behöver ju ingen loop för att skriva ut ett meddelande.

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

## #8 — airwolf, 2005-08-15T20:22Z

Då har jag bantat ner till

```
	<%
	'/Check for user message	
	Set Rs = Server.CreateObject("ADODB.Recordset")
			
	SQL = "Select * From tbl_users WHERE folder='" & Session("folder") & "'"
	Rs.Open SQL, Conn, 3,3
			
	If Not RS.Eof Then
	%>
		<p>
		<img src="img/inbox.gif"> <a href="inbox.asp">Du har ett nytt personligt meddelande</a>
	<%
	End If
	Rs.Close
	Set Rs = nothing
	%>
```

Men fortfarande visas **Du har ett nytt personligt meddelande** fastän fältet message är tomt.....

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

## #9 — emission, 2005-08-15T21:31Z

> **airwolf skrev:**
>
> Men fortfarande visas **Du har ett nytt personligt meddelande** fastän fältet message är tomt.....

Det gör det eftersom du ingenstans kollar huruvida det är tomt eller inte. 

```
SQL = "Select * From tbl_users WHERE folder='" & Session("folder") & "' AND Message<>''"
```

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

## #10 — airwolf, 2005-08-15T22:02Z

tänk va lätt det är om man skriver korrekta databasfrågor :D

Tack!

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/132805-error-80020009-exception-occurred