📄 frm_psj_device_modify_confirm.asp
字号:
<!--#include virtual="/include/DBCon.inc"-->
<%
tarea=request.form("area")
tzsz=request.form("zsz")
deviceId=request.form("chdevice")
text1=request.form("text1")
text2=request.form("text2")
text3=request.form("text3")
text4=request.form("text4")
text5=request.form("text5")
text6=request.form("text6")
text7=request.form("text7")
text8=request.form("text8")
text9=request.form("text9")
text10=request.form("text10")
Set Rs = Server.CreateObject("ADODB.RecordSet")
SQL="select * from oil.oil_psjdv where psjdv_id='" &deviceId& "'"
rs.open SQL,conn,1,3
if text1<>"" then
rs("psjdv_name")=text1
end if
if text2<>"" then
rs("psjdv_dvid")=text2
end if
if text3<>"" then
rs("psjdv_model")=text3
end if
if text4<>"" then
rs("psjdv_count")=text4
end if
if text5<>"" then
rs("psjdv_bs_edyl")=text5
end if
if text6<>"" then
rs("psjdv_edpl")=text6
end if
if text7<>"" then
rs("psjdv_tysj")=text7
end if
if text8<>"" then
rs("psjdv_sjpl")=text8
end if
if text9<>"" then
rs("psjdv_zk")=text9
end if
if text10<>"" then
rs("psjdv_memo")=text10
end if
rs.Update
rs.close
response.redirect "frm_psj_device.asp?area=" &tarea& "&zsz=" &tzsz
%>
<!--#include virtual="/include/DBClose.inc"-->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -