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

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

本文將補充一個範例,作為「上集(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)完全手寫、後置程式碼 ...

 

 

 

 

 

 

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

猶如一人以我的燭火點燭,光亮與他同在,我卻不因此身處黑暗。----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.主講   事先錄好的影片,並非上課側錄!   觀看時,有如「一對一」面對面講課