voila je suis reponsable d'un site et il y a cette page qu'on utilise comme page pour modifier le infos des utilisateur mais a chaque fois que je clique le bouton update record il ya cette erreur
Microsoft JET Database Engineerror '80040e14'Syntax error in UPDATE statement.
/adm/EditUser.asp, line 103
voici le code de la page merci de votre reponse
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="1252"%>
<%
// *** Logout the current user.
MM_Logout = String(Request.ServerVariables("URL")) + "?MM_Logoutnow=1";
if (String(Request("MM_Logoutnow"))=="1") {
Session.Contents.Remove("MM_Username");
Session.Contents.Remove("MM_UserAuthorization");
var MM_logoutRedirectPage = "default.asp";
// redirect with URL parameters (remove the "MM_Logoutnow" query param).
if (MM_logoutRedirectPage == "") MM_logoutRedirectPage = String(Request.ServerVariables("URL"));
if (String(MM_logoutRedirectPage).indexOf("?") == -1 && Request.QueryString != "") {
var MM_newQS = "?";
for (var items=new Enumerator(Request.QueryString); !items.atEnd(); items.moveNext()) {
if (String(items.item()) != "MM_Logoutnow") {
if (MM_newQS.length > 1) MM_newQS += "&";
MM_newQS += items.item() + "=" + Server.URLencode(Request.QueryString(items.item()));
}
}
if (MM_newQS.length > 1) MM_logoutRedirectPage += MM_newQS;
}
Response.Redirect(MM_logoutRedirectPage);
}
%>
<!--#include file="../Connections/NewsConn.asp" -->
<%
// *** Edit Operations: declare variables
// set the form action variable
var MM_editAction = Request.ServerVariables("SCRIPT_NAME");
if (Request.QueryString) {
MM_editAction += "?" + Server.HTMLEncode(Request.QueryString);
}
// boolean to abort record edit
var MM_abortEdit = false;
// query string to execute
var MM_editQuery = "";
%>
<%
// *** Update Record: set variables
if (String(Request("MM_update")) == "form1" &&
String(Request("MM_recordId")) != "undefined") {
var MM_editConnection = MM_NewsConn_STRING;
var MM_editTable = "Admin";
var MM_editColumn = "UserID";
var MM_recordId = "" + Request.Form("MM_recordId") + "";
var MM_editRedirectUrl = "MenuUtilisateur.asp";
var MM_fieldsStr = "Password|value|Prenom|value|nom|value|Description|value|Level|value|DenyRubriquesAddRemove|value|DenyPageAddRemove|value|Suspendu|value";
var MM_columnsStr = "Password|',none,''|Prenom|',none,''|Nom|',none,''|Description|',none,''|UserLevel|none,none,NULL|DenyRubriquesAddRemove|none,1,0|DenyPageAddRemove|none,1,0|Suspendu|none,1,0";
// create the MM_fields and MM_columns arrays
var MM_fields = MM_fieldsStr.split("|");
var MM_columns = MM_columnsStr.split("|");
// set the form values
for (var i=0; i+1 < MM_fields.length; i+=2) {
MM_fields[i+1] = String(Request.Form(MM_fields[i]));
}
// append the query string to the redirect URL
if (MM_editRedirectUrl && Request.QueryString && Request.QueryString.Count > 0) {
MM_editRedirectUrl += ((MM_editRedirectUrl.indexOf('?') == -1)?"?":"&") + Request.QueryString;
}
}
%>
<%
// *** Update Record: construct a sql update statement and execute it
if (String(Request("MM_update")) != "undefined" &&
String(Request("MM_recordId")) != "undefined") {
// create the sql update statement
MM_editQuery = "update " + MM_editTable + " set ";
for (var i=0; i+1 < MM_fields.length; i+=2) {
var formVal = MM_fields[i+1];
var MM_typesArray = MM_columns[i+1].split(",");
var delim = (MM_typesArray[0] != "none") ? MM_typesArray[0] : "";
var altVal = (MM_typesArray[1] != "none") ? MM_typesArray[1] : "";
var emptyVal = (MM_typesArray[2] != "none") ? MM_typesArray[2] : "";
if (formVal == "" || formVal == "undefined") {
formVal = emptyVal;
} else {
if (altVal != "") {
formVal = altVal;
} else if (delim == "'") { // escape quotes
formVal = "'" + formVal.replace(/'/g,"''") + "'";
} else {
formVal = delim + formVal + delim;
}
}
MM_editQuery += ((i != 0) ? "," : "") + MM_columns[i] + " = " + formVal;
}
MM_editQuery += " where " + MM_editColumn + " = " + MM_recordId;
if (!MM_abortEdit) {
// execute the update
var MM_editCmd = Server.CreateObject('ADODB.Command');
MM_editCmd.ActiveConnection = MM_editConnection;
MM_editCmd.CommandText = MM_editQuery;
MM_editCmd.Execute();
MM_editCmd.ActiveConnection.Close();
if (MM_editRedirectUrl) {
Response.Redirect(MM_editRedirectUrl);
}
}
}
%>
<%
var AdminSet__MMColParam = "1";
if (String(Request.QueryString("UserID")) != "undefined" &&
String(Request.QueryString("UserID")) != "") {
AdminSet__MMColParam = String(Request.QueryString("UserID"));
}
%>
<%
var AdminSet = Server.CreateObject("ADODB.Recordset");
AdminSet.ActiveConnection = MM_NewsConn_STRING;
AdminSet.Source = "SELECT * FROM Admin WHERE UserID = "+ AdminSet__MMColParam.replace(/'/g, "''") + "";
AdminSet.CursorType = 0;
AdminSet.CursorLocation = 2;
AdminSet.LockType = 1;
AdminSet.Open();
var AdminSet_numRows = 0;
%>
<%
var UserLevel = Server.CreateObject("ADODB.Recordset");
UserLevel.ActiveConnection = MM_NewsConn_STRING;
UserLevel.Source = "SELECT * FROM UserLevel";
UserLevel.CursorType = 0;
UserLevel.CursorLocation = 2;
UserLevel.LockType = 1;
UserLevel.Open();
var UserLevel_numRows = 0;
%>
<%
var UserInfo__MMColParam = "1";
if (String(Session("MM_Username")) != "undefined" &&
String(Session("MM_Username")) != "") {
UserInfo__MMColParam = String(Session("MM_Username"));
}
%>
<%
var UserInfo = Server.CreateObject("ADODB.Recordset");
UserInfo.ActiveConnection = MM_NewsConn_STRING;
UserInfo.Source = "SELECT * FROM Admin WHERE UserName = '"+ UserInfo__MMColParam.replace(/'/g, "''") + "'";
UserInfo.CursorType = 0;
UserInfo.CursorLocation = 2;
UserInfo.LockType = 1;
UserInfo.Open();
var UserInfo_numRows = 0;
%>
<%
var Repeat1__numRows = -1;
var Repeat1__index = 0;
AdminSet_numRows += Repeat1__numRows;
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Menu Securité>Modification Utilisateur</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<style type="text/css">
<!--
.style1 {
font-family: Geneva, Arial, Helvetica, sans-serif;
font-size: 24px;
}
.style2 {
font-family: Arial, Helvetica, sans-serif;
font-weight: bold;
}
.style8 {font-family: Geneva, Arial, Helvetica, sans-serif; font-weight: bold; }
.style6 {font-family: Arial, Helvetica, sans-serif}
.style9 {font-family: Arial, Helvetica, sans-serif; font-size: 12px; }
.style3 {font-family: Arial, Helvetica, sans-serif; font-weight: bold; color: #FFFFFF; }
.style4 {color: #FFFFFF}
.style19 {font-size: 14}
-->
</style>
<link href="Header.css" rel="stylesheet" type="text/css">
</head>
<body>
<table width="100%" border="0" bgcolor="#0066FF">
<tr>
<td colspan="2"><span class="style3"><a href="Menu.asp">Gestionaire Articles</a>:: <a href="MenuUtilisateur.asp">Men Utilisateur :</a>: Modification </span></td>
<td width="22%" class="style3"><a href="<%= MM_Logout %>">LOGOUT</a></td>
</tr>
<tr>
<td width="65%"><span class="style4">Utilisateur: <%=(UserInfo.Fields.Item("UserName").Value)%></span></td>
<td width="13%"><span class="style4"></span></td>
<td><span class="style4"></span></td>
</tr>
<tr>
<td><span class="style4">Nom :<%=(UserInfo.Fields.Item("Prenom").Value)%> <%=(UserInfo.Fields.Item("Nom").Value)%> </span></td>
<td><span class="style4"></span></td>
<td><span class="style4"></span></td>
</tr>
</table>
<p class="style1"><br>
</p>
<form method="POST" action="<%=MM_editAction%>" name="form1">
<table align="center">
<tr valign="baseline">
<td align="right" nowrap class="style6">User ID:</td>
<td><%=(AdminSet.Fields.Item("UserID").Value)%>
</td>
</tr>
<tr valign="baseline">
<td align="right" nowrap class="style6">Utilisateur:</td>
<td><%=(AdminSet.Fields.Item("UserName").Value)%>
</td>
</tr>
<tr valign="baseline">
<td align="right" nowrap class="style6">Mot de passe:</td>
<td>
<input type="password" name="Password" value="<%=(AdminSet.Fields.Item("Password").Value)%>" size="32">
</td>
</tr>
<tr valign="baseline">
<td align="right" nowrap class="style6">Prénom:</td>
<td>
<input type="text" name="Prenom" value="<%=(AdminSet.Fields.Item("Prenom").Value)%>" size="32">
</td>
</tr>
<tr valign="baseline">
<td align="right" nowrap class="style6">nom:</td>
<td>
<input type="text" name="nom" value="<%=(AdminSet.Fields.Item("nom").Value)%>" size="32">
</td>
</tr>
<tr valign="baseline">
<td align="right" nowrap class="style6">Description:</td>
<td>
<input type="text" name="Description" value="<%=(AdminSet.Fields.Item("Description").Value)%>" size="32">
</td>
</tr>
<tr valign="baseline">
<td align="right" nowrap class="style6">Niveaul:</td>
<td>
<select name="Level" size="1" id="Level">
<%
while (!UserLevel.EOF) {
%>
<option value="<%=(UserLevel.Fields.Item("UserLevel").Value)%>" <%=((UserLevel.Fields.Item("UserLevel").Value == (AdminSet.Fields.Item("UserLevel").Value))?"SELECTED":"")%> ><%=(UserLevel.Fields.Item("Description").Value)%></option>
<%
UserLevel.MoveNext();
}
if (UserLevel.CursorType > 0) {
if (!UserLevel.BOF) UserLevel.MoveFirst();
} else {
UserLevel.Requery();
}
%>
</select>
</td>
</tr>
<tr valign="baseline">
<td align="right" nowrap class="style6"><span class="style19">Refuser Ajout/Suppression Rubriques</span>:</td>
<td>
<input <%=(((AdminSet.Fields.Item("DenyRubriquesAddRemove").Value) == 1)?"checked":"")%> type="checkbox" name="DenyRubriquesAddRemove" value=1 >
</td>
</tr>
<tr valign="baseline">
<td align="right" nowrap class="style6"><span class="style19">Refuser Ajout/Suppression Pages:</span></td>
<td>
<input <%=(((AdminSet.Fields.Item("DenyPageAddRemove").Value) == 1)?"checked":"")%> type="checkbox" name="DenyPageAddRemove" value=1 >
</td>
</tr>
<tr valign="baseline">
<td align="right" nowrap class="style6">Compte utilisateur Bloquer:</td>
<td>
<input <%=(((AdminSet.Fields.Item("Suspendu").Value) == 1)?"checked":"")%> type="checkbox" name="Suspendu" value=1 >
</td>
</tr>
<tr valign="baseline">
<td align="right" nowrap class="style6"> </td>
<td>
<input type="submit" name="Submit" value="Update record">
</td>
</tr>
</table>
<input type="hidden" name="MM_update" value="form1">
<input type="hidden" name="MM_recordId" value="<%= AdminSet.Fields.Item("UserID").Value %>">
</form>
<p> </p>
</body>
</html>
<%
AdminSet.Close();
%>
<%
UserLevel.Close();
%>
<%
UserInfo.Close();
%>