有时候我们在写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
具体的使用方法就不说了,很简单
【说明】:本文章由站长整理发布,文章内容不代表本站观点,如文中有侵权行为,请与本站客服联系(QQ:)!