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

📄 pro.inc.asp

📁 一个企业客户信息收集管理系统.软件下载 源码下载 站长教程 建站资讯 素材下载┆ ┆站长论坛 免费服务 虚拟主机 域名注册 免费代码┆ ┆网站评测 人才交流 酷站赏析 业界新闻 程序发布
💻 ASP
字号:
🔍 
<%
'成功提示
sub success()
response.write "<html><head><title>"&successmess&"</title><meta http-equiv=Content-Type content=text/html; charset=gb2312><meta http-equiv=refresh content='1; url="&backurl&"'><link rel=stylesheet type=text/css href=inc/soonhost.css></head>"&_
"<br><br><br><table cellpadding=3 cellspacing=0 border=1 width=400 align=center ><tr align=center>"&_
"<td class=td1 width=100% ><b>"&successmess&"</b></td></tr><tr><td class=td2 width=100% ><b>系统将自动返回</b><br></td>"&_
"</table>"
end sub


sub successclose()
response.write "<html><head><title>"&successmess&"</title><link rel=stylesheet type=text/css href=inc/xiaoziju.css></head>"&_
"<br><br><br><table cellpadding=3 cellspacing=0 border=1 width=400 align=center ><tr align=center>"&_
"<td class=td1 width=100% ><b>"&successmess&"</b></td></tr><tr><td class=td2 width=100% align=center><b><a href='ad_login.asp'>【返回新闻管理】</a></b><br></td>"&_
"</table>"
end sub


'错误提示
sub error()
response.write "<html><head><title>错误!</title><meta http-equiv=Content-Type content=text/html; charset=gb2312><link rel=stylesheet type=text/css href=inc/soonhost.css></head>"&_
"<br><br><br><table cellpadding=3 cellspacing=0 border=1 width=400 align=center ><tr align=center>"&_
"<td class=td1 width=100% ><b>错误!</b></td></tr><tr><td class=td2 width=100% ><b>错误可能原因：</b><br>"&errmsg&"</td>"&_
"</tr><tr align=center><td class=td1 width=100% > <a href=javascript:history.go(-1)> 返回</a> </td></tr></table></td></tr></table>"
end sub
%>

⌨️ 快捷键说明

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