📄 useinsert7.asp
字号:
<!--#include file=.../conn.asp-->
<!--#include file=getlevel.asp-->
<%
'获得轻武器动用信息
macname3=request.form("macname3")
gbnum3=request.form("mmac1")
zsnum3=request.form("mmac2")
principal3=request.form("mmac3")
maintainthing3=request.form("mmac4")
problem3=request.form("mmac5")
maintaindate3=request.form("mmac6")
sanctifier3=request.form("mmac7")
remark3=request.form("mmac8")
%>
<html>
<body bgcolor="#567D30">
<%
adddate=cstr(cint(year(date()))*10000+cint(month(date()))*100+cint(day(date())))
kind="轻武器"
if (gbnum3="") then
gbnum3="0"
end if
if (zsnum3="") then
zsnum3="0"
end if
'判断是否已经存在该设备的信息
sql="select * from h_check where level1='"&level1&"' and level2='"&level2&"' and level3='"&level3&"' and level4='"&level4&"' and name3='"&macname3&"' and ttime='"&adddate&"'"
set rs=conn.Execute(sql)
if not rs.bof or not rs.eof then
response.write "<script language='javascript'>"
response.write "alert('记录已经录入!');"
response.write "history.go(-1);"
response.write "</script>"
response.end
rs.close
set rs=nothing
else
%>
<%
sz="'"&macname3&_
"','"&gbnum3&_
"','"&zsnum3&_
"','"&principal3&_
"','"&maintainthing3&_
"','"&problem3&_
"','"&maintaindate3&_
"','"&sanctifier3&_
"','"&remark3&_
"','"&adddate&_
"','"&kind&_
"','"&level1&_
"','"&level2&_
"','"&level3&_
"','"&level4&_
"'"
sql="insert into h_check(name3,gbnum,zsnum,charger,mainthing,problem,maintaintime,checker,memo,ttime,kind,level1,level2,level3,level4)values("&sz&")"
'response.Write(sql)
'response.End()
conn.execute(sql)
%>
<%
response.write "<script language='javascript'>"
response.write "alert('录入成功!');"
response.write "history.go(-1);"
response.write "</script>"
response.end
%>
<%
conn.close
end if
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -