<!--#include file="pwd.asp" -->
<!--#include file="xmgl_conn.inc" -->
<%
cxh=request.form("txh")
cxb=request("txb")
crq=request.form("trq")
cdz=request.form("tdz")
cyb=request.form("tyb")
cdh=request.form("tdh")
ccj=request.form("tcj")
if trim(ccj)="" then
	ccj=0
end if

function sqlstr(data)
	sqlstr="'"&replace(data,"'","''")&"'"
end function

sql="update "&session("bjdm")&" set xb='"&cxb&"',rq='"&crq&"',dz="&sqlstr(cdz)&",yb='"&cyb&"',dh='"&cdh&"',cj="&cint(ccj)&" where xh='"&cxh&"'"
xmgl_conn.execute(sql)
response.redirect "xgxj1.asp"
%>