📄 afgl_cy_ry_dj.asp
字号:
<!--#include file="WNP_INCLUDE.ASP" -->
<div align="center">
<input type="button" name="Submit" value="新 增" onClick="location.href='?action=addIF';">
</div>
<script language="javascript">
<!--
function checkForm(){
if(form1.CY_RY_DJ_1.value == ""){
alert("序号不能为空！");
form1.CY_RY_DJ_1.focus();
return false;
}
if(form1.CY_RY_DJ_2.value == ""){
alert("姓名不能为空！");
form1.CY_RY_DJ_2.focus();
return false;
}
}
//-->
</script>
<!--保存添加 -->
<%
sub saveAdd()
CY_RY_DJ_1 = trim(request.Form("CY_RY_DJ_1"))
CY_RY_DJ_2 = trim(request.Form("CY_RY_DJ_2"))
if CY_RY_DJ_2 ="" or CY_RY_DJ_1 = "" then
response.Write("<script language=javascript>alert('序号和姓名不能为空！');history.back();</script>")
end if
CY_RY_DJ_3 = trim(request.Form("CY_RY_DJ_3"))
CY_RY_DJ_4 = trim(request.Form("CY_RY_DJ_4"))
CY_RY_DJ_5 = trim(request.Form("CY_RY_DJ_5"))
CY_RY_DJ_6 = trim(request.Form("CY_RY_DJ_6"))
CY_RY_DJ_7 = trim(request.Form("CY_RY_DJ_7"))
CY_RY_DJ_8 = trim(request.Form("CY_RY_DJ_8"))
CY_RY_DJ_9 = trim(request.Form("CY_RY_DJ_9"))
CY_RY_DJ_10 = trim(request.Form("CY_RY_DJ_10"))
CY_RY_DJ_11 = trim(request.Form("CY_RY_DJ_11"))
CY_RY_DJ_12 = date()
sql = "select * from AFGL_CY_RY_DJ where CY_RY_DJ_2 = '"&CY_RY_DJ_2&"'"
rs.open sql,conn,1,1
if not rs.eof then
rs.close
response.Write("<script language=javascript>alert('名称重复！');location.href='?';</script>")
else
rs.close
sql = "select * from AFGL_CY_RY_DJ"
rs.open sql,conn,1,3
rs.addnew
if CY_RY_DJ_1 <> "" then
rs("CY_RY_DJ_1") = CY_RY_DJ_1
end if
if CY_RY_DJ_2 <> "" then
rs("CY_RY_DJ_2") = CY_RY_DJ_2
end if
if CY_RY_DJ_3 <> "" then
rs("CY_RY_DJ_3") = CY_RY_DJ_3
end if
if CY_RY_DJ_4 <> "" then
rs("CY_RY_DJ_4") = CY_RY_DJ_4
end if
if CY_RY_DJ_5 <> "" then
rs("CY_RY_DJ_5") = CY_RY_DJ_5
end if
if CY_RY_DJ_6 <> "" then
rs("CY_RY_DJ_6") = CY_RY_DJ_6
end if
if CY_RY_DJ_7 <> "" then
rs("CY_RY_DJ_7") = CY_RY_DJ_7
end if
if CY_RY_DJ_8 <> "" then
rs("CY_RY_DJ_8") = CY_RY_DJ_8
end if
if CY_RY_DJ_9 <> "" then
rs("CY_RY_DJ_9") = CY_RY_DJ_9
end if
if CY_RY_DJ_10 <> "" then
rs("CY_RY_DJ_10") = CY_RY_DJ_10
end if
if CY_RY_DJ_11 <> "" then
rs("CY_RY_DJ_11") = CY_RY_DJ_11
end if
if CY_RY_DJ_12 <> "" then
rs("CY_RY_DJ_12") = CY_RY_DJ_12
end if
rs.update
rs.close
response.Redirect("?")
end if
end sub
%>
<!-- 工程名称列表 -->
<%
sub listAll()
sql = "select * from AFGL_CY_RY_DJ where CY_RY_DJ_2 is not null order by CY_RY_DJ_1 asc"
rs.open sql,conn,1,1
if not rs.eof then
%>
<table width="760" border="1" align="center" cellpadding="5" cellspacing="0" class="FPtalbe">
<tr>
<td height="30" colspan="7" align="center"><span class="blackTitle">陕西省安全技术防范工程从业人员登记备案表（列表）</span></td>
</tr>
<tr>
<td align="center"> 序号</td>
<td align="center">姓名</td>
<td align="center">性别</td>
<td align="center"> 年龄</td>
<td align="center"> 职务</td>
<td width="70" align="center">修改</td>
<td width="70" align="center">删除</td>
</tr>
<%
do while not rs.eof
%>
<tr>
<td><%=rs("CY_RY_DJ_1")%> </td>
<td><%=rs("CY_RY_DJ_2")%> </td>
<td><%=rs("CY_RY_DJ_3")%> </td>
<td><%=rs("CY_RY_DJ_4")%> </td>
<td><%=rs("CY_RY_DJ_5")%> </td>
<td align="center"><input type="button" name="Submit" value="修改>>" onClick="location.href='?action=edit&id=<%=rs("id")%>';"></td>
<td align="center"><input type="button" name="Submit" value="删除>>" onClick="if(confirm('确认删除该条记录？')){location.href='?action=delItem&id=<%=rs("id")%>';}"></td>
</tr>
<%
rs.movenext
loop
%>
</table>
<%
else
response.Write("<p align=center>暂时没有记录，请点击""新增""按钮添加！</p>")
end if
rs.close
end sub
%>
<!-- 添加界面 -->
<%
sub addIF()
%>
<table width="760" border="1" align="center" cellpadding="5" cellspacing="0" class="FPtalbe">
<form name="form1" method="post" action="?action=saveAdd" onSubmit="return checkForm();">
<tr align="center">
<td height="30" colspan="4" class="blackTitle">陕西省安全技术防范工程从业人员登记备案表</td>
</tr>
<tr>
<td align="center">序号</td>
<td><input name="CY_RY_DJ_1" type="text" id="CY_RY_DJ_1" size="10">
<span style="color: #FF0000">*</span></td>
<td width="100" align="center">姓名</td>
<td><input name="CY_RY_DJ_2" type="text" id="CY_RY_DJ_2" size="25">
<span style="color: #FF0000">*</span></td>
</tr>
<tr>
<td align="center">性别</td>
<td><input name="CY_RY_DJ_3" type="radio" value="男" checked>
男
<input type="radio" name="CY_RY_DJ_3" value="女">
女</td>
<td align="center">年龄</td>
<td><input name="CY_RY_DJ_4" type="text" id="CY_RY_DJ_4" size="12"></td>
</tr>
<tr>
<td align="center">职务</td>
<td><input name="CY_RY_DJ_5" type="text" id="CY_RY_DJ_5" size="25"></td>
<td align="center">职称</td>
<td><input name="CY_RY_DJ_6" type="text" id="CY_RY_DJ_6" size="12"></td>
</tr>
<tr>
<td align="center">现从事工作</td>
<td colspan="3"><input name="CY_RY_DJ_7" type="text" id="CY_RY_DJ_7" size="25"></td>
</tr>
<tr>
<td align="center">所学专业</td>
<td><input name="CY_RY_DJ_8" type="text" id="CY_RY_DJ_8" size="25"></td>
<td align="center">学历</td>
<td><input name="CY_RY_DJ_9" type="text" id="CY_RY_DJ_9" size="12"></td>
</tr>
<tr>
<td align="center">备注</td>
<td colspan="3"><textarea name="CY_RY_DJ_10" cols="60" rows="4" id="CY_RY_DJ_10"></textarea> </td>
</tr>
<tr>
<td align="center">填写人</td>
<td colspan="3"><input name="CY_RY_DJ_11" type="text" id="CY_RY_DJ_11" size="25"></td>
</tr>
<tr align="center">
<td colspan="4"><input type="submit" name="Submit" value="提 交">
<input type="reset" name="Submit" value="返 回" onClick="history.back();"></td>
</tr>
</form>
</table>
<%
end sub
%>
<%
sub editIF()
sql="select * from AFGL_CY_RY_DJ where id="&trim(request.QueryString("id"))
rs.open sql,conn,1,1
if not rs.eof then
%>
<table width="760" border="1" align="center" cellpadding="5" cellspacing="0" class="FPtalbe">
<form name="form1" method="post" action="?action=saveMod&id=<%=rs("id")%>" onSubmit="return checkForm();">
<tr align="center">
<td colspan="4" class="blackTitle">陕西省安全技术防范工程从业人员登记备案表</td>
</tr>
<tr>
<td align="center">序号</td>
<td><input name="CY_RY_DJ_1" type="text" id="CY_RY_DJ_1" value="<%=rs("CY_RY_DJ_1")%>" size="10">
<span style="color: #FF0000">*</span></td>
<td width="100" align="center">姓名</td>
<td><input name="CY_RY_DJ_2" type="text" id="CY_RY_DJ_2" value="<%=rs("CY_RY_DJ_2")%>" size="25">
<span style="color: #FF0000">*</span></td>
</tr>
<tr>
<td align="center">性别</td>
<td><input name="CY_RY_DJ_3" type="radio" value="男" <%if rs("CY_RY_DJ_3")="男" then response.Write("checked")%>>
男
<input name="CY_RY_DJ_3" type="radio" value="女" <%if rs("CY_RY_DJ_3")="女" then response.Write("checked")%>>
女</td>
<td align="center">年龄</td>
<td><input name="CY_RY_DJ_4" type="text" id="CY_RY_DJ_4" value="<%=rs("CY_RY_DJ_4")%>" size="12"></td>
</tr>
<tr>
<td align="center">职务</td>
<td><input name="CY_RY_DJ_5" type="text" id="CY_RY_DJ_5" value="<%=rs("CY_RY_DJ_5")%>" size="25"></td>
<td align="center">职称</td>
<td><input name="CY_RY_DJ_6" type="text" id="CY_RY_DJ_6" value="<%=rs("CY_RY_DJ_6")%>" size="12"></td>
</tr>
<tr>
<td align="center">现从事工作</td>
<td colspan="3"><input name="CY_RY_DJ_7" type="text" id="CY_RY_DJ_7" value="<%=rs("CY_RY_DJ_7")%>" size="25"></td>
</tr>
<tr>
<td align="center">所学专业</td>
<td><input name="CY_RY_DJ_8" type="text" id="CY_RY_DJ_8" value="<%=rs("CY_RY_DJ_8")%>" size="25"></td>
<td align="center">学历</td>
<td><input name="CY_RY_DJ_9" type="text" id="CY_RY_DJ_9" value="<%=rs("CY_RY_DJ_9")%>" size="12"></td>
</tr>
<tr>
<td align="center">备注</td>
<td colspan="3"><textarea name="CY_RY_DJ_10" cols="60" rows="4" id="CY_RY_DJ_10"><%=rs("CY_RY_DJ_10")%></textarea>
</td>
</tr>
<tr>
<td align="center">填写人</td>
<td colspan="3"><input name="CY_RY_DJ_11" type="text" id="CY_RY_DJ_11" value="<%=rs("CY_RY_DJ_11")%>" size="25"></td>
</tr>
<tr align="center">
<td colspan="4"><input type="submit" name="Submit" value="修 改">
<input type="reset" name="Submit" value="返 回" onClick="history.back();"></td>
</tr>
</form>
</table>
<%
rs.close
else
rs.close
response.Write("<script language=javascript>alert('没有相关记录！');history.back();</script>")
end if
end sub
%>
<%
sub saveMod()
CY_RY_DJ_1 = trim(request.Form("CY_RY_DJ_1"))
CY_RY_DJ_2 = trim(request.Form("CY_RY_DJ_2"))
if CY_RY_DJ_2 ="" or CY_RY_DJ_1 = "" then
response.Write("<script language=javascript>alert('序号和姓名不能为空！');history.back();</script>")
end if
CY_RY_DJ_3 = trim(request.Form("CY_RY_DJ_3"))
CY_RY_DJ_4 = trim(request.Form("CY_RY_DJ_4"))
CY_RY_DJ_5 = trim(request.Form("CY_RY_DJ_5"))
CY_RY_DJ_6 = trim(request.Form("CY_RY_DJ_6"))
CY_RY_DJ_7 = trim(request.Form("CY_RY_DJ_7"))
CY_RY_DJ_8 = trim(request.Form("CY_RY_DJ_8"))
CY_RY_DJ_9 = trim(request.Form("CY_RY_DJ_9"))
CY_RY_DJ_10 = trim(request.Form("CY_RY_DJ_10"))
CY_RY_DJ_11 = trim(request.Form("CY_RY_DJ_11"))
CY_RY_DJ_12 = date()
sql = "select * from AFGL_CY_RY_DJ where CY_RY_DJ_2 = '"&CY_RY_DJ_2&"' and id<>"&trim(request.QueryString("id"))
rs.open sql,conn,1,1
if not rs.eof then
rs.close
response.Write("<script language=javascript>alert('名称重复！');location.href='?';</script>")
else
rs.close
sql = "select * from AFGL_CY_RY_DJ where id="&trim(request.QueryString("id"))
rs.open sql,conn,1,3
if CY_RY_DJ_1 <> "" then
rs("CY_RY_DJ_1") = CY_RY_DJ_1
end if
if CY_RY_DJ_2 <> "" then
rs("CY_RY_DJ_2") = CY_RY_DJ_2
end if
if CY_RY_DJ_3 <> "" then
rs("CY_RY_DJ_3") = CY_RY_DJ_3
end if
if CY_RY_DJ_4 <> "" then
rs("CY_RY_DJ_4") = CY_RY_DJ_4
end if
if CY_RY_DJ_5 <> "" then
rs("CY_RY_DJ_5") = CY_RY_DJ_5
end if
if CY_RY_DJ_6 <> "" then
rs("CY_RY_DJ_6") = CY_RY_DJ_6
end if
if CY_RY_DJ_7 <> "" then
rs("CY_RY_DJ_7") = CY_RY_DJ_7
end if
if CY_RY_DJ_8 <> "" then
rs("CY_RY_DJ_8") = CY_RY_DJ_8
end if
if CY_RY_DJ_9 <> "" then
rs("CY_RY_DJ_9") = CY_RY_DJ_9
end if
if CY_RY_DJ_10 <> "" then
rs("CY_RY_DJ_10") = CY_RY_DJ_10
end if
if CY_RY_DJ_11 <> "" then
rs("CY_RY_DJ_11") = CY_RY_DJ_11
end if
if CY_RY_DJ_12 <> "" then
rs("CY_RY_DJ_12") = CY_RY_DJ_12
end if
rs.update
rs.close
response.Redirect("?")
end if
end sub
%>
<%
sub delItem()
sql="delete from AFGL_CY_RY_DJ where id="&trim(request.QueryString("id"))
conn.execute(sql)
response.Write("<script language=javascript>alert('删除成功！');location.href='?';</script>")
end sub
%>
<!-- 页面流程 -->
<%
action = request.QueryString("action")
Select Case action
Case "addIF"
call addIF()
Case "saveAdd"
call saveAdd()
Case "edit"
call editIF()
Case "saveMod"
call saveMod()
Case "delItem"
call delItem()
Case Else
call listAll()
End Select
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -