ASP 信息提示函数并作返回或者转向

有时候我们在写asp的时候需要给用户一些反馈信息，这个自定义的返回信息函数，很方便大家使用

'************************'子程序名：信息提示窗口'功能：信息提示，并作返回或者转向'参数：'str 提示字符串'stype 处理类型:Back 返回 GoUrl 转向 Close 关闭'url 转向方向'************************Sub MsgBox(str,stype,url) response.write <script language=javascript> response.write alert('&str&'); select case stype 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

具体的使用方法就不说了，很简单