使用 VB.NET 封装 Javascript 常用功能(这是在asp.net中的)

(这是在asp.net中的)

Imports System.Web.HttpContext

Namespace NBWD.Utility
''' <summary>
''' 公共类，负责普通功能以及封装的 Javascript 功能
''' </summary>
''' <remarks></remarks>
Public Class Common
Private Shared jsHeaderTag As String = "<script language='javascript'>"
Private Shared jsCloseTag As String = "</script>"

''' <summary>
''' 显示 Javascript 提示消息
''' </summary>
''' <param name="message">要显示的消息</param>
''' <remarks></remarks>
Public Shared Sub Alert(ByVal message As String)
With HttpContext.Current.Response
.Write(jsHeaderTag)
.Write(String.Format("alert('{0}');", message))
.Write(jsCloseTag)
End With
End Sub

''' <summary>
''' 转向指定页面
''' </summary>
''' <param name="pageURL">要转向页面的地址</param>
''' <remarks></remarks>
Public Shared Sub GoPage(ByVal pageURL As String)
With HttpContext.Current.Response
.Write(jsHeaderTag)
.Write(String.Format("window.location.href='{0}';", pageURL))
.Write(jsCloseTag)
End With
End Sub

''' <summary>
''' 使网页前进或后退
''' </summary>
''' <param name="steps">步数</param>
''' <remarks></remarks>
Public Shared Sub GoHistory(ByVal steps As Integer)
With HttpContext.Current.Response
.Write(jsHeaderTag)
.Write(String.Format("history.go({0});", steps))
.Write(jsCloseTag)
End With
End Sub
End Class
End Namespace

如上所示 您还可以添加更多的 Javascript 常用功能进来~~~

出自：http://hi.baidu.com/nbwd/blog/item/bf260b23bb0e1847925807b2.html