savequanxian.asp

现代化的企业越来越重视科学技术

<meta HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<%@transaction=required%>
<!--#include file="../Inc/Config.asp" -->
<!--#include file="../Inc/dbconn.asp" -->
<!--#include file="../other/Check_Sql.asp" -->
<link href="../other/admin.css" rel="stylesheet" type="text/css">
<%
bianhao=Trim(Request("bianhao"))
spup=Request("spup")
spadd=Request("spadd")
spdel=Request("spdel")
spsc=Request("spsc")
ruku=Request("ruku")
rukushen=Request("rukushen")
rukujingbao=Request("rukujingbao")
rukulishi=Request("rukulishi")
xskaidan=Request("xskaidan")
xsshen=Request("xsshen")
xssc=Request("xssc")
xslishi=Request("xslishi")
kehuleixing=Request("kehuleixing")
kehuup=Request("kehuup")
kehuadd=Request("kehuadd")
kehudel=Request("kehudel")
kehulianxi=Request("kehulianxi")
rsdangan=Request("rsdangan")
rsadd=Request("rsadd")
rsdel=Request("rsdel")
rstongxue=Request("rstongxue")
baobiaoxs=Request("baobiaoxs")
baobiaoruku=Request("baobiaoruku")
baobiaokehu=Request("baobiaokehu")
baobiaotuxing=Request("baobiaotuxing")
xmsc=Request("xmsc")
xmpizhun=Request("xmpizhun")
xmup=Request("xmup")
xmjianyi=Request("xmjianyi")
xtfenpei=Request("xtfenpei")
xthelp=Request("xthelp")
xtyijian=Request("xtyijian")


set rst=server.CreateObject("adodb.recordset")  
sql="EXEC jxc_updatequanxian '"&bianhao&"','"&spup &"','"&spadd&"','"&spdel&"','"&spsc&"','"&ruku&"','"&rukushen&"','"&rukujingbao&"','"&rukulishi&"','"&xskaidan&"','"&xsshen&"','"&xssc&"','"&xslishi&"','"&kehuleixing&"','"&kehuup&"','"&kehuadd&"','"&kehudel&"','"&kehulianxi&"','"&rsdangan&"','"&rsadd&"','"&rsdel&"','"&rstongxue&"','"&baobiaoxs&"','"&baobiaoruku&"','"&baobiaokehu&"','"&baobiaotuxing&"','"&xmsc&"','"&xmpizhun&"','"&xmup&"','"&xmjianyi&"','"&xtfenpei&"','"&xthelp&"','"&xtyijian&"'"
rst.Open sql,Conn
set rst=nothing
call endconn ()
%>

<% sub ontrANsactioncommit()
response.write "<script language=javascript>"	'Javascript 开始
				response.write"alert('添加完毕！');"	'警告
				response.write"location.href='quanxian.asp';"	'跳转到页面
				response.write "</script>"	
end sub
%>
<%sub ontransactionabort()

response.write "对不起，添加记录出错！请联系提供商"
end sub
%>