⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 lawrulesearchadd.asp

📁 又一套oa 系统,供大家使用学习,更多的源代码正在上传中,好的程序应该大家共同使用
💻 ASP
字号:
<!--#INCLUDE FILE="../HXINCLUDE/HXINCLUDEHEAD.ASP"-->
<%if WS_S.MemberPriv("WS_AnnexProgramlawrulesearch")<>1 then HX_GoBack "对不起,您的权限不够!",""
if request("action")="add" then
WS_LawRuleTitle=request("WS_LawRuleTitle"):WS_StartDate=request("WS_StartDate"):WS_StartCaseDate=request("WS_StartCaseDate"):WS_LawRuleContent=request("WS_LawRuleContent"):ColumnName="":Tablename="HX_lawruleSearch":Orderby=" where WS_LawRuleTitle='"&WS_LawRuleTitle&"'"
set rs=WS_S.HX_SetRSD(ColumnName,Tablename,Orderby)  
 if rs.recordcount>0 then
  Call HX_GoBack("此法规已存在!","")
 else
  if not isdate(WS_StartDate) or not isdate(WS_StartCaseDate) then   HX_GoBack "日期格式错误!",""
  rs.addnew:rs("WS_LawRuleTitle")=WS_LawRuleTitle:rs("WS_StartDate")=WS_StartDate:rs("WS_StartCaseDate")=WS_StartCaseDate:rs("WS_LawRuleContent")=WS_LawRuleContent:rs.update
  response.write "<script>window.opener.location.reload();if(!confirm('是否继续添加?')) window.close();else location.href='lawrulesearchadd.asp';</script>"
  response.end
 end if
WS_S.HX_RSClose rs 
end if
response.Write "<head><meta http-equiv='Content-Type' content='text/html; charset=gb2312'><title>法律法规添加</title><link rel=stylesheet type=text/css href='../HXinclude/HX_Style.css'><script src='../hxinclude/HX_function.js'></script></head><body topmargin='20' leftmargin='0' bottommargin='0'><script language='javascript'><script language='javascript'>  function check(){  var frms=document.form2;  if(frms.WS_LawRuleTitle.value=='')    {	alert('法规名称不能为空!');	frms.WS_LawRuleTitle.focus();	return false;	} if(frms.WS_StartDate.value=='')    {	alert('颁布日期不能为空!');	frms.WS_StartDate.focus();	return false;	}  if(frms.WS_StartCaseDate.value=='')    {	alert('实施日期不能为空!');	frms.WS_StartCaseDate.focus();	return false;	}	return true;  }</script><table width='380'  border='0' cellspacing='1' cellpadding='0' align=center bgcolor='#115F8F'><tr><td colspan='2' bgcolor=ffffff><table width='100%'  border='0' cellspacing='0' cellpadding='0'><tr><td height='25' background='../hximages/titleline.gif'><font class='fontmenu'>法律法规添加</font></td></tr></table><table width='100%'  border='0' cellpadding='0' cellspacing='1' bgcolor=cccccc><tr bgcolor='ffffff'><td><table width='100%'  border='0' cellspacing='1' cellpadding='2' bgcolor=A1BBE0><form name='form2' method='post' action='?action=add' onSubmit='return check();'><tr bgcolor='#FFFFFF'><td width='27%' bgcolor='#FFFFFF'><div align='right'>法规名称:</div></td><td width='73%'><input type='text' name='WS_LawRuleTitle' size=25></td></tr><tr bgcolor='#FFFFFF'><td bgcolor='#FFFFFF'><div align='right'>颁布日期:</div></td><td><input type='text' name='WS_StartDate' size=25 value='"&date&"'></td></tr><tr bgcolor='#FFFFFF'><td bgcolor='#FFFFFF'><div align='right'>实施日期:</div></td><td><input type='text' name='WS_StartCaseDate' size=25 value='"&date&"'></td></tr><tr bgcolor='#FFFFFF'><td bgcolor='#FFFFFF' valign=top><div align='right'> 具体内容: </div></td><td><textarea name='WS_LawRuleContent' cols='40' rows='15'></textarea></td></tr><tr bgcolor='#FFFFFF'><td colspan='2'><div align='right'><input type='submit' name='Submit' value=' 添 加 '>&nbsp;&nbsp;<input name='' type='reset' value=' 重 输 '>&nbsp;&nbsp;<input name='' type='button' value=' 关 闭 ' onclick='window.close();'> &nbsp;       </div></td></tr></form></table></td></tr></table></td></tr></table></td></tr></table>"%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -