Underlig FELJ

Hey

nogle der kan forklare mig hvorfor jeg får følgende fejl

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error in FROM clause.

/order_admin.asp, line 12


og hvordan jeg løser problemet... Min kode er som følgende...

<link rel="stylesheet" type="text/css" href="admin.css">
<body><%


Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database/database.mdb")
%>
<% mode = request("mode") %>
<% if mode = "" then %>
<%
SQL = "SELECT * FROM order"
set rs = Conn.execute(SQL)
if rs.EOF then
%>

<a href="ret.asp?mode=logaf">logaf</a>
Intet i db'en
<%
else
%>
<a href="ret.asp?mode=logaf">logaf</a>
<table width="400">
<tr>
<td><b>ID1:</b></td>
<td><b>Order Info:</b></td>
<td><b>Firma:</b></td>
<td><b>Navn:</b></td>
<td><b>Telefon:</b></td>
<td><b>Date:</b></td>
</tr>
<%
Do Until rs.EOF
%>
<tr>
<td valign="top"><a href="?mode=ret&id1=<%=rs("id1")%>"><%=rs("id1")%></td>
<td valign="top"><%=rs("order_info")%></td>
<td valign="top"><%=rs("firma")%></td>
<td valign="top"><%=rs("navn")%></td>
<td valign="top"><%=rs("kontakt")%></td>
<td valign="top"><%=rs("Date")%></td>
</tr>
<%
rs.MoveNext
Loop
end if
%>
<% end if %>
<% if mode = "ret" then %>
<form method="POST" action="?mode=ret2&id1=<%=Request.QueryString("id1")%>"> 
<%
SQL = "Select * From order where id1="& Request.QueryString("id1")
set rs = Conn.execute(SQL)
%>
Id1: <%=rs("id1")%><br><br>
serial:<br>
<input type="text" size="10" name="serial"><%=rs("order_info")%></textarea><br><br>

<br><br>
Kategori:<br>
<input type="text" size="10" name="kategori"><%=rs("firma")%></textarea><br><br>
<br><br>

<br><br>
info_txt:<br>
<textarea name=info_txt rows=10 cols=50><%=rs("navn")%></textarea><br><br>
<input type="submit" value="Send">
</form>



<% end if %>
<% if mode = "ret2" then %>
<%
Set rs = Server.CreateObject("ADODB.RecordSet")

strSQL = "Select * From product where id1=" & Request.QueryString("id1")
rs.Open strSQL, Conn, 1, 3

rs("serial") = Request.form("serial")
rs("kategori") = Request.form("kategori")
rs("info_txt") = Request.form("info_txt")
rs("date") = Date()
rs.Update
%>
Rettet
<% end if %>
</html></body>