ADO.NET #3 (GridView + SqlDataSource)完全手寫、後置程式碼，兼論 SqlDataSource與UpdateParameter/DeleteParameter的用法

2008-09-15

124408
0
ADO.NET / LINQ / SQL / Entity
2016-10-28

這篇文章超悶！因為全部都用後置程式碼（Code Behind）來作，自己寫程式來作 SqlDataSource
所以GridView的「分頁」、「編輯」、「刪除」、「更新」......通通採用後置程式碼（自己動手寫）

在許多網路論壇上，會有人發問這樣的問題，因為入門書比較不會講到這些....包含 YouTube教學影片

這篇文章超悶！

因為全部都用後置程式碼（Code Behind）來作，

所以，GridView的「分頁」、「編輯」、「刪除」、「更新」......通通採用後置程式碼（自己動手寫）

在許多網路論壇上，會有人發問這樣的問題。因為入門書比較不會講到這些，但學到一陣子之後，就會遇上相關問題了。

一般入門書，介紹 GridView + SqlDataSource都是靠精靈，設定畫面一步一步地完成。

例如：初學者可以先看看這篇文章（PDF檔）......文章下載

這個範例，請搭配我書本裡面的 test資料表，可以當成本書（上集） 10.3節 ＆ Ch 14章的補充範例。

Ch 13/14這兩章，是我書本裡面的特色。......[2010 新書上市]ASP.NET 4.0專題實務(I) -- 入門實戰篇

目前的ASP.NET 2.0 /3.5 /4.0的書籍，連ADO.NET都少見了（大多只講 SqlDataSource），更別提到「手寫」的ADO.NET程式。

=========================================================================================

建議：初學者勿看！

基礎不好，看了會消化不良、拉肚子的。

先把基本功夫練好，下面的範例才會感到有用。

已經學會 GridView的樣版（Template）、SqlDataSource之後再看下去

底下的範例，因為自己寫程式，會瞭解 GridView的各種事件。

例如：GridView是如何完成編輯、分頁、更新等等動作，下面程式碼其實是完全公開了這些過程。

===================================================================================

千萬不要為SqlDataSource "動手" 寫程式

本文的範例，我只是寫給大家看，SqlDataSource其實骨子裡面就是「ADO.NET」
寫法與流程都一樣。

您千萬不要為了「SqlDataSource精靈」寫程式。讓他來服務你，你不用服務他！你才是主人！！！！

................................................................................................................

本範例的執行成果，為什麼要自己動手寫這些功能？

學會了可以得到什麼？？？請看我在YouTube錄製的影片 -- https://youtu.be/KFQvhiQcz1U

第一，HTML畫面設計。

只有一個 GridView，並啟動「編輯」、「分頁」等功能。重點是設定好 DataKeys屬性！

但畫面上沒有 SqlDataSource作資料繫結。

第二，後置程式碼（Code Behind）。VB版

因為自己動手在後置程式碼裡面，撰寫 SqlDataSource，我上MSDN也沒找到好的範例。

自己「硬Coding」，寫得不好，請大家見諒。

    Sub myDBInit()   '==== 自己寫的程式 ====
        '--------------------------------------------------
        '----- 手動撰寫 SqlDataSource     -----
        '--------------------------------------------------
        Dim SqlDataSource1 As SqlDataSource = New SqlDataSource
        '== 1.連結資料庫的連接字串 ConnectionString ，事先已經寫在 Web.Config檔案裡面了==
        SqlDataSource1.ConnectionString = System.Web.Configuration.WebConfigurationManager.ConnectionStrings("testConnectionString").ConnectionString
        '== 2.撰寫SQL指令 ==
        SqlDataSource1.SelectCommand = "SELECT * FROM [test]"
        '== 3.執行SQL指令 .select() ==
        SqlDataSource1.DataSourceMode = SqlDataSourceMode.DataSet

        Dim args As New DataSourceSelectArguments
        Dim dv As Data.DataView = SqlDataSource1.Select(args)

        GridView1.DataSource = dv
        GridView1.DataBind()

        SqlDataSource1.Dispose()
    End Sub   '==== 自己寫的程式 ====

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Not Page.IsPostBack Then
            myDBInit()

Response.Write("第一次進入畫面.....If Not Page.IsPostBack Then..... ")
 Else
 Response.Write("第N次進入畫面..... ")
 End If

'註解：不要小看這一段 IF判別式喔，不信的話請看這篇文章 ---- 自己動手寫 GridView的編輯/更新程式，但抓不到修改後的資料？
End Sub

    Protected Sub GridView1_PageIndexChanging(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewPageEventArgs) Handles GridView1.PageIndexChanging
        GridView1.PageIndex = e.NewPageIndex
        myDBInit()

Response.Write("GridView1_PageIndexChanging()....分頁ing... ")
End Sub

Protected Sub GridView1_RowEditing(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewEditEventArgs) Handles GridView1.RowEditing
 GridView1.EditIndex = e.NewEditIndex
 myDBInit()
 Response.Write("GridView1_RowEditing()....進入編輯模式.... ")
 End Sub

Protected Sub GridView1_RowCancelingEdit(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewCancelEditEventArgs) Handles GridView1.RowCancelingEdit
 GridView1.EditIndex = -1
 myDBInit()
 Response.Write("GridView1_RowCancelingEdit()....離開(取消)編輯模式.... ")
 End Sub

Protected Sub GridView1_RowUpdating(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewUpdateEventArgs) Handles GridView1.RowUpdating
'==這邊的程式很難。要抓格子，還要自己算一下是第幾格？請看本書P. 10-20頁的圖片與解說

Dim myTest1 As TextBox = GridView1.Rows(e.RowIndex).Cells(2).Controls(0)
Dim myTest2 As TextBox = GridView1.Rows(e.RowIndex).Cells(3).Controls(0)

Response.Write("GridView1_RowUpdating()....開始更新資料.... ")

        Dim my_test_time, my_title, my_summary, my_article As New TextBox
        my_test_time = GridView1.Rows(e.RowIndex).Cells(2).Controls(0)
        my_title            = GridView1.Rows(e.RowIndex).Cells(3).Controls(0)
        my_summary = GridView1.Rows(e.RowIndex).Cells(4).Controls(0)
        my_article       = GridView1.Rows(e.RowIndex).Cells(5).Controls(0)

Dim my_id As Integer = CInt(GridView1.DataKeys(e.RowIndex).Value) '====主索引鍵====

'==下面的程式，只是作SQL指令的更新動作而已

Dim SqlDataSource1 As SqlDataSource = New SqlDataSource
SqlDataSource1.ConnectionString = System.Web.Configuration.WebConfigurationManager.ConnectionStrings("testConnectionString").ConnectionString

        '== 設定SQL指令將會用到的參數 ==
        SqlDataSource1.UpdateParameters.Add("id", my_id)
        SqlDataSource1.UpdateParameters.Add("test_time", my_test_time.Text)

'== 關於日期格式的轉換，可以參閱 KKbruce的大作：http://kkbruce.blogspot.com/2010/11/sqldatasource.html
        SqlDataSource1.UpdateParameters.Add("title", my_title.Text)
        SqlDataSource1.UpdateParameters.Add("summary", my_summary.Text)
        SqlDataSource1.UpdateParameters.Add("article", my_article.Text)

SqlDataSource1.UpdateCommand = "UPDATE [test] SET [test_time] = @test_time, [title] = @title, [summary] = @summary, [article] = @article WHERE [id] = @id"

SqlDataSource1.Update()

SqlDataSource1.Dispose()
'==========================================

        '==== 離開編輯模式 ====
        GridView1.EditIndex = -1
        myDBInit()
    End Sub

    Protected Sub GridView1_RowDeleting(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewDeleteEventArgs) Handles GridView1.RowDeleting
        Dim SqlDataSource1 As SqlDataSource = New SqlDataSource
        '== 連結資料庫的連接字串 ConnectionString ==
        SqlDataSource1.ConnectionString = System.Web.Configuration.WebConfigurationManager.ConnectionStrings("testConnectionString").ConnectionString

Dim my_id As Integer = CInt(GridView1.DataKeys(e.RowIndex).Value.ToString) '====主索引鍵====
SqlDataSource1.DeleteParameters.Add("id", my_id) '== 設定SQL指令將會用到的參數 ==

SqlDataSource1.DeleteCommand = "Delete from [test] WHERE [id] = @id"
SqlDataSource1.Delete()

Response.Write("*** 刪除成功！ ***")

myDBInit()
End Sub

2009/10/13補充：

特別感謝網友指正。空贓團長說：「GridView沒有指定DataSourceID時，是不會執行-ed事件，只會執行-ing事件。」

關於上述的SqlDataSource作法，這篇文章寫得也不錯，請各位參考---- http://blog.sqlsky.com/article.asp?id=415 (C#語法)

============================================================================

考考您 (Q&A)：

上面的各個事件裡面，為何都要重複執行 myDBInit()？

如果不執行的話，會怎麼樣？

答案請看本書 10.5節，我用一整節的文章來作說明。......[2010 新書上市]ASP.NET 4.0專題實務(I) -- 入門實戰篇

============================================================================

不是我藏私啦

一本書上限600頁，我都寫到快850頁，還有好多東西塞不進去。

這個範例，在以前 ASP.NET 1.x版，是人人都會寫的範例。

因為那個時候，沒有 SqlDataSource這類的資料來源控制項，很多事都要自己動手寫。

到了ASP.NET 2.0以後，一切都方便、自動化了。書本也不提這一部份了，書本只談新的控制項，不會回頭去談一些基礎。

（因為新東西太多，新的都談不完，哪還有空回頭談別的）

但「出來混，總是要還的」，寫到（或學到）某一種程度，就會遇上了。

所以網路論壇上，還是很常見到這些問題。

這次公開了，基礎夠的話，研究一下就會懂。

如果不懂，也不要急，一定是有些基礎還不穩固，有些該學的還沒學到。

我的書本裡面，第十章也有這個範例，但採用 DataSet + DataAdapter來作（已經出書了，這範例暫不公開）

2009/11/9補充 -- 讀者常見的問題，很值得思考！！ 自己動手寫 GridView的編輯/更新程式，但抓不到修改後的資料？

如果您想參考 SqlDataSource的 SelectCommand與 SelectParameter的寫法，請參考我的這篇文章：http://www.dotblogs.com.tw/mis2000lab/archive/2008/04/25/3505.aspx

如果您想參考 SqlDataSource的 InsertCommand與 InserttParameter的寫法，請參考我的這篇文章：http://www.dotblogs.com.tw/mis2000lab/archive/2009/09/30/sqldatasource_insert_insertparameters_20090930.aspx

===========================================================================

新書（[新書上市]ASP.NET 4.0專題實務(I) -- 入門實戰篇）已經包含下列所有範例，

有讀者希望看見 ListView、FormView、DetailsView，也都可以自己動手打造。

到了這篇文章，算是把這四大天王的範例，都提供出來了。

ListView ----

FormView ----

ADO.NET #9 FormView + SqlDataSource完全手寫、後置程式碼！

GridView --

DetailsView --

ADO.NET#10 DetailsView 變更模式（自己動手寫程式）

===========================================================================

本系列 ADO.NET 共有下面文章：

真的！學會 ADO.NET的程式，自己動手寫。

很多問題都可以自己動手解決掉，硬要使用 Web控制項來湊合，反而有點礙手礙腳。

2009/2/24補充 -- 您也可以參考 topcat的這篇文章：透過手寫程式了解GridView的運作

2012/9/18 補充：

關於本範例，您也可以透過 GridViewRow / e.NewValue來做到，

請看範例 -- http://msdn.microsoft.com/zh-tw/library/system.web.ui.webcontrols.gridviewrow(v=vs.110).aspx


  Sub AuthorsGridView_RowUpdating(ByVal sender As Object, ByVal e As GridViewUpdateEventArgs)

    Dim index As Integer = AuthorsGridView.EditIndex
    Dim row As GridViewRow = AuthorsGridView.Rows(index)


    Dim lastName As TextBox = CType(row.FindControl("LastNameTextBox"), TextBox)
    Dim firstName As TextBox = CType(row.FindControl("FirstNameTextBox"), TextBox)


    e.NewValues("au_lname") = lastName.Text
    e.NewValues("au_fname") = firstName.Text

  End Sub
  
  ==========================================
        

        

          

          

            
              <%#Eval("au_lname")%>
            

            
              
              

                                                    
            

          

          

            
              <%#Eval("au_fname")%>

今日值班正妹----- ?????

圖片來源：正妹日報 http://6ewong.blogspot.com/2008/09/no415-kuoweiwei.html

http://www.wretch.cc/album/album.php?id=kuoweiwei&book=67&page=13

我將思想傳授他人，他人之所得，亦無損於我之所有；

猶如一人以我的燭火點燭，光亮與他同在，我卻不因此身處黑暗。----Thomas Jefferson

線上課程教學，遠距教學 (Web Form 約 51hr) https://dotblogs.com.tw/mis2000lab/2016/02/01/aspnet_online_learning_distance_education_VS2015

線上課程教學，遠距教學 (ASP.NET MVC 約 140hr) https://dotblogs.com.tw/mis2000lab/2018/08/14/ASPnet_MVC_Online_Learning_MIS2000Lab

寫信給我，不要私訊 -- mis2000lab (at) yahoo.com.tw 或 school (at) mis2000lab.net

(1) 第一天 ASP.NET MVC5 完整影片（5.5小時 / .NET 4.x版）免費試聽。影片 https://youtu.be/9spaHik87-A

(2) 第一天 ASP.NET Core MVC 完整影片（3小時 / .NET Core 6.0~8.0）免費試聽。影片 https://youtu.be/TSmwpT-Bx4I

[學員感言] mis2000lab課程評價 - ASP.NET MVC , WebForm 。 https://mis2000lab.medium.com/%E5%AD%B8%E5%93%A1%E6%84%9F%E8%A8%80-mis2000lab%E8%AA%B2%E7%A8%8B%E8%A9%95%E5%83%B9-asp-net-mvc-webform-77903ce9680b

ASP.NET遠距教學、線上課程（Web Form + MVC）。第一天課程， "完整" 試聽。

......... facebook社團 https://www.facebook.com/mis2000lab ......................

......... YouTube (ASP.NET) 線上教學影片 https://www.youtube.com/channel/UC6IPPf6tvsNG8zX3u1LddvA/

Blog文章 "附的範例" 無法下載，請看 https://dotblogs.com.tw/mis2000lab/2016/03/14/2008_2015_mis2000lab_sample_download

請看我們的「售後服務」範圍（嚴格認定）。

......................................................................................................................................................

ASP.NET MVC => .NET Core MVC 線上教學 ...... 第一天課程完整內容 "免費"讓您評估 / 試聽

[遠距教學、教學影片] ASP.NET (Web Form) 課程上線了！MIS2000Lab.主講事先錄好的影片，並非上課側錄！觀看時，有如「一對一」面對面講課。

回首頁

ASP.NET專題實務 WebForm + MVC線上教學影片 -- MIS2000Lab.

MIS2000 Lab.已推出20餘本電腦書，曾任資策會專任講師與微軟MVP。自.NET 1.x起，已出版15本ASP.NET (Web Form)書籍，也有遠距教學線上教程教學影片