---
title: "panik med databas"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/7483-panik-med-databas"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "reka"
published: "2000-12-21T17:12:00.000Z"
updated: "2000-12-21T22:56:00.000Z"
replies: 1
views: 173
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/7483-panik-med-databas"
---

# panik med databas

## #1 — reka, 2000-12-21T17:12Z

Heja! 
Det är panik, måste funka innan jul. Som vanligt funkar det lokalt men inte på hotellet. 

Mycket, mycket tacksam för svar... 
// Reka 

ADODB.Recordset.1 error '80004005' 

Statement with cursor named in this statement's CURRENT-OF-CURSOR clause is not a SELECT FOR UPDATE. 

/upr/laggtill.asp, line 91 

\<% dim Vecka 
Vecka = DatePart("ww",Date(),2,2) 
\[bortklippt\] 
gris = "26" 
elseif request.form("login") = "stso" then 
gris = "27" 
else 
response.write "Fel på 1:a satsen eller felaktigt login" 
end if 

dim sok 
sok = weekday(date, 2) 

' Omvandla datum 
if sok = "1" then 
sok = "Mon" 
elseif sok = "2" then 
sok = "Tues" 
elseif sok = "3" then 
sok = "Wed" 
elseif sok = "4" then 
sok = "Thu" 
elseif sok = "5" then 
sok = "Fri" 
else 
response.write "Fel på 2:a satsen eller Lördag / Söndag" 
end if 

Set Connect = Server.CreateObject("ADODB.Connection") 
   Connect.Open "DSN=XXX;Password=XXX" 

Set RecSet = Server.CreateObject("ADODB.Recordset") 
Uppdatera = "SELECT \* FROM narvaro WHERE ID=" & CInt(Request.Form("AnvID") & gris) 

RecSet.Open Uppdatera, Connect, adOpenStatic, adLockOptimistic, adCmdText 

RecSet(sok) = "X" 
RecSet.Update 	\<== RAD 91

RecSet.Close 
Connect.Close 

%\>

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

## #2 — putteh, 2000-12-21T22:56Z

Antagligen använder du fel cursortype, eftersom du inte valt någon blir det en förvald, som inte alltid passar. Jag har ingen jättekoll på de olika typerna, men prova att skriva RecSet.CursorType = adOpenKeyset
på raden före RecSet.Open Uppdatera

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/7483-panik-med-databas
