---
title: "Microsoft JET Database Engine error '80040e14'"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/133540-microsoft-jet-database-engine-error-80040e14"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "ptr_lks"
published: "2005-08-31T14:46:31.000Z"
updated: "2005-08-31T15:20:26.000Z"
replies: 7
views: 289
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/133540-microsoft-jet-database-engine-error-80040e14"
---

# Microsoft JET Database Engine error '80040e14'

## #1 — ptr_lks, 2005-08-31T14:46Z

Hej,
jag har min sida hos brinkster. Och Använder mig utav Access 2003
Koden

```
Set gbok = Server.CreateObject( "Adodb.Connection" )
gbok.Provider = "Microsoft.Jet.OLEDB.4.0"
MdbFilePath = Server.MapPath("\spif93\db\guests.mdb")
gbok.ConnectionString = "Data Source='" & MdbFilePath & "'"
gbok.open

namn = Request.Form("namn")
Message = Request.Form("message")

strSQL = "INSERT INTO coach(heter, text, dag) VALUES('" & namn & "','" & Message & "','" & now() & "')"

gbok.Execute( strSQL )
Set gbok = Nothing

Response.Redirect "p93_coach.asp"
```

 ger följande felmeddelande

> Microsoft JET Database Engine error '80040e14' 
> 
> Syntax error in INSERT INTO statement.

Hittar tyvärr inte felet själv

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

## #2 — LarsG, 2005-08-31T14:49Z

text är ett reserverat ord i Jet SQL. Kanske ett byte av kolumnnamn.

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

## #3 — Peter S, 2005-08-31T14:49Z

Hej!

*text* är ett reserverat ord. Dessutom skall datum i Access omges av #-tecken, så:

```
,#" & now() & "#)"
```

Red./ Något sen uppenbarligen

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

## #4 — Glitter, 2005-08-31T14:51Z

/R hmm blev lite sent..

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

## #5 — LarsG, 2005-08-31T14:53Z

Det där med datum gäller väl bara versioner äldre än Access 2002, eller?

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

## #6 — Peter S, 2005-08-31T14:58Z

> **LarsG skrev:**
>
> Det där med datum gäller väl bara versioner äldre än Access 2002, eller?

Det har du rätt i  :bire

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

## #7 — ptr_lks, 2005-08-31T15:12Z

byte av kolumn namn löste ett problem...

> Microsoft VBScript runtime error '800a000d' 
> 
> Type mismatch: 'FirstVersal'

 

```
set rsGbok = Server.CreateObject("ADODB.Recordset")

minCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("\spif93\db\guests.mdb")
strSQL =" SELECT * FROM coach ORDER by ID DESC"
rsGbok.Open strSQL, minCon, 3, 3
Do While Not rsGbok.EOF
//'eftersom sidan ligger på en amerikansk server så har vi 6 timmars tidsdifferens
indag = Cdate(rsGbok("dag"))
vdag = DateAdd("h",6,indag)
dat = FirstVersal(WeekDayName(WeekDay(vdag)))&"en "& " den " & fix(DatePart("d", vdag)) & "  " & MonthName(Month(vdag)) &" kl " & FormatDateTime(vdag,4) 
Response.Write "<P>" & dat & " skrevs följande:</P>"
//' i VBScript kan man inte använda sig utav radbrytningar därför behövs följande: Replace(rsGbok("mess"), vbCrLf, "<br>" & vbCrLf)
Response.Write "<P><B><FONT SIZE=""4""><I>" & Replace(rsGbok("mess"), vbCrLf, "<br>" & vbCrLf) & "</I></FONT></B></P><BR><B><U>"
Response.Write "      av:"
Response.Write "</U></B>   " & rsGbok("heter")
Response.Write "<P></P><P></P><HR></HR>"

  rsGbok.MoveNext

  Loop
  rsGbok.Close
  Set rsGbok = Nothing
  minCon.Close
  Set minCon = Nothing
```

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

## #8 — ptr_lks, 2005-08-31T15:20Z

löste problemet själv
det fattades:

```
<%  dim minCon 'Connection
     dim rsGbok 'recordsetten f&ouml;r nya inl&auml;gg
     dim strSQL

dim indag, dat
Session.LCID = 1053 
function fix(S)
  if S > 2 AND S <= 20 then 
     fix = S & "e"
	 Else
  if S > 23 AND S <= 30 then
   fix = S & "e"
    Else
    fix = S & "a"
  end if
  end if
 end function
 'byta ut första bokstaven
Function FirstVersal(txt)
      versal = UCase(Left(txt,1)) & LCase(Right(txt, Len(txt)-1))
  FirstVersal = versal
End Function
%>
```

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/133540-microsoft-jet-database-engine-error-80040e14