[習題] 補充上集Ch.14--自己撰寫SqlDataSource「新增資料」，並採用參數(InsertParameters)

2009-09-30

最近在整理文件的時候，補充了一些範例，跟書本有關的，先給讀者作補充。

本文將補充一個範例，作為「上集（ASP.NET專題實務）」 Ch.14-2的結尾。
自己撰寫程式，控制SqlDataSource的「新增資料」，並且採用參數(InsertParameters)

我們不使用現成的控制項，畫面全都採用最簡單的 TextBox / DropDownList控制項
自己來作 "資料新增"的畫面

第14章 收錄了很多 ADO.NET的程式，透過自己動手撰寫，可以瞭解很多運作的原理。

這也是初學者、市面上其他書本比較缺乏的部份。

很多初學者只會用 SqlDataSource這種精靈，卻不知道運作的原理？更別說自己動手去改寫了。

本書第14章共有 DataReader / DataSet / xxxDataSource這些常用的 ADO.NET元件的程式（100%手寫）

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

最近在整理文件的時候，補充了一些範例，跟書本有關的，先給讀者作補充。

如果您不是本書讀者，請先看過這一篇 --

ADO.NET #4（改），自己設定輸入畫面，讓SqlDataSource幫我們完成「新增」一筆資料

本文將補充一個範例，作為本書上集（ASP.NET專題實務） Ch14-2 的結尾。

自己撰寫程式，控制SqlDataSource的「新增資料」，並且採用參數(InsertParameters)

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

我們不使用現成的控制項，畫面全都採用最簡單的 TextBox / DropDownList控制項

自己來作 "資料新增"的畫面

HTML畫面如下：(搭配 VB後置程式碼)

        
        從資料庫連結開始，100%都用手寫程式

        ASP.NET 2.0 ---- SqlDataSource版....（SqlDataSource的參數，InsertParameters）

        

        新增資料後，下面的GridView會立即出現新資料。

        title :
        

        class :
        
            科技
            教育
            政治
            娛樂
            其他  
        

        summary :
        

        article :
        

        author :

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

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

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

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

後置程式碼如下：

VB版

'----自己寫的（宣告）----
Imports System
Imports System.Web.Configuration
Imports System.Data
Imports System.Data.SqlClient
'----自己寫的（宣告）----

    Sub myDBInit()
        Dim SqlDataSource1 As New SqlDataSource
        '==自己手動撰寫 SqlDataSource  ,必須先寫下面三行 ==

        '== 1.資料庫的連線字串 ConnectionString  ==
        SqlDataSource1.ConnectionString = WebConfigurationManager.ConnectionStrings("testConnectionString").ConnectionString
        '== 2.撰寫SQL指令 ==
        SqlDataSource1.SelectCommand = "SELECT * FROM [test] order by id DESC"
        '== 3.執行SQL指令 .select()    /  [DataSet 版]==
        SqlDataSource1.DataSourceMode = SqlDataSourceMode.DataSet
        '== 如果 DataSourceMode 屬性設為 DataSet 值，則 Select 方法會傳回 DataView 物件。

        Dim args As New DataSourceSelectArguments
        Dim dv As DataView = SqlDataSource1.Select(args)
        '== 或是寫成一行 Dim dv As Data.DataView = SqlDataSource1.Select(New DataSourceSelectArguments)
        '== DataSourceSelectArguments 提供一項機制，讓資料繫結控制項於擷取資料時，用來向資料來源控制項要求資料相關的作業。

        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
        myDBInit()
    End Sub


    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        '== 資料新增 ==
        Dim SqlDataSource3 As New SqlDataSource()

        '== 連結資料庫的連接字串 ConnectionString  ==
        SqlDataSource3.ConnectionString = WebConfigurationManager.ConnectionStrings("您自己的資料庫連線字串").ConnectionString

        '== 改用參數 (InsertParameters)來進行輸入！ ==
        SqlDataSource3.InsertParameters.Add("title", TextBox1.Text)
        SqlDataSource3.InsertParameters.Add("test_time", DateTime.Now.ToShortDateString())
        SqlDataSource3.InsertParameters.Add("class", ListBox1.SelectedItem.Value)
        SqlDataSource3.InsertParameters.Add("summary", TextBox2.Text)
        SqlDataSource3.InsertParameters.Add("article", TextBox3.Text)
        SqlDataSource3.InsertParameters.Add("author", TextBox4.Text)

        '== 撰寫SQL指令(Insert Into) ==
        SqlDataSource3.InsertCommand = "Insert into test(title,test_time,class,summary,article,author) values(@title,@test_time,@class,@summary,@article,@author)"

        '== 執行SQL指令 / 新增 .Insert() ==
        Dim aff_row As Integer = SqlDataSource3.Insert()

        If (aff_row = 0) Then
            Response.Write("資料新增失敗！")
        Else
            Response.Write("資料新增成功！")
        End If

        myDBInit()    '== 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()    '== GridView的資料重整
    End Sub

C#版

    protected void myDBInit()
    {
        //====從資料庫連結開始，100%都用手寫程式====
        SqlDataSource SqlDataSource1 = new SqlDataSource();
        //== 連結資料庫的連接字串 ConnectionString  ==
        SqlDataSource1.ConnectionString = System.Web.Configuration.WebConfigurationManager.ConnectionStrings["您自己的資料庫連結字串"].ConnectionString;
        //== 撰寫SQL指令 ==
        SqlDataSource1.SelectCommand = "SELECT * FROM [test] order by id DESC";

        //== 執行SQL指令 .select() ==
        SqlDataSource1.DataSourceMode = SqlDataSourceMode.DataSet;
        DataView dv = (DataView)SqlDataSource1.Select(new DataSourceSelectArguments());

        //==================
        GridView1.DataSource = dv;
        GridView1.DataBind();
        //==================

        SqlDataSource1.Dispose();
    }
    //=======================================================================

    protected void Page_Load(object sender, EventArgs e)
    {
        myDBInit();
    }


    protected void Button1_Click(object sender, EventArgs e)
    {
        //== 資料新增 ==
        SqlDataSource SqlDataSource3 = new SqlDataSource();

        //== 連結資料庫的連接字串 ConnectionString  ==
        SqlDataSource3.ConnectionString = System.Web.Configuration.WebConfigurationManager.ConnectionStrings["testConnectionString"].ConnectionString;

        //== 改用參數 (InsertParameters)來進行輸入！ ==
        SqlDataSource3.InsertParameters.Add("title", TextBox1.Text);
        SqlDataSource3.InsertParameters.Add("test_time", DateTime.Now.ToShortDateString());
        SqlDataSource3.InsertParameters.Add("class", ListBox1.SelectedItem.Value);
        SqlDataSource3.InsertParameters.Add("summary", TextBox2.Text);
        SqlDataSource3.InsertParameters.Add("article", TextBox3.Text);
        SqlDataSource3.InsertParameters.Add("author", TextBox4.Text);

        //== 撰寫SQL指令(Insert Into) ==
        SqlDataSource3.InsertCommand = "Insert into test(title,test_time,class,summary,article,author) values(@title,@test_time,@class,@summary,@article,@author)";
        

        //== 執行SQL指令 / 新增 .Insert() ==
        int aff_row = SqlDataSource3.Insert();

        if (aff_row == 0)
            Response.Write("資料新增失敗！");
        else
            Response.Write("資料新增成功！");


        myDBInit();    //== GridView的資料重整
    }


    protected void GridView1_PageIndexChanging(object sender, GridViewPageEventArgs e)
    {
        GridView1.PageIndex = e.NewPageIndex;
        myDBInit();    //== GridView的資料重整
    }

SqlDataSource的 UpdateCommand與 UpdateParameter 、 DeleteCommand與 DeleteParameter 的用法，請參考這個範例：

ADO.NET #3 (GridView + SqlDataSource)完全手寫、後置程式碼 ...

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

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

猶如一人以我的燭火點燭，光亮與他同在，我卻不因此身處黑暗。----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)書籍，也有遠距教學線上教程教學影片