「ASP.NET 1.1 JavaScriptを用いたクライアントサイドの処理」の編集履歴(バックアップ)一覧はこちら
「ASP.NET 1.1 JavaScriptを用いたクライアントサイドの処理」(2008/06/17 (火) 17:13:18) の最新版変更点
追加された行は緑色になります。
削除された行は赤色になります。
*&this_page()
**概要
#highlight(javascript){{
http://www.atmarkit.co.jp/fdotnet/dotnettips/160regscript/regscript.html
'渡したフォームのIDにJavaScriptを使い移す
Private Sub SetFocus(ByVal ctrl As Control)
Dim script As String = _
"<script language='JavaScript'>" _
+ "document.getElementById('" _
+ ctrl.ClientID _
+ "').focus(); <" + "/script>"
RegisterStartupScript("setfocus", script)
End Sub
'引数をjavaScriptのメッセージボックスを通して出力する
Private Sub Msgbox(ByVal str As String)
Dim script As String = _
"<script language='JavaScript'>" _
+ "alert('" + str + "') " _
+ "</script>"
RegisterStartupScript("Msgbox", script)
End Sub
'JavaScriptのWindow.Closeを出力する
Private Sub WindowClose()
Dim script As String = _
"<script language='JavaScript'>" _
+ "window.close(); " _
+ "</script>"
RegisterStartupScript("WindowClose", script)
End Sub
}}
*&this_page()
**概要
#highlight(asp.net){{
http://www.atmarkit.co.jp/fdotnet/dotnettips/160regscript/regscript.html
'渡したフォームのIDにJavaScriptを使い移す
Private Sub SetFocus(ByVal ctrl As Control)
Dim script As String = _
"<script language='JavaScript'>" _
+ "document.getElementById('" _
+ ctrl.ClientID _
+ "').focus(); <" + "/script>"
RegisterStartupScript("setfocus", script)
End Sub
'引数をjavaScriptのメッセージボックスを通して出力する
Private Sub Msgbox(ByVal str As String)
Dim script As String = _
"<script language='JavaScript'>" _
+ "alert('" + str + "') " _
+ "</script>"
RegisterStartupScript("Msgbox", script)
End Sub
'JavaScriptのWindow.Closeを出力する
Private Sub WindowClose()
Dim script As String = _
"<script language='JavaScript'>" _
+ "window.close(); " _
+ "</script>"
RegisterStartupScript("WindowClose", script)
End Sub
}}
表示オプション
横に並べて表示:
変化行の前後のみ表示: