Forgot Password ??

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

	Registered : 109,037

HOME > .NET Framework > Forum > เรื่อง delete record ใน datagrid คือ ทำแล้วค่ะ แต่ยังลบได้ทีละแค่ 1 record กำลังแก้ๆ ให้ลบได้ทีละหลายๆ record อยู่ค่ะ รบกวนผู้รู้ชอบตอบด้วยนะคะ

เรื่อง delete record ใน datagrid คือ ทำแล้วค่ะ แต่ยังลบได้ทีละแค่ 1 record กำลังแก้ๆ ให้ลบได้ทีละหลายๆ record อยู่ค่ะ รบกวนผู้รู้ชอบตอบด้วยนะคะ

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

Guest

เรื่อง delete record ทำแล้วค่ะ แต่ยังลบได้ทีละแค่ 1 record กำลังแก้ๆ ให้ลบได้ทีละหลายๆ record อยู่ค่ะ รบกวนผู้รู้ชอบตอบด้วยนะคะ
คือ ทำเป็นฟังก์ชันอ่าค่ะ
แล้วก้อเรียกใช้มันอีกทีตอนที่เรา คลิกปุ่ม ที่กำหนดไว้ว่าจะลบนะ
ลองดู ตัวอย่าง code ค่ะ

Private Function DelDietRecord() As Integer
Dim bCheckConnectComplete As Boolean
Dim bCheckCommandComplete As Boolean
Dim curRow As Integer
Dim result As MsgBoxResult
Dim strSql2 As String

strSql2 = "DELETE FROM DietRecord_Table WHERE RecordID=" & CStr(dgvDietRecord.CurrentRow.Cells(7).Value)
curRow = Me.dgvDietRecord.CurrentRow.Index
If Me.dgvDietRecord.Rows.Count <> 0 Then
result = MsgBox(DEL_CONFIRM, MsgBoxStyle.YesNo + MsgBoxStyle.Question) '//// DEL_CONFIRM คือ ตัวแปร constant
If result = MsgBoxResult.Yes Then
Me.dgvDietRecord.Rows.RemoveAt(curRow)
End If
Else
btnDelRecord.Enabled = False
End If

'/////// โซนล่างตรงนี้ ติดต่อดาต้าเบสค่ะ คือ เขียนไว้อีก class แล้วเรียกใช้เอาอ่าค่ะ
DatabaseDietRecord = New DatabaseDietRecord
bCheckConnectComplete = DatabaseDietRecord.Connect()
If bCheckConnectComplete = True Then
bCheckCommandComplete = DatabaseDietRecord.CreateCommand(strSql2)
If bCheckCommandComplete = True Then
ToolStripStatusLabel1.Text = STB_SHOW & " " & DEL_SUCCEED
End If
Else
MsgBox(DatabaseDietRecord.GetErrorMessage(), MsgBoxStyle.OkOnly & MsgBoxStyle.Exclamation)
End If

Tag : .NET, Ms Access, Crystal Report, VB.NET, VS 2005 (.NET 2.x)

Date : 2010-09-30 11:55:56

By : pup

View : 1326

Reply : 5

No. 1

Guest

ใครพอรุบ้าง ช่วยตอบที TT

Date : 2010-09-30 13:46:42

By : pup

No. 2

pheak

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

<asp:GridView ID="GridView1" runat="server" CellPadding="4" ForeColor="#333333"
GridLines="None" AutoGenerateColumns="false">
<RowStyle BackColor="#EFF3FB" />
<FooterStyle BackColor="#507CD1" Font-Bold="True" ForeColor="White" />
<PagerStyle BackColor="#2461BF" ForeColor="White" HorizontalAlign="Center" />
<SelectedRowStyle BackColor="#D1DDF1" Font-Bold="True" ForeColor="#333333" />
<HeaderStyle BackColor="#507CD1" Font-Bold="True" ForeColor="White" />
<EditRowStyle BackColor="#2461BF" />
<AlternatingRowStyle BackColor="White" />
<Columns>
<asp:TemplateField>
<ItemTemplate>
<asp:CheckBox ID="chkSelect" runat="server" />
</ItemTemplate>
</asp:TemplateField>
<asp:BoundField DataField="FirstName" SortExpression="FirstName" HeaderText="First Name" />
<asp:BoundField DataField="LastName" SortExpression="LastName" HeaderText="Last Name" />
<asp:BoundField DataField="Title" SortExpression="Title" HeaderText="Title" />
</Columns>
</asp:GridView>
<asp:Button ID="Button1" runat="server" Text="Button" />

aspx.vb

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim checkBox As CheckBox
For Each row As GridViewRow In GridView1.Rows
checkBox = CType(row.FindControl("chkSelect"), CheckBox)
If checkBox.Checked Then
Dim conn As SqlConnection = New SqlConnection(strCon)
Dim sql = "insert into VBClassEmp(FirstName,LastName,Title,AddBy,CreateDate) " & _
" values('" & row.Cells(1).Text & "','" & row.Cells(2).Text & "' " & _
",'" & row.Cells(3).Text & "','Pheak',GetDate()) "
Dim cmd As SqlCommand = New SqlCommand(sql, conn)
conn.Open()
cmd.ExecuteNonQuery()
conn.Close()
End If
Next

End Sub

Date : 2010-09-30 14:07:25

By : superpheak

No. 3

Guest

งง ค่ะ
แหะๆ
- -"

Date : 2010-09-30 14:11:38

By : pup

No. 4

koung_OldTraford

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

ลองใส่ checkbox ที่ Data Gride ดูครับ

แล้ว วนลุป หา ตัว ที chekbox เอาไว้แล้วทำการ Delete

for i as interger = 0 to DataGrid.rows.count - 1

dim chk as checkbox = datagrid.rows(i).findcotrol("ชื่อCheckbox")

if chk.checked = true then

datadrid.rows(i).delete
exit sub

end if

next

========================================
ลองไปประยุกต์ดูนะครับ....

ผิดถูกอย่างไร ก็ขอ อภัย ด้วยนะครับ...

Date : 2010-09-30 15:03:36

By : koungkung

No. 5

Guest

ขอบคุณนะคะ เด่วจะลองไปประยุกต์ใช้ดูค่ะ
^^

Date : 2010-09-30 18:02:43

By : pup

ค้นหาข้อมูล

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

Re : เรื่อง delete record ใน datagrid คือ ทำแล้วค่ะ แต่ยังลบได้ทีละแค่ 1 record กำลังแก้ๆ ให้ลบได้ทีละหลายๆ record อยู่ค่ะ รบกวนผู้รู้ชอบตอบด้วยนะคะ

รายละเอียด

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

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

Notice

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

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

โดย

อีเมล์

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