response.Write "alert('网络超时或您还没有登陆！');window.location.href='login.asp';"
response.End
else
if session("flag")>1 then
response.Write "您没有此项目管理权限！"
response.End
end if
end if
dim ziduanid,ziduanorder,ziduanname,ziduanno,i
if request("action")="update" then
for i=1 to request.form("ziduanid").count
ziduanid=replace(request.form("ziduanid")(i),"'","")
ziduanname=replace(request.form("ziduanname")(i),"'","")
conn.execute("update ziduan set ziduanname='"&ziduanname&"' where id="&ziduanid)
next
conn.close
set conn=nothing
response.write "alert('字段设置成功！');window.location.href='ziduanmanage.asp';"
end if
%>
