frm_psj_basic_modify_confirm.asp

一套石油公司内部的运营管理系统

<!--#include virtual="/include/DBCon.inc"-->
<%
	psj_basicId=request.form("chpsj_basic")
	text1=request.form("text1")
	text2=request.form("text2")
	text3=request.form("text3")
	text4=request.form("text4")
	text5=request.form("text5")
	text7=request.form("text7")
	text8=request.form("text8")
	text9=request.form("text9")
	text10=request.form("text10")
	text11=request.form("text11")
	text12=request.form("text12")
	text13=request.form("text13")
	text14=request.form("text14")
	text15=request.form("text15")
	text16=request.form("text16")
	text17=request.form("text17")
	Set Rs = Server.CreateObject("ADODB.RecordSet")
	SQL="select * from oil.oil_psj where psj_id='" &psj_basicId& "'"
	rs.open SQL,conn,1,3
	if text1<>"" then
		rs("psj_name")=text1 
	end if
	if text2<>"" then
		rs("psj_where")=text2  
	end if
	if text3<>"" then
		rs("psj_date")=text3  
	end if
	if text4<>"" then
		rs("psj_des_yl")=text4  
	end if
	if text5<>"" then
		rs("psj_des_zsl")=text5 
	end if
	if text7<>"" then
		rs("psj_gs_gsg")=text7 
	end if
	if text8<>"" then
		rs("psj_gs_gsl")=text8  
	end if
	if text9<>"" then
		rs("psj_sc_zsj")=text9 
	end if
	if text11<>"" then
		rs("psj_sc_zsl")=text10  
	end if
	if text11<>"" then
		rs("psj_sc_lc")=text11  
	end if
	if text12<>"" then
		rs("psj_sc_fsq")=text12  
	end if
	if text13<>"" then
		rs("psj_sc_azfs")=text13  
	end if
	if text14<>"" then
		rs("psj_sc_tz")=text14  
	end if
	if text15<>"" then
		rs("psj_sc_ktz")=text15  
	end if
	if text16<>"" then
		rs("psj_sc_ktzpj")=text16  
	end if
	if text17<>"" then
		rs("psj_memo")=text17  
	end if
	rs.Update 
	rs.close
	response.redirect "frm_psj_basic.asp"
%>
<!--#include virtual="/include/DBClose.inc"-->