'仿JS的Alert弹出框 '在页面中的使用方法:Alert("请输入用户名!") Public Sub Alert(ByVal Message As String) Dim tmpSB As New StringBuilder tmpSB.AppendFormat("<script language=javascript>alert('{0}')</script>", Message) System.Web.HttpContext.Current.Response.Write(tmpSB.ToString) End Sub
'在页面中的使用方法:Alert("请输入用户名!")
Public Sub Alert(ByVal Message As String)
Dim tmpSB As New StringBuilder
tmpSB.AppendFormat("<script language=javascript>alert('{0}')</script>", Message)
System.Web.HttpContext.Current.Response.Write(tmpSB.ToString)
End Sub
Page.RegisterStartupScript("t", "<script language=javascript>alert(XXX);</script>")
有BUG 经常会无故出错(偶尔)
还是page.RegisterBlockClient("","<script>alert('aaa')</script>")