一聚教程网:一个值得你收藏的教程网站

热门教程

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

时间:2022-06-29 15:11:15 编辑:袖梨 来源:一聚教程网

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

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

以上是对需要给用户反馈信息的简单方法,方便大家使用。

热门栏目