摘要:JavaScript 顯示 ServerCode 的訊息實作(已過時的方法)
CLASS FUNCTION--
Function jsErrorMsg(ByVal ErrorMsg As String)
Dim script As String
ErrorMsg = ErrorMsg.Replace("'", "\'")'處理單引號
ErrorMsg = ErrorMsg.Replace(Environment.NewLine, "\r\n")'處理換行
script = "<script language=""javascript""> " & vbCrLf & _
"function window_load() { " & vbCrLf & _
"alert('" + ErrorMsg + "'); changeCardType();" & vbCrLf & _
" } " & vbCrLf & _
" window.onload = window_load; " & vbCrLf & _
"</script>"
If (Not Me.IsStartupScriptRegistered("exva")) Then '已過時，請修改成.NET 2.0的新方法
Me.RegisterStartupScript("exva", script)
End If
End Function
在程式中叫用此方法即可將任何訊息給CLIENT端看到
注1.此方法在.net 2.0之後的版本已視為過時。
注2.使用此方法，html需要<from runat="server"></from> 區塊
參考網址: