时间:2021-06-28 08:23:47 | 栏目: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
具体的使用方法就不说了,很简单