Register Register Member Login Member Login Member Login Forgot Password ??
PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone
 

Registered : 109,027

HOME > .NET Framework > Forum > No value given for one or more required parameters ช่วยดูให้ทีครับผม



 

No value given for one or more required parameters ช่วยดูให้ทีครับผม

 



Topic : 084934



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

สมาชิกที่ใส่เสื้อไทยครีเอท

สถานะออฟไลน์
Facebook



Code (VB.NET)
Imports System.Data
Imports System.Data.OleDb
Public Class frmMemberchk
    Const database_file As String = "C:\Users\Patongko01\Documents\Visual Studio 2010\Projects\OVOCAFE\OVOCAFE\ovocafe.mdb"
    Dim strConnection As String = "provider=microsoft.Jet.Oledb.4.0;" & "Data Source=" & database_file

    Dim conn As New OleDbConnection(strConnection)
    Dim cmd As New OleDbCommand
    Dim da As New OleDbDataAdapter
    Dim ds As New DataSet


    Private Sub frmMemberchk_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'TODO: This line of code loads data into the 'OvocafeDataSet.member' table. You can move, or remove it, as needed.
        Me.MemberTableAdapter.Fill(Me.OvocafeDataSet.member)

    End Sub



    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnedit.Click



    End Sub

    Private Sub btndel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btndel.Click


        If MessageBox.Show("Are you sure to delete?", "Confirm.", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) = DialogResult.Yes Then

            Dim strID As String = Me.DataGridView1(0, Me.DataGridView1.CurrentCell.RowIndex).Value.ToString()
            conn.Open()
            Dim cmd As OleDbCommand = conn.CreateCommand()
            cmd.CommandText = "DELETE FROM [member] WHERE id = '" & strID & "'"
            cmd.CommandType = CommandType.Text

            cmd.ExecuteNonQuery()
            conn.Close()
            MessageBox.Show("Delete Successfully")

        End If

    End Sub

    Private Function eRowIndex() As Object
        Throw New NotImplementedException
    End Function

End Class





vb conn

db

จะทำปุ่มลบนะครับ ลองแก้มาจากตัวอย่าง
https://www.thaicreate.com/dotnet/dotnet-windows-form-application-winapp.html

พอติ๊กที่ช่องข้อมูลที่จะลบ แล้วกดปุ่มลบ
ฟ้องเออเร้อ ตรง conn.open() ว่า No value given for one or more required parameters

ช่วยให้คำแนะนำทีครับผม

ขอบพระคุณมากครับ



Tag : .NET, Ms Access, Win (Windows App), VB.NET, Windows









ประวัติการแก้ไข
2012-10-04 00:11:06
2012-10-04 00:12:28
2012-10-04 00:14:31
Move To Hilight (Stock) 
Send To Friend.Bookmark.
Date : 2012-10-04 00:09:32 By : patongko01 View : 6714 Reply : 10
 

 

No. 1



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

สมาชิกที่ใส่เสื้อไทยครีเอท

สถานะออฟไลน์
Twitter Facebook

ลองดูชนิดของข้อมูลครับ ถ้าบน Access ค่าที่เป็น Number จะไม่ใช้ ID = 'xxx' ครับ จะเป็น ID = xxx



No value given for one or more require parameters

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






แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2012-10-04 10:52:25 By : mr.win
 


 

No. 2



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

สมาชิกที่ใส่เสื้อไทยครีเอท

สถานะออฟไลน์
Facebook

ขอบคุณมากครับพี่
เดียวผมจะลองแก้ดู พร้อมกับศึกษากระทู้ที่แนะนำมาครับ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2012-10-04 11:56:33 By : patongko01
 

 

No. 3



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

สมาชิกที่ใส่เสื้อไทยครีเอท

สถานะออฟไลน์
Twitter Facebook

ลองดูครับ ได้วิธีแก้ไขยังไงบอกด้วยครับ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2012-10-04 12:15:18 By : mr.win
 


 

No. 4



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



สถานะออฟไลน์


cmd.CommandText = "DELETE FROM [member] WHERE id = '" & strID & "'"

เปลี่ยนเป็น
Code
cmd.CommandText = "DELETE FROM [member] WHERE IDMember = '" & strID & "'"

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2012-10-04 15:46:42 By : SeedNew
 


 

No. 5



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

สมาชิกที่ใส่เสื้อไทยครีเอท

สถานะออฟไลน์
Facebook

ขอบคุณมากครับท่าน SeedNew

ยังไม่ได้มีโอกาศได้กลับไปหน้าจอโปรแกรมที่บ้าน เลยครับ เดียวถ้าแก้แล้วจะรีบกลับมารายงานครับผม
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2012-10-05 00:34:29 By : patongko01
 


 

No. 6



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

สมาชิกที่ใส่เสื้อไทยครีเอท

สถานะออฟไลน์
Twitter Facebook


แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2012-10-05 08:15:50 By : mr.win
 


 

No. 7



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

สมาชิกที่ใส่เสื้อไทยครีเอท

สถานะออฟไลน์
Facebook

เรียบร้อยครับผม แก้เป็นแบบนี้ครับ

Code (VB.NET)
 Private Sub btndel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btndel.Click


        If MessageBox.Show("Are you sure to delete?", "Confirm.", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) = DialogResult.Yes Then

            Dim strID As Integer = Me.DataGridView1(0, Me.DataGridView1.CurrentCell.RowIndex).Value.ToString()
            conn.Open()
            Dim cmd As OleDbCommand = conn.CreateCommand()
            cmd.CommandText = "DELETE FROM [member] WHERE IDMember =  " & strID & ""
            cmd.CommandType = CommandType.Text

            cmd.ExecuteNonQuery()
            conn.Close()
            MessageBox.Show("Delete Successfully")

        End If

    End Su


ส่วนใน Access แก้ IDMember จาก text เป็น Number ครับ
แก้จาก strlD จาก String เป็น Integer
แก้ส่วนของ DELETE FROM ตามท่าน SeedNew ครับผม


แก้ได้แล้วครับ

ขอสอบถามเพิ่มอีกนิดครับ ถ้าอยากลบแล้วให้ตารางอัพเดทเลย ต้องใช้คำสั่งอะไรครับผม
พอดีลบแล้วตารางมันไม่อัพเดทครับ ต้องปิดหน้า form แล้วเปิดใหม่ถึงจะอัพเดทครับ
โค๊ดตามด้านล่างนี้เลยครับ


Code (VB.NET)
Imports System.Data
Imports System.Data.OleDb
Public Class frmMemberchk
    Const database_file As String = "C:\Users\Patongko01\Documents\Visual Studio 2010\Projects\OVOCAFE\OVOCAFE\ovocafe.mdb"
    Dim strConnection As String = "provider=microsoft.Jet.Oledb.4.0;" & "Data Source=" & database_file

    Dim conn As New OleDbConnection(strConnection)
    Dim cmd As New OleDbCommand
    Dim da As New OleDbDataAdapter
    Dim ds As New DataSet


    Private Sub frmMemberchk_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'TODO: This line of code loads data into the 'OvocafeDataSet.member' table. You can move, or remove it, as needed.
        Me.MemberTableAdapter.Fill(Me.OvocafeDataSet.member)

    End Sub

    Private Sub BindDataGrid()

        Dim dt As New DataTable
        conn.Open()
        Dim myCommand As OleDbCommand = conn.CreateCommand()
        myCommand.CommandText = "SELECT [IDMember], [MemberCount], [MemberTotal] FROM [member]"
        myCommand.CommandType = CommandType.Text

        da = New OleDbDataAdapter(myCommand)
        da.Fill(dt)

        conn.Close()

        Me.DataGridView1.DataSource = dt

        Me.DataGridView1.Columns.Clear()

        Dim column As DataGridViewTextBoxColumn


         column = New DataGridViewTextBoxColumn()
        column.DataPropertyName = "IDMember"
        Me.DataGridView1.Columns.Add(column)

        column = New DataGridViewTextBoxColumn()
        column.DataPropertyName = "MemberCount"
        Me.DataGridView1.Columns.Add(column)

        column = New DataGridViewTextBoxColumn()
        column.DataPropertyName = "MemberTotal"
        Me.DataGridView1.Columns.Add(column)
     

        dt = Nothing

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnedit.Click



    End Sub

    Private Sub btndel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btndel.Click


        If MessageBox.Show("Are you sure to delete?", "Confirm.", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) = DialogResult.Yes Then

            Dim strID As Integer = Me.DataGridView1(0, Me.DataGridView1.CurrentCell.RowIndex).Value.ToString()
            conn.Open()
            Dim cmd As OleDbCommand = conn.CreateCommand()
            cmd.CommandText = "DELETE FROM [member] WHERE IDMember =  " & strID & ""
            cmd.CommandType = CommandType.Text

            cmd.ExecuteNonQuery()
            conn.Close()
            MessageBox.Show("Delete Successfully")

            BindDataGrid()

        End If

    End Sub

    Private Function eRowIndex() As Object
        Throw New NotImplementedException
    End Function

End Class




ขอบคุณครับทั้งสองท่าน แก้ไปได้อีกก้าวนึง ดีใจมากเลยครับ


ประวัติการแก้ไข
2012-10-05 22:37:58
2012-10-05 23:03:37
2012-10-05 23:08:22
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2012-10-05 22:17:33 By : patongko01
 


 

No. 8



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

สมาชิกที่ใส่เสื้อไทยครีเอท

สถานะออฟไลน์
Twitter Facebook

สรุปก็คือเป็นที่ Data Type หรือเปล่าครับ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2012-10-06 07:36:34 By : mr.win
 


 

No. 9



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

สมาชิกที่ใส่เสื้อไทยครีเอท

สถานะออฟไลน์
Facebook

ใช่ครับพี่ เป็นที่ Data Type ครับ

ขอบคุณมากครับพี่
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2012-10-06 19:07:55 By : patongko01
 


 

No. 10



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

สมาชิกที่ใส่เสื้อไทยครีเอท

สถานะออฟไลน์
Twitter Facebook

ครับ จะได้จำไว้
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2012-10-06 20:58:36 By : mr.win
 

   

ค้นหาข้อมูล


   
 

แสดงความคิดเห็น
Re : No value given for one or more required parameters ช่วยดูให้ทีครับผม
 
 
รายละเอียด
 
ตัวหนา ตัวเอียง ตัวขีดเส้นใต้ ตัวมีขีดกลาง| ตัวเรืองแสง ตัวมีเงา ตัวอักษรวิ่ง| จัดย่อหน้าอิสระ จัดย่อหน้าชิดซ้าย จัดย่อหน้ากึ่งกลาง จัดย่อหน้าชิดขวา| เส้นขวาง| ขนาดตัวอักษร แบบตัวอักษร
ใส่แฟลช ใส่รูป ใส่ไฮเปอร์ลิ้งค์ ใส่อีเมล์ ใส่ลิ้งค์ FTP| ใส่แถวของตาราง ใส่คอลัมน์ตาราง| ตัวยก ตัวห้อย ตัวพิมพ์ดีด| ใส่โค้ด ใส่การอ้างถึงคำพูด| ใส่ลีสต์
smiley for :lol: smiley for :ken: smiley for :D smiley for :) smiley for ;) smiley for :eek: smiley for :geek: smiley for :roll: smiley for :erm: smiley for :cool: smiley for :blank: smiley for :idea: smiley for :ehh: smiley for :aargh: smiley for :evil:
Insert PHP Code
Insert ASP Code
Insert VB.NET Code Insert C#.NET Code Insert JavaScript Code Insert C#.NET Code
Insert Java Code
Insert Android Code
Insert Objective-C Code
Insert XML Code
Insert SQL Code
Insert Code
เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

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

Notice

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

   
  เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง
 
โดย
อีเมล์
บวกค่าให้ถูก
<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)







Exchange: นำเข้าสินค้าจากจีน, Taobao, เฟอร์นิเจอร์, ของพรีเมี่ยม, ร่ม, ปากกา, power bank, แฟลชไดร์ฟ, กระบอกน้ำ

Load balance : Server 02
ThaiCreate.Com Logo
© www.ThaiCreate.Com. 2003-2024 All Rights Reserved.
ไทยครีเอทบริการ จัดทำดูแลแก้ไข Web Application ทุกรูปแบบ (PHP, .Net Application, VB.Net, C#)
[Conditions Privacy Statement] ติดต่อโฆษณา 081-987-6107 อัตราราคา คลิกที่นี่