 |
|
insert query ไม่ได้ครับ ช่วยผมหน่อย หาวิธีแก้ยังไงก็ไม่เจอ |
|
 |
|
|
 |
 |
|
มันฟ้องว่า .ExecuteNonQuery() ตามรูปครับ

Code (VB.NET)
Dim S As String = ("Select * from Query1 Where idbook like '" & Me.txt1.Text & _
"%' or namebook like '" & Me.txt1.Text & "%';")
If b_name.Text = "" Then
MessageBox.Show("กรอกข้อมูลก่อน !!")
b_id.Select()
Else
ExecuteSQL("INSERT INTO Query1 (idbook, namebook, bversion, rategory, namecompany, bprice, brent, bprub )" & _
"VALUES" & _
"('" & b_id.Text & "','" & b_name.Text & "','" & bversion.Text & "','" & ComboBox1.Text & "','" & ComboBox2.Text & "','" & cprice.Text & "','" & c_rent.Text & "','" & c_tax.Text & "')")
If MessageBox.Show("ต้องการบันทึกใช่หรือไม่? ", "คำยืนยัน", _
MessageBoxButtons.YesNo, MessageBoxIcon.Question) = vbYes Then
End If
End If
Dim command As New OleDbCommand(S, conn)
Dim adapter As New OleDbDataAdapter(command)
Dim dataSt As New DataSet()
adapter.Fill(dataSt, "idbook, namebook")
DataGridView1.DataSource = dataSt.Tables("idbook, namebook")
txt1.Select()
โดยฐานข้อมูลที่ผมต้องการ insert เข้าไปแบบนี้ครับ

คำสั่งชุดนี้ผมปรับให้ insert เข้าฐานข้อมูล customer ได้แต่ insert ใน query1 ไม่ได้ ครับ
Tag : .NET, Ms Access, VB.NET
|
ประวัติการแก้ไข 2012-02-09 23:38:30
|
 |
 |
 |
 |
Date :
2012-02-09 23:36:45 |
By :
batabin |
View :
1262 |
Reply :
15 |
|
 |
 |
 |
 |
|
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
มันแจ้งว่าเขตของข้อมูลครับ ลองดูพวก Data Type ครับ 
|
 |
 |
 |
 |
Date :
2012-02-10 06:21:54 |
By :
webmaster |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
เราไม่สามารถแก้ไขข้อมูลฟิล์ดประเภท AutoNumber
|
 |
 |
 |
 |
Date :
2012-02-10 08:41:58 |
By :
watcharop |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
ฟิวผมไม่ได้ตั้งเป็น ออโต้ ครับ
|
 |
 |
 |
 |
Date :
2012-02-10 11:36:14 |
By :
batabin |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
เอาค่า SQL ออกมาดูหน่อยครับ ด้วยการ Debug
Code (VB.NET)
Dim strSQL As String
strSQL = "INSERT INTO Query1 (idbook, namebook, bversion, rategory, namecompany, bprice, brent, bprub )" & _
"VALUES" & _
"('" & b_id.Text & "','" & b_name.Text & "','" & bversion.Text & "','" & ComboBox1.Text & "','" & ComboBox2.Text & "','" & cprice.Text & "','" & c_rent.Text & "','" & c_tax.Text & "') "
ExecuteSQL(strSQL)
If MessageBox.Show("ต้องการบันทึกใช่หรือไม่? ", "คำยืนยัน", _
MessageBoxButtons.YesNo, MessageBoxIcon.Question) = vbYes Then
End If
|
 |
 |
 |
 |
Date :
2012-02-10 11:41:20 |
By :
webmaster |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
1. Query1 เกิดจากการ Join ของตารางหรือเปล่า
2. ถ้าไม่ใช่ ก็แสดงว่า Access ไม่อนุญาตให้ Insert ผ่าน Query ต้อง Insert เข้า Table อย่างเดียวเท่านั้น
|
 |
 |
 |
 |
Date :
2012-02-10 12:44:10 |
By :
watcharop |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
ไม่น่าจะได้ครับ มันเหมือน view ครับ คือ น่าจะ INSERT/UPDATE ไม่ได้ครับ
|
 |
 |
 |
 |
Date :
2012-02-10 13:39:43 |
By :
webmaster |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
ขอบคุณสำหรับคำตอบของทุกคนนะคับ
|
 |
 |
 |
 |
Date :
2012-02-10 13:49:17 |
By :
batabin |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
ขอบคุณมากๆครับ ผมเข้าใจเกี่ยวกับฐานข้อมูลผิด T-T
ใช้ insert หลายตารางก็ได้ใช่มั้ยครับ
|
 |
 |
 |
 |
Date :
2012-02-10 21:54:03 |
By :
batabin |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
|
|