---
title: "Adderas inte med 1"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/13840-adderas-inte-med-1"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "ampy"
published: "2002-01-17T18:10:00.000Z"
updated: "2002-01-17T18:42:00.000Z"
replies: 7
views: 205
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/13840-adderas-inte-med-1"
---

# Adderas inte med 1

## #1 — ampy, 2002-01-17T18:10Z

```
<%

Set con = Server.CreateObject("ADODB.Connection")
con.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("intervjuer.mdb")

Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "UPDATE intervjuer SET klick = klick + 1 WHERE id = " & Request.Querystring("id")

Dim Con
Dim rst
Dim strSQL
Const adOpenStatic = 3
Const adLockReadOnly = 1
Const adCmdText = 1
strSQL = "Select * from intervjuer WHERE id ="& Request.Querystring("id")

Set rst = Server.CreateObject("ADODB.Recordset")
rst.Open strSQL, Con, adOpenStatic, _
adLockReadOnly, adCmdText

%>
```

När jag skriver denna kod så adderas inte databasen med 1, varför?

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

## #2 — @nders, 2002-01-17T18:11Z

Du exekverar aldrig din update-sats.

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

## #3 — ampy, 2002-01-17T18:15Z

Hur gör man det?

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

## #4 — LarsG, 2002-01-17T18:22Z

```
<%
Dim con
Set con = Server.CreateObject("ADODB.Connection")
con.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("intervjuer.mdb")

Addera = "UPDATE intervjuer SET klick = klick + 1 WHERE id = " & Request.Querystring("id")

[b]con.execute addera,,128[/b]
Dim rst
Dim strSQL
Const adOpenStatic = 3
Const adLockReadOnly = 1
Const adCmdText = 1
strSQL = "Select * from intervjuer WHERE id ="& Request.Querystring("id")

Set rst = Server.CreateObject("ADODB.Recordset")
rst.Open strSQL, Con, adOpenStatic, _
adLockReadOnly, adCmdText

%>
```

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

## #5 — ampy, 2002-01-17T18:27Z

Då får jag detta felmeddelande:

```
Microsoft OLE DB Provider for ODBC Drivers fel '80004005' 
[Microsoft][Drivrutin för ODBC Microsoft Access] Operationen måste använda en fråga som kan uppdateras. 

/intervju2.asp, line 98
```

Rad 98 var den rad jag la till som LarsG skrev.

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

## #6 — icaaq, 2002-01-17T18:34Z

Detta var upp tidigare idag
 <http://cgi.webforum.nu/wf/Forum11/HTML/008455.html> 

mvh

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

## #7 — ampy, 2002-01-17T18:39Z

Tack så mycket icaaq, jag har löst det nu :D

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

## #8 — icaaq, 2002-01-17T18:42Z

Jag gjorde ju inget(skickade bara en länk), Det är LarsG och snabelanders du ska tacka.....

mvh icaaq

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/13840-adderas-inte-med-1
