Sub ShowMsg(byval msg,byval url) Response.Write("") IF url="" Then Response.Write("") Else Response.Write("") End IF Response.End End Sub
用法：Call ShowMsg("User name is wrong!","") '返回前一页
Call ShowMsg("User name is wrong!","index.asp") '跳转到index.asp
Call ShowMsg("User name is wrong!","index.asp") '跳转到index.asp
回复自“ASP常用自定义函数--ShowMsg”