使用 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