%call log_chk()
%>
<%
dim thex,act,myodr,Keyword,npdcla,Bid,Sid,Bname,Sname
Keyword=request("Keyword")
npdcla=request("npdcla")
npdclaY=request("npdclaY")
Bid=request("Bid")
Sid=request("Sid")
Bname=request("Bname")
Sname=request("Sname")
if npdclaY<>"" then
myA=split(npdclaY,"|")
idgroup=trim(request.form("idgroup"))
if idgroup="" or isnull(idgroup) then
response.write""
response.end
end if
conn.execute("Update bdcp set cb_id="&myA(0)&",cs_id="&myA(1)&" where cxp_id in ("&idgroup&")")
conn.close
set conn=nothing
response.write""
response.end
else
response.write""
response.end
end if
%>