Forgot Password ??

PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone

	Registered : 109,038

HOME > .NET Framework > Forum > Error ที่ cmd.ExecuteNonQuery() ใน Update โดยขึ้นว่า No value given for one or more required parameters

[.NET] Error ที่ cmd.ExecuteNonQuery() ใน Update โดยขึ้นว่า No value given for one or more required parameters

เริ่มหัวข้อใหม่

โพสกระทู้ ( 216 )
บทความ ( 0 )

น่าจะเป็นที่ชนิดของข้อมูลไม่ตรงกับฐานข้อมูล?

ซึ่งไม่รู้ว่าจะเขียนยังไงถ้าชนิดข้อมูลในฐานข้อมูลเป็นNumber

รายละเอียดของชนิดข้อมูลในฐานข้อมูลมีดังนี้

ID                             ชนิด        Autonumber(ไม่ได้สร้างไว้ในvb)
ID_Product              ชนิด        Number  (ได้สร้างกล่องคำสั่งผสมไว้โดยมีทั้งตัวเลขและข้อความคือ 10 ส้ม 11ฝรั่ง)
out_num                  ชนิด        Number
out_student             ชนิด       Text
out_store                 ชนิด       Text
out_date                  ชนิด        Date/Time

Code (VB.NET)

Private Sub RefreshData()
       If Not con.State = ConnectionState.Open Then
           'open connection
           con.Open()
       End If
       Dim da As New OleDbDataAdapter("SELECT semet as [ID_Product], " & _
                                   "txtnum as [out_num], txtna1 as [out_student], txtna2 as [out_store]," & _
                                   "txtdate as [out_date]" &
                                   "FROM tb_Out_Product ORDER BY semat ", con)
 
 
 
 
       Dim dt As New DataTable
       'fill data to datatable
       da.Fill(dt)
 
       'offer data in data table into datagridview
       Me.DataGridView1.DataSource = dt
 
       'close connection
       con.Close()
 
   End Sub
 
   
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles add.Click
 
       Dim cmd As New OleDbCommand
       If Not con.State = ConnectionState.Open Then
           'open connection
           con.Open()
       End If
 
       cmd.Connection = con
 
 
       If semat.SelectedItem = "" Then
           MessageBox.Show("กรุณาเลือกสินค้า")
           Me.semat.Focus()
           Exit Sub
       End If
       If txtnum.Text = "" Then
           MessageBox.Show("กรุณากรอกจำนวน")
           Me.txtnum.Focus()
           Exit Sub
       End If
       If txtna1.Text = "" Then
           MessageBox.Show("กรุณากรอกชือ")
           Me.txtna1.Focus()
           Exit Sub
       End If
 
       If txtna2.Text = "" Then
           MessageBox.Show("กรุณากรอกชื่อ")
           Me.txtna2.Focus()
           Exit Sub
       End If
       If txtdate.Value.ToShortDateString = "" Then
           MessageBox.Show("กรุณาเลือกวัน")
           Me.txtdate.Focus()
           Exit Sub
       End If
 
 
       'check whether add new or update
       If Me.semat.Tag Then
           'add new
           'add data to table
 
           cmd.CommandText = " INSERT INTO tb_Out_Product(ID_Product, out_num, out_student, out_store, out_date)" & _
                             " VALUES ('" & Me.semat.Text & "','" & Me.txtnum.Text & "','" & _
                             Me.txtna1.Text & "','" & Me.txtna2.Text & "','" & _
                            Me.txtdate.Text & "')"
 
           cmd.CommandType = CommandType.Text
           cmd.ExecuteNonQuery()
       Else
           'update data in table
           cmd.CommandText = "Update tb_Out_Product SET " & _
                           " ID_Product= '" & Me.semat.SelectedItem & "' " & _
                           " ,out_num= '" & Me.txtnum.Text & "' " & _
                           " ,out_student= '" & Me.txtna1.Text & "' " & _
                           " ,out_store= '" & Me.txtna2.Text & "' " & _
                           " ,out_date1= '" & Me.txtdate.Value.ToShortDateString & "' " & _
                           " WHERE ID_Product= '" & Me.semat.Tag & "' "
 
           cmd.ExecuteNonQuery()
       End If
 
 
 
       'refresh data in list
       RefreshData()
 
 
       'close connection
       con.Close()
 
 
   End Sub

Tag : .NET, Ms Access, VB.NET, VS 2012 (.NET 4.x)

Date : 2015-07-18 09:31:14

By : peemes101

View : 2063

Reply : 8

No. 1

TC Admin

โพสกระทู้ ( 74,059 )
บทความ ( 838 )

ถ้า MS Access แสดง Error นี้เป็นที่ DataType ครับ เช่นถ้า Number จะใช้ ' ' ไม่ได้ครับ

Code

            cmd.CommandText = "Update tb_Out_Product SET " & _
                            " ID_Product= '" & Me.semat.SelectedItem & "' " & _
                            " ,out_num= '" & Me.txtnum.Text & "' " & _
                            " ,out_student= '" & Me.txtna1.Text & "' " & _
                            " ,out_store= '" & Me.txtna2.Text & "' " & _
                            " ,out_date1= '" & Me.txtdate.Value.ToShortDateString & "' " & _
                            " WHERE ID_Product= '" & Me.semat.Tag & "' "

No value given for one or more require parameters

สอบถามปัญหาการ update ข้อมูลครับ เกิด error ตรง dtAdapter.Fill(dt) รายละเอียดด้านในเลยครับ

Date : 2015-07-18 11:06:16

By : mr.win

No. 2

โพสกระทู้ ( 216 )
บทความ ( 0 )

เอา '.........' ออกแล้ว ที่ out_num
แต่ก็ยังขึ้นerror เหมือนเดิม

แต่พอเอาออกที่ID_Product ขึ้นว่า"Syntax error (missing operator) in query expression '101 ส้ม
หมายความว่าอย่างไร

ประวัติการแก้ไข
2015-07-18 12:04:09

Date : 2015-07-18 11:57:05

By : peemes101

No. 3

TOR_CHEMISTRY

โพสกระทู้ ( 4,440 )
บทความ ( 23 )

ทำไมยังใช้ SQL เดิม ยุละครับไม่เอาที่มันใช้ได้แล้วมาใช้ละ

Date : 2015-07-19 09:09:27

By : lamaka.tor

No. 4

โพสกระทู้ ( 216 )
บทความ ( 0 )

แล้วอะไรคือที่มันใช้ได้ล่ะ
ที่คุณบอกตอนนั้นมันerror ว่า syntax error in UPDATE statement

เพราะในฐานข้อมูลเป็นแบบนี้
ID ชนิด Autonumber(ไม่ได้สร้างไว้ในvb)
ID_Product ชนิด Number (ได้สร้างกล่องคำสั่งผสมไว้โดยมีทั้งตัวเลขและข้อความคือ 10 ส้ม 11ฝรั่ง)
out_num ชนิด Number
out_student ชนิด Text
out_store ชนิด Text
out_date ชนิด Date/Time

โค้ดที่ใช้ล่าสุด
ที่คุณTCmin ให้เอา ' ' ออก

ก็ยังขึ้นว่า no value given for one or more required parameters อยู่ดี

Code (VB.NET)

If Me.semat.Tag Then
           'add new
           'add data to table
 
 
 
           cmd.CommandType = CommandType.Text
           cmd.CommandText = " INSERT INTO tb_Out_Product(ID_Product, out_num, out_student, out_store, out_date)" & _
                             " VALUES ('" & Me.semat.SelectedItem & "'," & Me.txtnum.Text & ",'" & _
                             Me.txtna1.Text & "','" & Me.txtna2.Text & "','" & _
                            Me.txtdate.Value.ToShortDateString & "')"
 
       Else
           'update data in table
           cmd.CommandText = "Update tb_Out_Product SET " & _
                           " ID_Product= '" & Me.semat.SelectedItem & "' " & _
                           " ,out_num= " & Me.txtnum.Text & _
                           " ,out_student= '" & Me.txtna1.Text & "' " & _
                           " ,out_store= '" & Me.txtna2.Text & "' " & _
                           " ,out_date1= '" & Me.txtdate.Value.ToShortDateString & "' " & _
                           " WHERE ID_Product= '" & Me.semat.Tag & "' "

ประวัติการแก้ไข
2015-07-19 09:49:52
2015-07-19 10:17:07
2015-07-19 10:18:52

Date : 2015-07-19 09:43:59

By : peemes101

No. 5

noon

โพสกระทู้ ( 181 )
บทความ ( 0 )

แนะนำดังนี้ครับ

Id_Product เปลี่ยนชนิดข้อมูลเป็น Text ซะ ไม่จำเป็นต้องเป็น Number ผสมอย่างที่คุณว่า

out_num= " & txtnum.Text & _ ' ไม่จำเป็นต้องใช้ Me.txtnum. text ก็ได้ครับ

การเก็บวันที่ เพื่อสะดวกและประโยชน์ในการจัดเรียงข้อมูลวันหน้า ควรเก็บแยกเป็น คนละ Field เช่น วันที่ เดือน ปี

พารามีเตอร์ตัวไหนไม่ชัดเจน ในการต่อสตริง พวก ' ... " ... & ลองเปลี่ยนแล้วรันทดสอบดูครับ

ขอให้โปรแกรมของคุณประสพผลสำเร็จครับ

Date : 2015-07-19 21:23:09

By : noonkamfunt

No. 6

TC Admin

โพสกระทู้ ( 74,059 )
บทความ ( 838 )

ลองดูพวก , ในค่าตัวเลขด้วยครับ หรือไม่ Debug SQL ออกมาดูก็จะรู้แล้วครับ

Date : 2015-07-20 10:19:52

By : mr.win

No. 7

TOR_CHEMISTRY

โพสกระทู้ ( 4,440 )
บทความ ( 23 )

ตอบความคิดเห็นที่ : 4 เขียนโดย : peemes101 เมื่อวันที่ 2015-07-19 09:43:59

รายละเอียดของการตอบ ::

https://www.thaicreate.com/dotnet/forum/117746.html

ที่เหลือก้แค่ดู datatype ว่าตรงกับ access หรือป่าวครับ

Date : 2015-07-20 11:42:25

By : lamaka.tor

No. 8

FONFIRE

โพสกระทู้ ( 821 )
บทความ ( 0 )

ลอง Update ทีล่ะ field ดูครับ
ไล่ไปเรื่อย ๆ จะได้รู้ว่า Error ที่ตัวไหน

Date : 2015-07-20 12:49:11

By : fonfire

ค้นหาข้อมูล

แสดงความคิดเห็น

Re : Error ที่ cmd.ExecuteNonQuery() ใน Update โดยขึ้นว่า No value given for one or more required parameters

รายละเอียด

เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

อัพโหลดแทรกรูปภาพ

Notice

เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ
อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง

เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง

โดย

อีเมล์

บวกค่าให้ถูก

<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)

Registered : 109,038

document.write("<font color=996600>[.NET]</font>"); [.NET] Error ที่ cmd.ExecuteNonQuery() ใน Update โดยขึ้นว่า No value given for one or more required parameters

No. 1

No. 2

No. 3

No. 4

No. 5

No. 6

No. 7

No. 8

ค้นหาข้อมูล

อัพโหลดแทรกรูปภาพ

Notice

[.NET] Error ที่ cmd.ExecuteNonQuery() ใน Update โดยขึ้นว่า No value given for one or more required parameters