1、调用方法
CallJavaScript(Me, "getdate()")
2、代码页面定义
Public Shared Sub CallJavaScript(ByVal page As Page, ByVal FunName As String)
Dim StrScript As New StringBuilder
StrScript.Append("<script language=javascript>")
StrScript.Append(FunName)
StrScript.Append(";")
' StrScript.Append("('" & str & "');")
StrScript.Append("</script>")
If Not page.IsStartupScriptRegistered("Call" & FunName) Then
page.RegisterStartupScript("Call" & FunName, StrScript.ToString())
End If
End Sub
可扩展传递参数str
3、HTML页面定义getdate()