---
title: "Undantag inträffade...?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/13211-undantag-inträffade"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "ampy"
published: "2001-12-16T13:09:00.000Z"
updated: "2001-12-16T18:40:00.000Z"
replies: 3
views: 215
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/13211-undantag-inträffade"
---

# Undantag inträffade...?

## #1 — ampy, 2001-12-16T13:09Z

Hej!

När jag skriver denna kod 

```
<!-- #include file = "adovbs.inc" -->

<%
	Dim objMail
	Set objMail = Server.CreateObject("CDONTS.NewMail")
  
	objMail.From = "andreazz1986@hotmail.com"
	objMail.Subject = "Tävling"
	objMail.To = "andreazz1986@hotmail.com"
	objMail.Body = "Fråga 1: " & Request.form("fraga 1") & vbcrlf & vbcrlf&_
		       "Fråga 2: " & Request.form("fraga 2") & vbcrlf & vbcrlf&_
		       "Fråga 3: " & Request.form("fraga 3") & vbcrlf & vbcrlf&_
		       "Fråga 4: " & Request.form("fraga 4") & vbcrlf & vbcrlf&_			
		       "Fråga 5: " & Request.form("fraga 5") & vbcrlf & vbcrlf&_
		
		       "E-mail: " & Request.form("e-mail") & vbcrlf & vbcrlf&_
		       "URL: " & Request.form("url") & vbcrlf & vbcrlf&_
		       "URL Banner: " & Request.form("urlbanner")
	objMail.Send
 
	set objMail = nothing

	Set Connect = Server.CreateObject("ADODB.Connection") 
	Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("db/tavling.mdb")

	Set RecSet = Server.CreateObject("ADODB.Recordset")

	strSQL = "SELECT * FROM tavling"
	recset.open strSQL, connect, adopenstatic, adlockoptimistic
	recset("summabidrag") = recset("summabidrag") +1  
	recset.update

%>
```

Då blir det detta felmeddelande:

```
Feltyp:
(0x80020009)
Undantag inträffade. 
/Ampy/senttavling.asp, line 34
```

Rad 34:

```
	recset("summabidrag") = recset("summabidrag") +1
```

Varför blir det fel?

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

## #2 — emission, 2001-12-16T13:22Z

Byt

```
strSQL = "SELECT * FROM tavling"
recset.open strSQL, connect, adopenstatic, adlockoptimistic
recset("summabidrag") = recset("summabidrag") +1 
recset.update
```

till

```
strSQL = "UPDATE tavling SET summabidrag=summabidrag+1"
connect.execute strSQL,,128
```

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

## #3 — ampy, 2001-12-16T13:26Z

Nu blir det inget felmeddelande men när jag öppnar databasen så har det inte lagts till med 1.

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

## #4 — LarsG, 2001-12-16T18:40Z

Vad ligger det för värde i kolumnen innan du gör update?

Null kanske?

```
strSQL = "UPDATE tavling SET summabidrag= iif(summabidrag is null,0,summabidrag)+1"
connect.execute strSQL,,128
```

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/13211-undantag-inträffade