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 > รบกวนเรื่องลบและแก้ไขข้อมูล ใน DateGetview ที่ครับผมทำการเพิ่มข้อมูลลง SQL Server 2005 โดยใช่ DateGetview ได้แล้วแต่ทำการลบกับแก้ไขไม่ได้ครับ



 

รบกวนเรื่องลบและแก้ไขข้อมูล ใน DateGetview ที่ครับผมทำการเพิ่มข้อมูลลง SQL Server 2005 โดยใช่ DateGetview ได้แล้วแต่ทำการลบกับแก้ไขไม่ได้ครับ

 



Topic : 064506



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



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




Code (VB.NET)
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.OleDb

Public Class Form1

    Private Sub login_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles login.Click


        Dim dtAdapter As SqlDataAdapter
        Dim objConn As SqlConnection
        Dim dt As New DataTable

        Dim strConnString As String
        strConnString = "Server=ZEROYAKI;Uid=sa;PASSWORD=1234;database=user;"
        objConn = New SqlConnection(strConnString)
        objConn.Open()

        Dim strSQL As String
        strSQL = "SELECT * FROM tbl_user WHERE username = '" & Me.TextBox1.Text & "'" & _
        " AND password = '" & Me.TextBox2.Text & "'" & _
        " AND user_id = '" & Me.TextBox3.Text & "'"

        dtAdapter = New SqlDataAdapter(strSQL, objConn)
        dtAdapter.Fill(dt)

        dtAdapter = Nothing
        objConn.Close()
        objConn = Nothing

        If dt.Rows.Count <= 0 Then
            MessageBox.Show("Invalid Username & Password")
        Else

            'TODO: This line of code loads data into the 'UserDataSet.tbl_user' table. You can move, or remove it, as needed.
            Me.Tbl_userTableAdapter.Fill(Me.UserDataSet.tbl_user)
            
        End If

    End Sub


    Private Sub add_data_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles add_data.Click
        Dim objConn As New SqlConnection
        Dim objCmd As New SqlCommand
        Dim dtAdapter As SqlDataAdapter
        Dim dt As New DataTable

        Dim strConnString, strSQL, strSQLinsert, strConnStringinsert As String

        strConnString = "Server=ZEROYAKI;Uid=sa;PASSWORD=1234;database=user;"
        objConn.ConnectionString = strConnString
        objConn.Open()

        strSQL = "SELECT * FROM tbl_user WHERE username = '" & Me.TextBox1.Text & "'" & _
        " AND password = '" & Me.TextBox2.Text & "'" & _
        " AND user_id = '" & Me.TextBox3.Text & "'"
        dtAdapter = New SqlDataAdapter(strSQL, objConn)
        dtAdapter.Fill(dt)

        dtAdapter = Nothing
        objConn.Close()
        objConn = Nothing

        If dt.Rows.Count > 0 Then
            MessageBox.Show("มีข้อมูลชื่อผู้ใช้นี้แล้ว กรุณาเพิ่มชื่อผู้ใช้ใหม่")
        Else
            Dim objConn2 As New SqlConnection
            Dim objCmd2 As New SqlCommand

            strConnStringinsert = "Server=ZEROYAKI;Uid=sa;PASSWORD=1234;database=user;"
            objConn2.ConnectionString = strConnStringinsert
            objConn2.Open()

            strSQLinsert = "INSERT INTO tbl_user " & _
          " VALUES ('" & Me.TextBox3.Text & "','" & Me.TextBox1.Text & "','" & Me.TextBox2.Text & "')"

            dtAdapter = New SqlDataAdapter(strSQLinsert, objConn2)
            dtAdapter.Fill(dt)


            With objCmd2
                .Connection = objConn2
                .CommandText = strSQLinsert
                .CommandType = CommandType.Text
            End With

            objConn2.Close()
            objConn2 = Nothing

            MessageBox.Show("เพิ่มข้อมูลชื่อผู้ใช้เรียบร้อย")

        End If



    End Sub



    Private Sub Tbl_userBindingNavigatorSaveItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Tbl_userBindingNavigatorSaveItem.Click
        Me.Validate()
        Me.Tbl_userBindingSource.EndEdit()
        Me.TableAdapterManager.UpdateAll(Me.UserDataSet)

    End Sub


    Private Sub BindingNavigatorDeleteItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BindingNavigatorDeleteItem.Click


    End Sub
End Class





Tag : .NET, Ms SQL Server 2005, VB.NET, VS 2010 (.NET 4.x)









ประวัติการแก้ไข
2011-08-10 17:39:35
Move To Hilight (Stock) 
Send To Friend.Bookmark.
Date : 2011-08-09 20:19:34 By : ZEROYAKI View : 1196 Reply : 4
 

 

No. 1



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

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

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

คำสั่ง Update/Delete อยู่ตรงไหนครับ






แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2011-08-09 21:06:43 By : webmaster
 


 

No. 2



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



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


ยังไม่ได้เขียนเลยครับพี่ครับ

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


    End Sub



ตรงนี้มันเป็นปุ่มลบใน DateGet อ่ะครับพี่
มันต้องเขียนในนี้หรือป่าวครับ

ผมไม่รู้ว่าต้องเขียนตรงไหน
ช่วยทีครับ ผม ไม่เคยเขียนมาก่อนเลย งงๆ อ่ะครับ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2011-08-10 16:43:22 By : ZEROYAKI
 

 

No. 3



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



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


นั้นเป็นปุ่ม เซฟ ในDateGridอ่ะครับพี่
เขียนแค่นี้มันก็ เพิ่ม ข้อมูลเข้าฐานข้อมูลได้แล้วครับ

Code (VB.NET)
 Private Sub Tbl_userBindingNavigatorSaveItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Tbl_userBindingNavigatorSaveItem.Click
        Me.Validate()
        Me.Tbl_userBindingSource.EndEdit()
        Me.TableAdapterManager.UpdateAll(Me.UserDataSet)

    End Sub


แต่อันที่เป็นปุ่ม ลบ อ่ะครับ
มันลบได้นะครับ แต่มันไม่ได้ลบในฐานให้ อ่ะครับ
มันต้องเขียนคำสั่งยังไงอ่ะครับให้มันลบในฐานข้อมูล แล้ว เซฟได้อ่ะครับ
Code (VB.NET)
Private Sub BindingNavigatorDeleteItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BindingNavigatorDeleteItem.Click


    End Sub


(รบกวนที่นะครับ ตารางข้อมูลผมชื่อ tbl_user มี user_id,username,password อ่ะครับ ฐานข้อมูลชื่อ ZEROYAKI ครับช่วยผมด้วยครับ )


ประวัติการแก้ไข
2011-08-10 17:43:10
2011-08-10 18:23:49
2011-08-11 17:19:22
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2011-08-10 17:03:08 By : ZEROYAKI
 


   

ค้นหาข้อมูล


   
 

แสดงความคิดเห็น
Re : รบกวนเรื่องลบและแก้ไขข้อมูล ใน DateGetview ที่ครับผมทำการเพิ่มข้อมูลลง SQL Server 2005 โดยใช่ DateGetview ได้แล้วแต่ทำการลบกับแก้ไขไม่ได้ครับ
 
 
รายละเอียด
 
ตัวหนา ตัวเอียง ตัวขีดเส้นใต้ ตัวมีขีดกลาง| ตัวเรืองแสง ตัวมีเงา ตัวอักษรวิ่ง| จัดย่อหน้าอิสระ จัดย่อหน้าชิดซ้าย จัดย่อหน้ากึ่งกลาง จัดย่อหน้าชิดขวา| เส้นขวาง| ขนาดตัวอักษร แบบตัวอักษร
ใส่แฟลช ใส่รูป ใส่ไฮเปอร์ลิ้งค์ ใส่อีเมล์ ใส่ลิ้งค์ 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 อัตราราคา คลิกที่นี่