---
title: "Hjälp med felmeddelane!"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/61188-hjälp-med-felmeddelane"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Saurus"
published: "2002-12-04T18:04:56.000Z"
updated: "2002-12-05T09:54:14.000Z"
replies: 4
views: 241
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/61188-hjälp-med-felmeddelane"
---

# Hjälp med felmeddelane!

## #1 — Saurus, 2002-12-04T18:04Z

Felmeddelandet:

Microsoft JET Database Engine error '80004005' 

Operation must use an updateable query. 

/gorza112/forum/postForm.asp, line 40 

Koden:

\<% 
Dim objConn 
Dim strConn 
Dim strSQL 
Dim lngThreadParent 
Dim strThreadPoster 
Dim strThreadName 
Dim strThreadPosterEmail 
Dim strThreadHeadline 
Dim strThreadText 
Dim dtmThreatDateTime 
Dim strDummy 

strDummy = "Ingen angiven" 

lngThreadParent = Request.Form("threadParent") 

if lngThreadParent = "" then lngThreadParent = 0 

strThreadPoster = Replace(Request.Form("threadPoster"), "'", "''") 
strThreadPosterEmail = Replace(Request.Form("threadPosterEmail"), "'", "''") 
strThreadHeadline = Replace(Request.Form("threadHeadline"), "'", "''") 
strThreadText = Replace(Request.Form("threadText"), "'", "''") 
dtmThreatDateTime = Now() 

if strThreadName = "" then strThreadName = strDummy 
if strThreadPosterEmail = "" then strThreadPosterEmail = strDummy 
if strThreadHeadline = "" then strThreadHeadline = strDummy 
if strThreadText = "" then strThreadText = strDummy 

Set objConn = Server.CreateObject("ADODB.Connection") 

strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db/forum.mdb") 
objConn.Open strConn 

strSQL = "INSERT INTO tblForum (threadDateTime, threadPoster, threadPosterEmail, threadHeadline, threadText, threadParent) VALUES('" & dtmThreatDateTime & "', '" & strThreadPoster & "', '" & strThreadPosterEmail & "', '" & strThreadHeadline & "', '" & strThreadText & "', " & lngThreadParent & ")" 

objConn.Execute(strSQL) 

objConn.Close 
Set objConn = nothing 

Response.Redirect("default.asp") 
%\>

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

## #2 — OveRRidE, 2002-12-04T18:05Z

Har du skrivrättigheter i mappen?

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

## #3 — DiDjo, 2002-12-04T18:06Z

lalala ångrade mig

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

## #4 — Saurus, 2002-12-05T09:37Z

Det var min kompis som hade problem :P

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

## #5 — OveRRidE, 2002-12-05T09:54Z

Ordnade det sig?

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/61188-hjälp-med-felmeddelane