###挨拶
皆さまはじめまして。トミー と申します。よろしくお願いします。
###前提・実現したいこと
テキストボックス「txtdirectory」に値が入っていない状態で
ボタン「btnf1」をクリックした時、jQueryUIで作ったダイアログ表示で警告したい。
↓表示イメージ
###他機能で正常動作していること
ボタン「btnf12」をクリックした時はjQueryUIで作ったダイアログが
正しく表示。
###発生している問題
※WebList.aspx.vb の Private Sub btnf1_Click
にて
'↓■■■■■■■■■■■■コーディング疑問■■■■■■■■■■■■■■■
とか
'試したこと (動作してないのでコメントアウト)
とか
コーディングしたが動作せず
###該当のソースコード
※WebList.aspx
<%@ Page Title="" Language="vb" AutoEventWireup="false" MasterPageFile="~/frmMainVB.Master" CodeBehind="WebList.aspx.vb" Inherits="NewDirectoryTreeWebVB.WebList" %> <asp:Content ID="Content1" ContentPlaceHolderID="head" runat="server"> <script src='Scripts/jquery-1.10.2.js'></script> <script src='Scripts/jquery-ui-1.11.4.js'></script> <script type='text/javascript'> $(document).ready(function(){ $(function(){ $('#dialog').dialog({ autoOpen: false, width: 500, height: 200, buttons: [ { text: "はい", click: function() { window.open('about:blank','_self').close(); } }, { text: "いいえ", click: function() { $(this).dialog("close"); } } ] }); $('#dialog2').dialog({ autoOpen: false, width: 500, height: 200, buttons: [ { text: "確認しました", click: function () { $(this).dialog("close"); } } ] }); $('#btnf12').click(function( event ) { $('#dialog').dialog('open'); event.preventDefault(); }); // 隠しボタン $('#btnalarm').click(function (event) { $('#dialog2').dialog('open'); event.preventDefault(); }); // 試し検証 変更可 function abc() { $('#dialog2').dialog('open'); event.preventDefault(); }; }); }); </script> </asp:Content> <asp:Content ID="Content2" ContentPlaceHolderID="ContentHead" runat="server"> <div id="dialog" title="確認" style="display:none;">本当に終了しますか?</div> <div id="dialog2" title="確認" style="display:none;">必須項目を入力してください。</div> <!-- 隠しボタン --><asp:Button ID="btnalarm" runat="server" Text="Button" Visible="false"/> </asp:Content> <asp:Content ID="Content3" ContentPlaceHolderID="ContentBody" runat="server"> <div id='headinputtop'> <table id='headtable'> <tr> <td class = 'tdtitle'> 対象ディレクトリ </td> <td> <button id='btn001'>変更</button> </td> <td class='dummytd'> <asp:TextBox ID="txtdirectory" runat="server" cssclass="txtInfo"></asp:TextBox> </td> </tr> </table> </div> <div id='contents'> <table> <tr><td id = 'r001c001' class = 'center'>F1</td><td id = 'r001c002' class = 'center'>F7</td></tr> <tr><td id = 'r002c001'><asp:Button ID="btnf1" runat="server" Text="" clsclass="buttondesign" Width="506px" /></td><td id = 'r002c002'><button class='buttondesign' id='btnf7'> </button></td></tr> <tr><td id = 'r003c001' class = 'center'>F2</td><td id = 'r003c002' class = 'center'>F8</td></tr> <tr><td id = 'r004c001'><button class='buttondesign' id='btnf2'> </button></td><td id = 'r004c002'><button class='buttondesign' id='btnf8'> </button></td></tr> <tr><td id = 'r005c001' class = 'center'>F3</td><td id = 'r005c002' class = 'center'>F9</td></tr> <tr><td id = 'r006c001'><button class='buttondesign' id='btnf3'> </button></td><td id = 'r006c002'><button class='buttondesign' id='btnf9'> </button></td></tr> <tr><td id = 'r007c001' class = 'center'>F4</td><td id = 'r007c002' class = 'center'>F10</td></tr> <tr><td id = 'r008c001'><button class='buttondesign' id='btnf4'> </button></td><td id = 'r008c002'><button class='buttondesign' id='btnf10'> </button></td></tr> <tr><td id = 'r009c001' class = 'center'>F5</td><td id = 'r009c002' class = 'center'>F11</td></tr> <tr><td id = 'r010c001'><button class='buttondesign' id='btnf5'> </button></td><td id = 'r010c002'><button class='buttondesign' id='btnf11'> </button></td></tr> <tr><td id = 'r011c001' class = 'center'>F6</td><td id = 'r011c002' class = 'center'>F12</td></tr> <tr><td id = 'r012c001'><button class='buttondesign' id='btnf6'> </button></td> <td id = 'r012c002'><button class='buttondesign' id='btnf12'>閉じる</button></td></tr> </table> </div> </asp:Content>
※WebList.aspx.vb
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load ' ポストバック判定 If IsPostBack Then Exit Sub End If End Sub Private Sub btnalarm_Click() Handles btnalarm.Click End Sub Private Sub btnf1_Click(sender As Object, e As EventArgs) Handles btnf1.Click ’訂正 2017/03/27 9:36 If Trim$(txtdirectory.Text) = String.Empty Then '訂正 ここまで '描画開始前に実行 'Page.ClientScript.RegisterClientScriptBlock(Me.GetType, "", "alert('ClientScriptBlock')", True) '描画後の実行 '↓■■■■■■■■■■■■コーディング疑問■■■■■■■■■■■■■■■ Page.ClientScript.RegisterStartupScript(Me.GetType, "", "abc", True) '試したこと (動作してないのでコメントアウト) 'Call btnalarm_Click() Exit Sub End If End Sub
※frmMainVB.Master
<%@ Master Language="VB" AutoEventWireup="false" CodeBehind="frmMainVB.master.vb" Inherits="NewDirectoryTreeWebVB.frmMainVB" %> <!DOCTYPE html> <html xmlns="http://www.w3.org/1999/xhtml"> <head runat="server"> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"/> <title></title> <%-- スクリプト --%> <script src="Scripts/jquery-1.10.2.min.js"></script> <script src="Scripts/jquery-ui-1.10.2.min.js"></script> <asp:ContentPlaceHolder ID="head" runat="server"> </asp:ContentPlaceHolder> </head> <!-- 右クリック禁止 --> <body oncontextmenu="return false;"> <div id="contents"> <form id="form1" runat="server"> <asp:ScriptManager ID="ScriptManager" runat="server"></asp:ScriptManager> <div> <asp:ContentPlaceHolder ID="ContentHead" runat="server"> </asp:ContentPlaceHolder> </div> <div> <asp:ContentPlaceHolder ID="ContentBody" runat="server"> </asp:ContentPlaceHolder> </div> <div> <asp:ContentPlaceHolder ID="ContentFooter" runat="server"> </asp:ContentPlaceHolder> </div> </form> </div> </body>
###補足情報(言語/FW/ツール等のバージョンなど)
ASP.NET(VB.NET2015)
お願い
(1) 特定の条件(今回はテキストボックスが未入力)でダイアログを表示させるコーディング方法。
(2) 設計として適切であるか?
(クラサバVBプログラマー出身の為、ASP.NETの経験があまりないです。)
よろしくお願いします。
回答1件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2017/03/27 01:05
退会済みユーザー
2017/03/27 01:42 編集
2017/03/27 05:17