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

📄 weburlsearchadd.asp

📁 又一套oa 系统,供大家使用学习,更多的源代码正在上传中,好的程序应该大家共同使用
💻 ASP
字号:
<!--#INCLUDE FILE="../HXINCLUDE/HXINCLUDEHEAD.ASP"-->
<%if WS_S.MemberPriv("WS_SystemSetweburl")<>1 then HX_GoBack "对不起,您的权限不够!",""
if request("action")="add" then
WS_WebSearchName=request("WS_WebSearchName"):WS_WebSearchUrl=request("WS_WebSearchUrl"):WS_webUrlContent=request("WS_webUrlContent"):ColumnName="":Tablename="HX_WebUrlSearch"
Orderby=" where WS_WebSearchName='"&WS_WebSearchName&"' and WS_WebSearchUrl='"&WS_WebSearchUrl&"' and WS_webUrlContent='"&WS_webUrlContent&"'"
set rs=WS_S.HX_SetRSD(ColumnName,Tablename,Orderby)  
 if rs.recordcount>0 then
  HX_GoBack "此号码已存在!","" 
 else
  rs.addnew:rs("WS_WebSearchName")=WS_WebSearchName:rs("WS_WebSearchUrl")=WS_WebSearchUrl:rs("WS_webUrlContent")=WS_webUrlContent:rs.update
  response.write "<script>window.opener.location.reload();if(!confirm('是否继续添加?')) window.close();else location.href='weburlsearchadd.asp';</script>"
  response.end
 end if
 Call WS_S.HX_RSClose(rs)
end ifd
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'> function check(){  var frms=document.form2;  if(frms.WS_WebSearchName.value=='')    {	alert('网站名称不能为空!');	frms.WS_WebSearchName.focus();	return false;	}  if(frms.WS_WebSearchUrl.value=='')    {	alert('网站地址不能为空!');	frms.WS_WebSearchUrl.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='26%' bgcolor='#f1f1f1'><div align='right'>网站名称:</div></td><td width='74%' bgcolor='#f1f1f1'><input type='text' name='WS_WebSearchName' size=25></td></tr><tr bgcolor='#FFFFFF'><td bgcolor='#f1f1f1'><div align='right'>网站地址:</div></td><td bgcolor='#f1f1f1'><input type='text' name='WS_WebSearchUrl' size=25></td></tr><tr bgcolor='#FFFFFF'><td bgcolor='#f1f1f1' valign=top><div align='right'> 网站说明: </div></td><td bgcolor='#f1f1f1'><textarea name='WS_webUrlContent' cols='40' rows='10' class='bgline'></textarea></td></tr><tr bgcolor='#f1f1f1'><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 + -