config.asp

来自「这是我个人用ASP制作 的一个动态网页,也是我的主页,谢谢大家的使用~~~`」· ASP 代码 · 共 17 行

<%
Sub msgbox(str,types,url)
	response.write "<script language=javascript>"
	response.write "alert('"&str&"');"
	select case types
		case "back"
			response.write "history.go(-1);"'返回上一个页面
		case "goUrl"
			response.write "window.location='"&url&"'"'跳转到指定页面
		case "close"
			response.write "window.close()"'关闭当前页面
	end select
	response.write "</script>"
End Sub
%>