if check_power("权限管理")=0 then
response.redirect("/login/check_false.asp")
else%> set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = "dsn=hotel;"
Recordset1.Source = "SELECT * FROM db_worker where id="&request.form("id")
'Recordset1.Source = "SELECT * FROM db_worker"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 3
Recordset1.Open
Recordset1_numRows = 0
%> set rsfields=Recordset1.fields
for i=0 to rsfields.count-1
if left(rsfields(i).name,2)="p_" then
if request.form(rsfields(i).name)"" then
rsfields(i).value=1
else
rsfields(i).value=0
end if
end if
next
Recordset1.update
Recordset1.close
%> response.redirect("worker_show.asp")
%>
