Forstår ikke hvad der er galt i denne linie Syntax error (missing
HejJeg sidder med en asp fil, hvor der hele tiden kommer en meget træls fejl. Nu har jeg siddet med filen den sidste times tid, og kan bare ikke finde ud af få rettet fejlen - så nu håber jeg der er nogen der kan hjælpe mig.
Fejlen er denne:
Microsoft JET Database Engine error '80040e14'
Syntax error (missing operator) in query expression 'orderID =4AND vareid ='.
/datronic/frameset/tilfoj.asp, line 44
--------------
Min kode er her:
<%@ Language=VBScript %>
<!--#include file="dbconn.inc"--><!-- Database forbindelse oprettes via ekstern fil-->
<!-- #include file="db.asp" -->
<%
Sub CreateNewOrder()
Application.lock
if Application("orderID") = "" then
Application("orderID") = 1
end if
intOrderID = Application("orderID")
Session("orderID") = intOrderID
Conn.Execute("INSERT INTO ordre " _
& " (orderID, status) values " _
& " ("&intOrderID&", 'OPEN')")
Application("orderID") = Application("orderID") + 1
Application.Unlock
End Sub
Sub AddToOrder(nOrderID, nVareId, nQuant)
sqlText = "INSERT INTO ordrelinie " _
& " (orderID, vareid, antal) values " _
& " ("&nOrderID&", "&nVareId&", "&nQuant&")"
Conn.Execute(sqlText)
End Sub
'Main program
intVareId = Request.form("intVareId")
intQuant = Request.form("intQuant")
set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ConString
intOrderID = cstr(Session("orderID"))
if intOrderID = "" then
CreateNewOrder
end if
sqlText = "SELECT * FROM ordrelinie WHERE orderID =" & intOrderID & "AND vareid =" & intVareID
set rsOrder = Conn.Execute(sqlText)
if rsOrder.EOF then 'meddelelse som popper op når brugerne lægger en vare i inskøbsvognen
txtInfo = "Varen er tilføjet til din indkøbsvogn."
AddToOrder intOrderID, intVareId, intQuant
else
txtInfo = "Varen er allerede i din indkøbsvogn."
end if
%>
<!-- #include file="adovbs.inc" -->
<html>
<head>
<style type="text/css">
<!--
body {
margin-top: 0px;
margin-left: 4px;
}
-->
</style>
<meta name="GENERATOR" Content="Microsoft FrontPage 4.0">
<title>tilføj varer til kurv</title>
<Link Rel="stylesheet" href="datronic.css" Type="text/css" > <!-- link til ekstern style sheet -->
<style type="text/css">
<!--
.style2 {
font-size: 10;
font-weight: bold;
}
-->
</style>
</head>
<body >
<table width="490" border="0" cellspacing="0">
<tr>
<td colspan="2" bgcolor="545db9"> </td>
</tr>
<tr>
<td colspan="2">
<%= txtInfo %>
</td>
</tr>
<tr>
<td> </td>
<td> </td>
</tr>
<tr>
<td>
<a href="vis_varer.asp?intVareId=<%= intVareId %>" target="tekst"><img src="grafik/tilbage_knap.gif" alt="Tilbage" border="0" name="tilbage" ></a>
</td>
<td>
<a href="vis_varer.asp?intVareId=<%= intVareId %>" target="tekst"><img src="grafik/vis_vogn_kasse.gif" alt="Vid vogn/Gå til kassen" border="0" name="visvogn" ></a>
</td>
</tr>
<tr>
<td colspan="2"> </td>
</tr>
<tr>
<td colspan="2"><div align="center"><a href="forside_butik.htm" target="tekst" class="style2">Fortsæt med at handle - klik her... </a> </div></td>
</tr>
</table>
<%
' Luk forbindelse fra dbconn.inc
Conn.Close
Set Conn = Nothing
%>
</body>
</html>
-------------
Linie 44 er denne:
42
43 sqlText = "SELECT * FROM ordrelinie WHERE orderID =" & intOrderID & "AND vareid =" & intVareID
44 set rsOrder = Conn.Execute(sqlText)
45
Håber der er nogen der kan hjælpe mig...
/Annette
