none
為何無法將資料新增到資料庫? RRS feed

  • 問題

  • 各位前輩先進, 小弟我寫了一小段code如下, 想要新增一筆記錄到資料庫

     

            Dim newEmployeeRow As EmployeeDataSet.personRow

            newEmployeeRow = Me.EmployeeDataSet.person.NewpersonRow()

     

            newEmployeeRow.emp_no = TextBox1.Text
            newEmployeeRow.emp_dept = TextBox2.Text
            newEmployeeRow.emp_position = TextBox3.Text
            newEmployeeRow.emp_degree = TextBox4.Text
            newEmployeeRow.emp_chname = TextBox5.Text
            newEmployeeRow.emp_sex = "1"
            newEmployeeRow.emp_blood = "O"
            newEmployeeRow.emp_startdate = "01/01/98"
            newEmployeeRow.emp_marriage = "1"
            newEmployeeRow.emp_idnum = TextBox6.Text
            newEmployeeRow.emp_birthday = "09/09/80"

     

            Me.EmployeeDataSet.person.Rows.Add(newEmployeeRow)
            Me.PersonTableAdapter.Update(Me.EmployeeDataSet.person)

    執行完, 電腦沒有顯示任何錯誤! 但是, 資料也沒新增成功!

    可否請各位指教?

    2008年5月21日 上午 05:29

解答

  • 各位,

     

    本人已經找出問題! 在新增資料的時候, 所有的欄位都要給 initial values.

     

    Jinchang

    2008年6月23日 上午 09:09

所有回覆

  • HI,

     

    請將PersonTableAdapter.Adapter.InsertCommand.CommandText的內容顯示出來看看, 看其內容是否有一個Insert的敘述

     

    tihs

    2008年5月21日 上午 06:09
  • Hi tihs,

     

    我對 ADO.NET 還不是很熟悉, 我試圖將PersonTableAdapter.Adapter.InsertCommand.CommandText顯示,

    但是語法有問題!

     

    可否請進一步說明

     

     

    2008年5月21日 上午 07:06
  • 各位,

     

    本人已經找出問題! 在新增資料的時候, 所有的欄位都要給 initial values.

     

    Jinchang

    2008年6月23日 上午 09:09