---
title: "medelandefunktion"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/12102-medelandefunktion"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "MoonCow"
published: "2001-10-14T17:48:00.000Z"
updated: "2001-10-15T09:26:00.000Z"
replies: 7
views: 191
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/12102-medelandefunktion"
---

# medelandefunktion

## #1 — MoonCow, 2001-10-14T17:48Z

Tjena!
Försöker bygga ihop en liten community som lunar för att lära mig lite mer innom asp. men... när jag ska skicka ett medelande får jag detta:

```
ADODB.Recordset (0x800A0CB3)
Current Recordset does not support updating. This may be a limitation of the provider, or of the selected locktype.
/mooncow/skicka_mess.asp, line 11
```

Vadå "This may be a limitation of the provider" får jag inte skriva till databaser lr?

så här ser min kod ut:

```

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

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

Addera = "Select * From mess"
RecSet.Open Addera, Connect

	RecSet.AddNew

	RecSet("motagare") = Request.Form("motagare")
	RecSet("mess") = Request.Form("mess")
	RecSet("nowen") = now
	RecSet("last") = 0
	RecSet("fran") = Session("namn")

	RecSet.Update
	RecSet.Close

Connect.close
	Set RecSet = nothing
	Set databas = nothing

Response.Redirect "default.asp"

%>
```

Ovan ska altså skriva ett medelande till en person... ser ni nått fel?

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

## #2 — MoonCow, 2001-10-14T17:58Z

det är altså på rad en där det står:

RecSet.AddNew

som den säger det är fel....

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

## #3 — LarsG, 2001-10-14T18:00Z

Felet är att du inte använder SQL.

Om du öppnar ett recordset utan ange locktype så är readonly default.

```
RecSet.Open Addera, Connect,3,3
```

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

## #4 — MoonCow, 2001-10-14T18:05Z

\*tackar och bugar\*

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

## #5 — LarsG, 2001-10-14T18:10Z

Om man använder rs.addnew och sedan rs.update för att göra insert (en tabell med 3 kolumner) så blir det ungefär 50 anrop till databasklienten. 

Däremot, om man använder execute med ett insert-statement så blir det 4 anrop.

Ett insert statememt för din tabell skulle kunna se ut som

```
sql = "insert into mess(motagare,mess,nowen,[last],fran) values ("
sql = sql & "'"  replace(Request.Form("motagare"),"'","''") & "','"
sql = sql & "'"  replace(Request.Form("mess"),"'","''") & "',now(),0,'"
sql = sql & "'"  replace(session("namn"),"'","''") & "')"

connect.execute sql,,128
```

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

## #6 — snekkorr, 2001-10-14T21:58Z

luktar idg kod :)... problemet är att du här ---\>RecSet.Open Addera, Connect\<--- anropar lite juz ;) gör såhär innan koden \<!-- #include file="adovbs.inc" --\> förutsatt att du har den där :) har alltid samma problem själv §=D

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

## #7 — MoonCow, 2001-10-15T06:33Z

ok.. tack för era svar med... klipper och klistrar mest, är inte superinsatt i kopplingarna... men ska ändra det. Man vill ju bespara servern så mkt så möjligt :)

jo, brukar glömma att inkudera abdobvs.inc :r

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

## #8 — McD, 2001-10-15T09:26Z

Det behöver du inte göra om du istället sätter in värden i filen...

tex add.optemistic :e har värde 3 enligt abdobvs.inc  om du kollar i den... du kan alltså byta ut alla dessa mot sifferkombinationer istället. Bra om du bara använder ett fåtal.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/12102-medelandefunktion