---
title: "Skrivskydd"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/12787-skrivskydd"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Mika3l"
published: "2001-11-22T16:39:00.000Z"
updated: "2001-11-23T12:53:00.000Z"
replies: 7
views: 203
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/12787-skrivskydd"
---
# Skrivskydd
## #1 — Mika3l, 2001-11-22T16:39Z
Hej!
Jag håller på med ett litet meddelandesystem.
Jag har provat att skicka ett meddelande men jag får ett felmeddelande att det inte går att uppdatera databasen p.g.a att den är skrivskyddad.
Men det är inte skrivskyddad!
Körde då med rs.AddNew...rs.Update(gammal modell) men innan det så provade jag en INSERT kod.
Men då fick jag ett felmeddelande direkt;
Feltyp:
Kompileringsfel i Microsoft VBScript (0x800A0400)
Programsats förväntas.
/ingenjorerna/skrivmess.asp, line 9
"INSERT INTO mess (fran, till, rubrik, mess, datum, last) VALUES('" & Session("user") & "','" & Request.Form("till") & "','" & Request.Form("rubrik") & "','" & Request.Form("mess") & "', now(), False)"
Kod
```
"INSERT INTO mess (fran, till, rubrik, mess, datum, last) VALUES('" & Session("user") & "','" & Request.Form("till") & "','" & Request.Form("rubrik") & "','" & Request.Form("mess") & "', now(), False)"
```
Tacksam för svar!
/Mika3l
Permalänk: https://www.webforum.nu/p/12787
## #2 — LarsG, 2001-11-22T16:46Z
Hur ser hela koden ut? Du behöver göra execute.
```
connect.execute "INSERT INTO mess (fran, till, rubrik, mess, datum, [last]) VALUES('" & Session("user") & "','" & Request.Form("till") & "','" & Request.Form("rubrik") & "','" & Request.Form("mess") & "', now(), False)",,128
```
du lär också få problem med ordet last som är ett reserverat ord i SQL. Man kan skriva det inom \[\] så skall det gå bra.
Permalänk: https://www.webforum.nu/p/295530
## #3 — Mika3l, 2001-11-22T17:22Z
Jag skickar hela sidan.
```
<%
If Request.Form("skriv") = "true" Then
If Request.Form("till") = "" Then
Response.Write""
Else
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "Driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("mess.mdb")
"INSERT INTO mess (fran, till, rubrik, mess, datum, last) VALUES('" & Session("user") & "','" & Request.Form("till") & "','" & Request.Form("rubrik") & "','" & Request.Form("mess") & "', now(), False)"
Connection.Execute(SQL)
Set Connection = Nothing
Response.Write""
Response.Redirect"skrivmess.asp"
End If
End If
%>
Skriv meddelande
Skriv meddelande
```
/Mika3l
Permalänk: https://www.webforum.nu/p/295531
## #4 — LarsG, 2001-11-22T17:31Z
```
Connection.Open "Driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("mess.mdb")
[b]sql = [/b]"INSERT INTO mess (fran, till, rubrik, mess, datum, [last]) VALUES('" & Session("user") & "','" & Request.Form("till") & "','" & Request.Form("rubrik") & "','" & Request.Form("mess") & "', now(), False)"
Connection.Execute SQL
```
Permalänk: https://www.webforum.nu/p/295532
## #5 — Mika3l, 2001-11-22T21:07Z
Dumma lilla mig, glömde skriva SQL = framför, ska prova...
Loggar in...
Går till inkorgen...
Går till skriv meddelande...
Skriver...
Skickar...
Nej!
Jag fick ett felmeddelande!
Det ser ut så här:
Feltyp:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
\[Microsoft\]\[Drivrutin för ODBC Microsoft Access\] Operationen måste använda en fråga som kan uppdateras.
/ingenjorerna/skrivmess.asp, line 10
Koden ser nu ut så här:
```
<%
If Request.Form("skriv") = "true" Then
If Request.Form("till") = "" Then
Response.Write""
Else
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "Driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("mess.mdb")
SQL = "INSERT INTO mess (fran, till, rubrik, mess, datum, last) VALUES('" & Session("user") & "','" & Request.Form("till") & "','" & Request.Form("rubrik") & "','" & Request.Form("mess") & "', now(), False)"
Connection.Execute(SQL) ///rad 10[/red]
Set Connection = Nothing
Response.Write""
Response.Redirect"skrivmess.asp"
End If
End If
%>
```
/Mika3l
Permalänk: https://www.webforum.nu/p/295533
## #6 — jorgen, 2001-11-22T21:14Z
Hej!
Låter som du inte har tillräckliga rättigheter.
Sedan är datum ett reserverat ord i access, prova skriv \[datum\]
mvh Jörgen :)
Permalänk: https://www.webforum.nu/p/295534
## #7 — LarsG, 2001-11-22T21:15Z
Då är det problem med rättigheterna på den katalog där databasen ligger.
IUSR\_\ måste ha rxwd
Det här har varit uppe tidigare så du kan ju söka på updatable query så lär du hitta några trådar.
Permalänk: https://www.webforum.nu/p/295535
## #8 — Mika3l, 2001-11-23T12:53Z
Tack!
Nu fungerar det!
/Mika3l
Permalänk: https://www.webforum.nu/p/295536
---
Tråden på webben: https://www.webforum.nu/amne/asp/12787-skrivskydd