---
title: "uppdatering av databas"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/48177-uppdatering-av-databas"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "fatcap"
published: "2002-07-18T19:22:22.000Z"
updated: "2002-07-18T21:46:12.000Z"
replies: 9
views: 277
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/48177-uppdatering-av-databas"
---

# uppdatering av databas

## #1 — fatcap, 2002-07-18T19:22Z

när man gör en databas kan man ju välja några olika alternativ om vad det ska vara för typ av fält (text, pm o.s.v.). Varför kan jag inte ändra i databasen när jag väljer pm. Det funkar bra med text. men ej med pm. 

hur kommer det sig ??

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

## #2 — LarsG, 2002-07-18T19:40Z

Vad får du för fel när du gör update?
Hur ser koden ut?

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

## #3 — Jesper T, 2002-07-18T19:47Z

Menar du i databasen eller via en asp-sida?

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

## #4 — fatcap, 2002-07-18T21:03Z

Jesper T - via en asp sida

koden ser ut

\<% If Request.QueryString("wits") = "gastbok_redigera" Then %\>
\<div style="position: absolute; top: 140pt; left: 20pt;"\>
\<b\>Redigera gästboks inlägg...\</b\>\<br\>
\<table border="0" cellspacing="2" cellpadding="2"\>
\<% redgastbok = "SELECT \* FROM gastbok ORDER BY id desc"
	RecSet.Open redgastbok, Connect, adOpenStatic, adLockOptimistic
	Do While Z \< 999
	If RecSet.EOF Then 
	Exit Do
	End If %\>\<tr\>
	\<td\>\<a href="ad_min.asp?wits=gastbok_redigeradet&ID=\<% =RecSet("id") %\>"\>\<% =RecSet("namn") %\>\</a\>\</td\> 
	\<td\>\<% =RecSet("email") %\>\</td\>
	\<td width="100"\>\<% =RecSet("hemsida") %\>\</td\>\</tr\>
	\<tr\>\<td\>\<% =RecSet("inlagg") %\>\</td\>
	\</tr\>
\<%	RecSet.MoveNext
	Loop
	RecSet.Close %\>\</table\>
\</div\>
\<% End If %\>

\<% If Request.QueryString("wits") = "gastbok_redigeradet" Then %\>
\<div style="position: absolute; top: 140pt; left: 20pt;"\>
\<% 	Visa = "SELECT \* FROM gastbok WHERE ID = " & Request.QueryString("ID") & " "
	RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic %\>
	\<form method="POST" action="ad_min.asp?wits=gastbok_redupdat&ID=\<% =Request.QueryString("ID") %\>"\>
	Namn:\<br\>
	\<input type="text" class="textarea" size="100" name="namn" value="\<% =RecSet("namn") %\>"\>\<p\>
	E-mail:\<br\>
	\<input type="text" class="textarea" size="100" name="email" value="\<% =RecSet("email") %\>"\>\<p\>
	Hemsida:\<br\>
	\<input type="text" class="textarea" size="100" name="hemsida" value="\<% =RecSet("hemsida") %\>"\>\<p\>
	Stad:\<br\>
	\<input type="text" class="textarea" size="100" name="stad" value="\<% =RecSet("stad") %\>"\>\<p\>
	Meddelande:\<br\>
	\<input type="text" class="textarea" size="100" name="inlagg" value="\<% =RecSet("inlagg") %\>"\>\<p\>
	\<input alt="send" border=0 cache height=11 name=submit src="send.gif" width="29" type="image"\>
	\</form\>
\</div\>
\<% End If %\>

\<% If Request.QueryString("wits") = "gastbok_redupdat" Then %\>
\<div style="position: absolute; top: 140pt; left: 20pt;"\>
\<%	Addera = "SELECT \* FROM gastbok WHERE ID = " & Request.QueryString("ID") & " "
	RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic 
	RecSet("namn") = Request.Form("namn")
	RecSet("email") = Request.Form("email")
	RecSet("hemsida") = Request.Form("hemsida")
	RecSet("stad") = Request.Form("stad")
	RecSet("inlagg") = Request.Form("inlagg")
	RecSet.Update
	RecSet.Close 
	Response.Redirect "ad_min.asp?wits=gastbok_redigera" %\>
\</div\>
\<% End If %\>

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

## #5 — Jesper T, 2002-07-18T21:16Z

Minns att det kan bli krux, men kommer inte riktigt ihåg var det var. Vad får du för felmeddelande?

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

## #6 — fatcap, 2002-07-18T21:22Z

ADODB.Recordset.1 error '80004005' 

SQLState: 34000
Native Error Code: 0
\[INTERSOLV\]\[ODBC SequeLink driver\]Statement with cursor named in this statement's CURRENT-OF-CURSOR clause is not a SELECT FOR UPDATE.

/ad_min/ad_min.asp, line 194 

och på den raden står det ......

	RecSet.Update

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

## #7 — Jesper T, 2002-07-18T21:36Z

Testa detta:

```
addera = "UPDATE gastbok SET Namn = '" & Request.Form("Namn") & "', email = '" & Request.Form("email") & "', hemsida = '" & Request.Form("hemsida") & "', Stad = '" & Request.Form("stad") & "', Inlagg = '" & Request.Form("inlagg") & "' WHERE ID = " & Request.QueryString("ID")
Connect.Execute addera, , 128
Connect.Close 
Set Connect = Nothing
```

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

## #8 — Jesper T, 2002-07-18T21:38Z

Ta bort:

```
 Addera = "SELECT * FROM gastbok WHERE ID = " & Request.QueryString("ID") & " " 
RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic 
RecSet("namn") = Request.Form("namn") 
RecSet("email") = Request.Form("email") 
RecSet("hemsida") = Request.Form("hemsida") 
RecSet("stad") = Request.Form("stad") 
RecSet("inlagg") = Request.Form("inlagg") 
RecSet.Update 
RecSet.Close
```

P.s Det är lättare att läsa om du använder \[kod\]-taggarna när du skriver din kod :)

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

## #9 — fatcap, 2002-07-18T21:45Z

det funka....tack så mycket

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

## #10 — Jesper T, 2002-07-18T21:46Z

:)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/48177-uppdatering-av-databas