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

Question

各位前輩先進, 小弟我寫了一小段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)

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

可否請各位指教?

Answer 1

HI,

 

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

 

tihs

Answer 2

Hi tihs,

 

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

但是語法有問題!

 

可否請進一步說明

 

 

Answer 3

各位,

 

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

 

Jinchang