---
title: "recset.addnew"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/43478-recset-addnew"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "antar"
published: "2002-05-10T13:53:07.000Z"
updated: "2002-05-11T00:44:42.000Z"
replies: 8
views: 348
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/43478-recset-addnew"
---

# recset.addnew

## #1 — antar, 2002-05-10T13:53Z

vad är felet?
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
\[Microsoft\]\[Drivrutin för ODBC Microsoft Access\]Fel i rad 
/Bilder/Community/Medlemmar/rosta.asp, line 113

fel = recset.addnew
\<%
if request.querystring("rosta") = "ja" then
Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open "driver={Microsoft Access Driver (\*.mdb)};dbq=" & Server.MapPath("../../../Database/Members.mdb")&""
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "Select \* From members Where id = " &Request.QueryString("id")
RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic

RecSet.AddNew
recset("Poangtotal") = recset("Poangtotal")+1
RecSet.Update
RecSet.Close
Connect.Close
Set RecSet = nothing
Set Connect = nothing

response.redirect "rosta.asp"
end if%\>

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

## #2 — LarsG, 2002-05-10T14:09Z

Varför gör du addnew? Vill du inte uppdatera posten?
I så fall är det väldigt onödigt att använda recordset

```
if request.querystring("rosta") = "ja" then 
Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("../../../Database/Members.mdb") 

query = "update members set poangtotal = poangtotal + 1  Where id = " &Request.QueryString("id") 
Connect.execute query,,128
```

 

Om du vill göra addnew så måste du tilldela värden till fler kolumner. Det är nog därför du får fel, om du har kolumner som är obligatoriska.

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

## #3 — antar, 2002-05-10T14:16Z

om jag gör så här får jag samma fel

\<%
if request.querystring("rosta") = "ja" then
RecSet.AddNew
recset("Poangtotal") = recset("Poangtotal")+1
recset("Poangbild") = request.form("skala")
RecSet.Update
RecSet.Close
Connect.Close
Set RecSet = nothing
Set Connect = nothing

response.redirect "rosta.asp"
end if%\>

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

## #4 — antar, 2002-05-10T15:11Z

hallå

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

## #5 — Pace, 2002-05-10T15:41Z

Hej, hej.

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

## #6 — antar, 2002-05-10T15:43Z

\<% 
if request.querystring("rosta") = "ja" then 
RecSet.AddNew 
recset("Poangtotal") = recset("Poangtotal")+1 
recset("Poangbild") = request.form("skala") 
RecSet.Update 
RecSet.Close 
Connect.Close 
Set RecSet = nothing 
Set Connect = nothing 

response.redirect "rosta.asp" 
end if%\>

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

## #7 — @nders, 2002-05-10T16:17Z

Läs LarsGs inlägg igen.

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

## #8 — antar, 2002-05-10T16:24Z

jag har inga kolumner som e obligatoriska!!
vad menas med tilldela värden?

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

## #9 — Gimbo, 2002-05-11T00:44Z

Testa detta...

```
<% 
Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("../../../Database/Members.mdb")&"" 
Set RecSet = Server.CreateObject("ADODB.Recordset") 
Updatera = "Select * From members Where id = " &Request.QueryString("id") 
RecSet.Open Updatera, Connect, adOpenStatic, adLockOptimistic 

if request.querystring("rosta") = "ja" then 
recset("Poangtotal") = recset("Poangtotal")+1 
recset("Poangbild") = request.form("skala") 

RecSet.Update 
RecSet.Close 
Connect.Close 
Set RecSet = nothing 
Set Connect = nothing 

response.redirect "rosta.asp" 
end if
%>
```

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/43478-recset-addnew