系統櫃

[習題]ADO.NET，兩個TextBox欄位作相互查詢 （附AJAX範例）本文是備份，請看我的網站 ---- [習題]ADO.NET，兩個TextBox欄位作相互查詢 （附AJAX範例） 網址 http://www.dotblogs.com.tw/mis2000lab/archive/2008/10/06/adonet_textbox_081006.aspx 有一位很用功的讀者，很常寫信跟我討論。與其回答一個人，不如把這些討論過程，公開分享給大家。說不定有更厲害的高手，可以提供更棒的解法。這個範例不難，是一個很適合初學者的習題。如果您是本書讀者，讀完 14-1節，改改書本範例，應該能寫出類似的成果。 Question : 在 Textbox1裡面輸入一些資料，希望 TextBox2會自動傳送回資料庫另一個欄位的資料我已經把TextBox1的AutoPostBack屬性改為True了..（這句話顯示，這位讀者的程度已經不錯）例如：我在TextBox1裡面輸入1234的話..它會去尋找資料庫裡面，另一個欄位，1234的資料..但是我只要把有需要的資料帶入TextBox2裡面..那我的後置程式碼應該如何撰寫呢!? Answer : 假設我的資料表，設計如下：欄位名稱 / 資料型態 / 註解======================欄位A / Int / 自動索引、自動編號，是一個P.K.（主索引鍵），例如：學號欄位B / nvarchar(50) / 隨便你存放什麼字串，例如：學生姓名======================首先，我們在HTML畫面上，拉進兩個 TextBox控制項。TextBox1 :______ TextBox1要設定 AutoBack為True。TextBox2 :______或是輸入學號：______ TextBox1要設定 AutoBack為True。學生姓名：______畫面上沒有按鈕（Button），重點是：TextBox1要設定 AutoBack為True。  這樣一來，當我們在第一個文字輸入方塊(TextBox1)，輸入文字之後， 就會自動執行。因此不用 Button控制項。  <form id="form1" runat="server"> <div> TextBox1 -- <asp:TextBox ID="TextBox1" runat="server" AutoPostBack="True"></asp:TextBox> <br /> <br /> TextBox2 -- <asp:TextBox ID="TextBox2" runat="server"></asp:TextBox> </div> </form> 後置程式碼也不難，但要自己動手稍微寫一下ADO.NET程式。以下我以 DataReader的方式來寫，對於這種簡單的資料存取，DataReader速度比較快。如果您對於ADO.NET程式不熟悉的話，可以參考書本的「第十四章」。 '------------------------------------自己補充一些NameSpace，常用的。Imports SystemImports System.DataImports System.Data.SqlClientImports System.Web.Configuration'------------------------------------ Private Sub TextBox1_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged Dim Conn As New SqlConnection("資料庫的連結字串") '--如果已經設定好，寫在Web.Config檔案裡面，就能寫成：（這部份請看本書 7-3節的內容） '--Dim Conn As New SqlConnection(WebConfigurationManager.ConnectionStrings("Mis2000Lab_ConnectionString").ConnectionString) Dim dr As SqlDataReader = Nothing Dim cmd As New SqlCommand("Select 欄位B From 資料表 Where 欄位A = '" & TextBox1.Text & "'", Conn) Try Conn.Open() dr = cmd.ExecuteReader() If dr.HasRows Then dr.Read() TextBox2.Text = dr.Item("欄位B").ToString Else Response.Write("EOF") '--找不到資料  End If Catch ex As Exception Response.Write("Error Message -- " & ex.ToString) Finally cmd.Cancel() cmd.Dispose() dr.Close() Conn.Close() Conn.Dispose() End TryEnd Sub這個範例只抓回一個欄位，並使用 Select這樣的 T-SQL指令。如果改用 .ExecuteScalar()，速度會更快。  (檔名 1.aspx，文末提供程式碼下載。) ......感謝 Allen Kuo的提醒  ^_^...................................................................................................................................抱歉，因為我的電腦剛好不在手邊，所以沒抓圖，也沒寫出很好的範例，以後有空的話，再補吧。這個程式不難，初學者可以練習看看。 缺點是上面這樣的範例（資料輸入的部份），會受到「資料隱碼攻擊（SQL Injection）」，請特別小心。 Allen Kuo給了一個更好的程式範例，把常用的程式碼寫入DbHelper這個Class。就能重複叫用。這是更高階的寫法，請各位參考看看：{ 註解：這是 C＃的寫法 DbHelper helpler = new DbHelper(); Criteria criteria =new Criteria(); criteria.Add("id", TextBox1.Text,"={0}", typeof(int)); string where = criteria.ToString(); string SQL="SELECT xx FROM xxxx"; if(where.Length>0)SQL +=" WHERE " + where; TextBox2.Text = helper.ExecuteScalar(SQL, criteria.Parameters );} 補充一下：這個範例要改成AJAX版也很簡單。(檔名 1_AJAX.aspx，文末提供程式碼下載。)畫面裡，拉進 ScriptManager。然後再拉進一個 UpdatePanel。把 TextBox2放進「UpdatePanel」裡面就可以了。  記得要設定 Trigger喔！請看本書第十九章。2008/107補充：  本文範例下載 ---- [Book]Case_Study.rar 本範例使用的 test資料表，詳見本書說明。 很多初學者會問到，類似郵局的網站，即時查詢郵遞區號，是怎麼作的。其實就是上面的範例，改一下就OK啦。  舉一反三而已。 縣市：____________ 鄉鎮市區：_________ 請輸入路段：________.....................................................................................................................................................................................ASP.NET專題實務（文魁出版 / P8187）2008/八月份 天瓏書局排行榜前十名.............................................................................................................. 寄信給我 mis2000lab (at) 雅虎.com.台灣 ........  .msgcontent .wsharing ul li { text-indent: 0; } 分享 Facebook Plurk YAHOO! .