📄 site.asp
字号:
<%
'定义提示文本，并禁止缓存
Const Text1="<html><head><meta http-equiv=Content-Type content=text/html; charset=gb2312><title>提示</title><meta http-equiv=pragma content=no-cache>"
Const Text2="</head><body></body></html>"
'定义一个弹出提示框并返回上页的函数
sub setAlert(str)
response.write Text1&"<SCRIPT language=JavaScript>alert('"&str&"');javascript:history.go(-1)</SCRIPT>"&Text2
response.end
end sub
'定义一个弹出提示框并返回上上页的函数
sub setAlert2(str)
response.write Text1&"<SCRIPT language=JavaScript>alert('"&str&"');javascript:history.go(-2)</SCRIPT>"&Text2
response.end
end sub
'定义一个弹出提示框并转向目标页的函数
sub pageTo(alerttext,topage)
response.write Text1&"<SCRIPT language=JavaScript>alert('"&alerttext&"');location.href='"&topage&"';</SCRIPT>"&Text2
response.end
end sub
'定义一个弹出提示框并关闭窗口的函数
sub closewin(alerttext)
response.write Text1&"<SCRIPT language=JavaScript>alert('"&alerttext&"');window.close();</SCRIPT>"&Text2
response.end
end sub
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -