<!--#include file="conn.asp" -->
<%On Error Resume Next%>
<%
if session("AdminName")="" then
	response.Write "<script language='javascript'>alert('网络超时或您还没有登陆！');window.location.href='index.asp';</script>"
	response.End
else
	if session("flag")>1 then
	response.Write "<script LANGUAGE='javascript'>alert('您没有此项目管理权限！请于管理员联系!!!');window.location.href='admin.asp';</script>"
response.End
end if
end if 
%>
<%
id=request("id")
xtp=request("xtp")
f01=request("f01")
f03=request("f03")
f04=request("f04")
f05=request("f05")
f06=request("f06")
f07=request("f07")
f08=request("f08")
f09=request("f09")
f10=request("f10")
f11=request("f11")
f12=request("f12")
f13=request("f13")
f14=request("f14")
f15=request("f15")
f16=request("f16")
f17=request("f17")
f18=request("f18")
f19=request("f19")
f20=request("f20")
f21=request("f21")
f22=request("f22")
f23=request("f23")
f22=request("f22")
f23=request("f23")
f24=request("f24")
f25=request("f25")
f26=request("f26")
f27=request("f27")
f28=request("f28")
f29=request("f29")
f30=request("f30")
jrzx=request("jrzx")
jyhc=request("jyhc")
f31=request("f31")
f01=session("f01")
f32=request("f32")
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from huiyuan where id="&id&"",conn,1,2
if f03<>"" then rs("f03")=f03
rs("qx")="会员"
if f04<>"" then rs("f04")=f04
if f05<>"" then rs("f05")=f05
if f06<>"" then rs("f06")=f06
if f07<>"" then rs("f07")=f07
if f08<>"" then rs("f08")=f08
if f09<>"" then rs("f09")=f09
if f10<>"" then rs("f10")=f10
if f11<>"" then rs("f11")=f11
if f12<>"" then rs("f12")=f12
if f13<>"" then rs("f13")=f13
if f14<>"" then rs("f14")=f14
if f15<>"" then rs("f15")=f15
if f16<>"" then rs("f16")=f16
if f17<>"" then rs("f17")=f17
if f18<>"" then rs("f18")=f18
if f19<>"" then rs("f19")=f19
if f20<>"" then rs("f20")=f20
if f21<>"" then rs("f21")=f21
if f22<>"" then rs("f22")=f22
if f23<>"" then rs("f23")=f23
if f24<>"" then rs("f24")=f24
if f25<>"" then rs("f25")=f25
if f26<>"" then rs("f26")=f26
if f27<>"" then rs("f27")=f27
if f28<>"" then rs("f28")=f28
if f29<>"" then rs("f29")=f29
if f30<>"" then rs("f30")=f30
if f31<>"" then rs("f31")=f31
if f32<>"" then rs("f32")=f32
if xtp<>"" then rs("xtp")=xtp
if jrzx<>"" then rs("jrzx")=jrzx
if jyhc<>"" then rs("jyhc")=jyhc
rs.update
%>
<script>
alert("修改成功！")
window.location.href="huiyuan.asp";
</script>
