I keep getting a error i still cannot update. I dont know whats wrong??
UPDATE Login SET Staffid ='Staff C', Staffpass ='password', Department ='IT', Designation ='Lecturer', Room ='L544', Telephone ='62258930', Handphone ='98863246', Email ='staffc@nyp.com', WHERE Staffid = 'Staff C' Syntax error in UPDATE statement.No update permissions!
<html>
<body background="image/chatback.jpg" text="white">
<h2>Update Record</h2>
<%
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open(Server.Mappath("Train.mdb"))
if Request.form("room")="" then
set rs=Server.CreateObject("ADODB.Recordset")
rs.open "SELECT * FROM Login WHERE Staffid='" & session("userid2") & "'",conn
%>
<form method="post" action="editpro.asp">
<table>
<%for each x in rs.Fields%>
<tr>
<td><%=x.name%></td>
<td><input name="<%=x.name%>" value="<%=x.value%>"></td>
<%next%>
</tr>
</table>
<br /><br />
<input type="submit" value="Update record">
</form>
<%
else
sql="UPDATE Login SET "
sql=sql & "Staffid ='" & Request.Form("Staffid") & "', "
sql=sql & "Staffpass ='" & Request.Form("Staffpass") & "', "
sql=sql & "Department ='" & Request.Form("Department") & "', "
sql=sql & "Designation ='" & Request.Form("Designation") & "', "
sql=sql & "Room ='" & Request.Form("Room") & "', "
sql=sql & "Telephone ='" & Request.Form("Telephone") & "', "
sql=sql & "Handphone ='" & Request.Form("Handphone") & "', "
sql=sql & "Email ='" & Request.Form("Email") & "', "
sql=sql & " WHERE Staffid = '" & session("userid2") & "'"
on error resume next
conn.Execute sql
if err<>0 then
response.write(sql &" "& err.description & "No update permissions!")
else
response.write("<font color='white'><br>Record Updated</font>")
end if
end if
conn.close
%>
</body>
</html>
UPDATE Login SET Staffid ='Staff C', Staffpass ='password', Department ='IT', Designation ='Lecturer', Room ='L544', Telephone ='62258930', Handphone ='98863246', Email ='staffc@nyp.com', WHERE Staffid = 'Staff C' Syntax error in UPDATE statement.No update permissions!
<html>
<body background="image/chatback.jpg" text="white">
<h2>Update Record</h2>
<%
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open(Server.Mappath("Train.mdb"))
if Request.form("room")="" then
set rs=Server.CreateObject("ADODB.Recordset")
rs.open "SELECT * FROM Login WHERE Staffid='" & session("userid2") & "'",conn
%>
<form method="post" action="editpro.asp">
<table>
<%for each x in rs.Fields%>
<tr>
<td><%=x.name%></td>
<td><input name="<%=x.name%>" value="<%=x.value%>"></td>
<%next%>
</tr>
</table>
<br /><br />
<input type="submit" value="Update record">
</form>
<%
else
sql="UPDATE Login SET "
sql=sql & "Staffid ='" & Request.Form("Staffid") & "', "
sql=sql & "Staffpass ='" & Request.Form("Staffpass") & "', "
sql=sql & "Department ='" & Request.Form("Department") & "', "
sql=sql & "Designation ='" & Request.Form("Designation") & "', "
sql=sql & "Room ='" & Request.Form("Room") & "', "
sql=sql & "Telephone ='" & Request.Form("Telephone") & "', "
sql=sql & "Handphone ='" & Request.Form("Handphone") & "', "
sql=sql & "Email ='" & Request.Form("Email") & "', "
sql=sql & " WHERE Staffid = '" & session("userid2") & "'"
on error resume next
conn.Execute sql
if err<>0 then
response.write(sql &" "& err.description & "No update permissions!")
else
response.write("<font color='white'><br>Record Updated</font>")
end if
end if
conn.close
%>
</body>
</html>