erikjacobsen> jeg har arbejdet videre med din løsning, men der kommer følgende fejl nu.: Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'Id='.
/o-main/update_opskrift.asp, line 28
************************************************
Filerne er som følger:
Formular-filen:
<%
If Session("alogin") <> True Then
Response.Redirect "default2.asp?m=adminlogin"
End If
%>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("../db/opskrifter.mdb")
strSQL = "Select * FROM opskrifter Where Id = " & Request.Querystring("Id")
set rs = Conn.execute(strSQL)
if rs.EOF then
Response.write "Der er ingen indlæg i DB!"
else
Do until rs.EOF
%>
<table width="700" border="0" cellpadding="0" cellspacing="0" align="left">
<tr>
<td width="700" align="left" valign="top" ><font class="header" color="707F2B" face="verdana" size="5" >Opret opskrift</font> <br><br><font class="artikel" face="verdana" size="2" >Opret din opskrift, så andre også kan få glæde af den :-) </font><br><br></tr>
<tr>
<td width="700" align="left" valign="top">
<form method="post" action="default2.asp?m=update_opskrift" onsubmit="return validering(this);" ENCTYPE="multipart/form-data">
<div class="artikel">
<table>
<td>
<input type="hidden" name="id" value="<%=RS("Id")%>">
<font class="artikel-right" face="verdana" >Kategori<br>
<select size="1" name="kategori" >
<option selected="selected"><%=RS("kategori")%></option>
<option>Snack</option>
<option>Forret</option>
<option>Hovedret</option>
<option>Dessert</option>
<option>Bagværk</option>
<option>Suppe</option>
<option>Grill</option>
<option>Tilbehør</option>
<option>Drinks</option>
</select><br></font><br></td>
<td> </td>
<td>
<font class="artikel-right" face="verdana" >Antal<br>
<select size="1" name="antal" >
<option selected="selected"><%=RS("antal")%></option>
<option>1</option>
<option>2</option>
<option>3</option>
<option>4</option>
<option>5</option>
<option>6</option>
<option>7</option>
<option>8</option>
<option>9</option>
<option>10</option>
<option>11</option>
<option>12</option>
<option>13</option>
<option>14</option>
<option>15</option>
<option>16</option>
<option>17</option>
<option>18</option>
<option>19</option>
<option>20</option>
<option>21</option>
<option>22</option>
<option>23</option>
<option>24</option>
<option>-</option>
</select><br></font><br>
</td>
<td> </td>
<td>
<font class="artikel-right" face="verdana" >Personer / Stk.<br>
<select size="1" name="perstk">
<option selected="selected"><%=RS("perstk")%></option>
<option>stk.:</option>
</select><br></font><br>
</td>
</table>
<font face="verdana" size="1" >Navn på ret:<br>
<input type="text" size="30" maxlength="45" name="navn" value="<%=RS("navn")%>"></font><br>
<font face="verdana" size="1" >Ingredienser:</font><br>
<textarea rows="8" name="ingredienser" cols="50" tabindex="4"><%=RS("ingredienser")%></textarea><br><br>
<font face="verdana" size="1" >Sådan gør du:<br>
<textarea rows="8" name="ingredienser" cols="50" tabindex="4"><%=RS("vejledning")%></textarea></font><br><br
<font face="verdana" size="1" >Tilbehør:<br>
<input type="text" size="40" value="<%=RS("tilbehoer")%>" maxlength="40" name="tilbehoer"></font><br><br>
<font face="verdana" size="1" >Tips:<br>
<input type="text" size="40" maxlength="40" name="tips" value="<%=RS("tips")%>"></font><br>
<font face="verdana" size="1" >Hvor kommer opskriften fra?<br>
<input type="text" size="40" maxlength="40" name="hvorfra" value="<%=RS("hvorfra")%>"></font><br>
<font face="verdana" size="1" >Billede<br>
<INPUT TYPE="file" NAME="FILE1" value="<%=RS("FILE1")%>" SIZE="50"><br><br>
<!-- <font face="verdana" size="1" >Oprettet af:<br> -->
<!-- <input type="text" size="25" maxlength="25" name="afhvem"></font><br> -->
<input type="hidden" name="afhvem" value="<%=RS("afhvem")%>" size="50" value="<%=session("brugernavn")%>">
<input type="submit" value="Opdater/slet" ><input type="reset" value="Slet"><br><br>
<% RS.movenext
Loop
End if
Conn.Close
Set Conn = Nothing %>
<a href="java script:history.go('-1')">Tilbage</a><br><br>
<a href="default2.asp?m=logoff">Log af</a>
</td>
</form>
</table></div>
******************************************
Updatefilen:
<html>
<head>
<title>Opdater</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
<%
id = Request.Form("id")
kategori = Request.Form("kategori")
antal = Request.Form("antal")
perstk = Request.Form("perstk")
navn = Request.Form("navn")
ingredienser = Request.Form("ingredienser")
vejledning = Request.Form("vejledning")
tilbehoer = Request.Form("tilbehoer")
tips = Request.Form("tips")
hvorfra = Request.Form("hvorfra")
FILE1 = Request.Form("FILE1")
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("../db/opskrifter.mdb")
Conn.Open DSN
strSQL = ("UPDATE opskrifter SET kategori='" & kategori & "', antal='" & antal & "', perstk='" & perstk & "', navn='" & navn & "', ingredienser='" & ingredienser & "', vejledning='" & vejledning & "', Tilbehoer='" & tilbehoer & "', tips='" & tips & "', hvorfra='" & hvorfra & "', FILE1='" & FILE1 & "' WHERE Id=" & id)
Conn.Execute(strSQL)
Conn.Close
Set Conn = Nothing
response.write "<p><b>Din profil er blevet opdateret!</b>"
response.write "<p><a href=default.asp>Til forsiden</a>"
%>
</body>
</html>
**********************************************************
