Windows200s.iis.asp page is invalid when modifying Access records
Part of the original code is:
<% @Language = VBScript%> <% 'Determines if the user is logged in and has a system administrator IF ISEMPTY ("IssystemManager") = false tellse.redirect "../login.asp "END IF 'Connection System Database SET CONN = Server.createObject (" AdoDb.Connection ") Conn.open" Aspdata "," "" "" SET RSDEPARTMENTS = conn.execute ("Select Departmentname from Departments Order by" _ & " DEPARTMENTNAME ") SET RSTHISUSER = Conn.execute (" Select * from userinfo where loginid = '"&" ") &" ")" Modifys a user information if not iSempty (Request.form ("Modify") ) THEN 'check user's input if len (Request.form ("Request.form (" Name ") = 0 _ or Len (" Password ")) = 0 THEN Themessage = "User login name, name, password" elseconn.execute "Update UserInfo Set" _ & "EmailAddress = '" & Request.Form ("Emailaddress") & "", "_ &" department = '"& Request.form (" Department ") &", "_ &" Position =' "& Request.form (" Position ") &" "& Request.form (" INTERNALPHONE ") &" "" "_ &" homphone = '"& Request.form (" Homephone "&" "& Request.form (" Mobilephone "&" "& Request.form ("_ &" HomeAddress =' "& Request.form "HomeAddress") & "',"
_ & "Birthday = '" & Request.form ("Birthdayyear") & "-" _ & Request.form ("BirthdayMonth") & "-" _ & Request.form ("Birthdayday") & "" & "QQ = '" & Request.form ("QQ") & "'" _ & "WHERE Loginid = '" & Request.form ("Loginid") & "'" '& "IssystemManager =" & Request.Form ("IssystemManager") & "," _ '& "isfinancialmanager =" & required.form ("isfinancialManager") & "," _SET RSTHISUSER = Conn.execute ("Select * from userinfo where loginid ='" & session Temp ") &" '") Themessage =" This user information has been modified successful "end ifelse themessage =" Please modify this user information "end if%>
There is delete in this page. Adding is normal, prompts "This user information has been modified successfully", but the database is updated!
Which interester can tell me how to solve it? Thank you!
