您所在的位置:小祥子 » 编程 » ASP » 正文

ASP弹出提示框并跳转

时间:2015-02-13 编辑:本站 来源:本站原创

因为很多地方都可能用到提示并跳转,所以做一个方法来规范一下会更好。

Function Alert(message,gourl)
    message = replace(message,"'","\'")
    If gourl="-1" then
        Response.Write ("<script language=javascript>alert('" & message & "');history.go(-1)</script>")
    ElseIf gourl="-2" then
        Response.Write ("<script language=javascript>alert('" & message & "');history.go(-2)</script>")
    Else
        Response.Write ("<script language=javascript>alert('" & message & "');location='" & gourl &"'</script>")
    End If
    Response.End()
End Function

使用方法

Alert('返回上一页去咯','-1')

Alert('提示一下然后跳到首页,'/')

关键词:提示框 弹出 跳转 URL