เรื่อง edit update gridview ภาษา vb.net หนูอยากได้ตัวอย่างโค้ด เมื่อเราคลิก edit แล้วแสดงข้อมูลบนฟอร์ม เพื่่อต้องการที่แก้ไข แล้วก้อ กด update

<%@ Page Title="Home Page" Language="VB" MasterPageFile="~/Site2.Master" AutoEventWireup="false"
    CodeFile="Staff.aspx.vb" Inherits="_Default" %>


<asp:Content ID="HeaderContent" runat="server" ContentPlaceHolderID="HeadContent">
  
</asp:Content>
<asp:Content ID="BodyContent" runat="server" ContentPlaceHolderID="MainContent">
    
    <p>
    
<table align="center" style="width: 545px">
    <tr>
        <td class="style1" colspan="2">
            
        </td>
       
    </tr>
    <tr>
        <td class="style7">
            รหัสเจ้าหน้าที่ :
        </td>
        <td class="style2">
            <asp:TextBox ID="txtstaff_id" runat="server" Height="22px" Width="180px" 
                style="margin-left: 3px"></asp:TextBox>
        </td>
    </tr>

     <%--<tr>
            <td class="style3">
            ประเภทผู้ใช้งาน :</td>
            <td class="style22" align=left>
               
                  <asp:DropDownList  ID="ddlpers" runat="server" Height="20px" 
                     Width="180px" style="margin-left: 0px; margin-bottom: 0px" 
                     DataTextField="pers_type_name" DataValueField="pers_type_id">
                     <asp:ListItem></asp:ListItem>
                 </asp:DropDownList>
                
                 <asp:CompareValidator ID="CompareValidator2" runat="server" 
                                ControlToValidate="ddlpers" ErrorMessage="กรุณาเลือกประเภทผู้ใช้งาน" 
                                Operator="NotEqual" ValueToCompare="==กรุณาเลือก==">
                 </asp:CompareValidator>
                
            </td>
            </tr>
    <tr>--%>
  
        <td class="style7">
            ชื่อ-สกุล :</td>
        <td class="style4">
            <asp:TextBox ID="txtstaff_name" runat="server" Height="22px" Width="179px" 
                style="margin-left: 3px"></asp:TextBox>
        </td>
    </tr>

    <tr>
        <td class="style7">
            E-mail :</td>
        <td class="style4">
            <asp:TextBox ID="txtemail" runat="server" Height="22px" Width="179px" 
                style="margin-left: 3px"></asp:TextBox>
        </td>
    </tr>

    <tr>
        <td class="style7">
            ที่อยู่ :</td>
        <td class="style4">
            <asp:TextBox ID="txtaddr" runat="server" Height="46px" Width="179px" 
                style="margin-left: 3px" TextMode="MultiLine"></asp:TextBox>
        </td>
    </tr>
    <%--    <tr>
        <td class="style3">
            วันเกิด :</td>
        <td class="style4">
           
             <asp:Calendar ID="Calendar1" runat="server" BackColor="White" 
                 BorderColor="Black" DayNameFormat="Shortest" Font-Names="Times New Roman" 
                 Font-Size="10pt" ForeColor="Black" Height="172px" NextPrevFormat="FullMonth" 
                 TitleFormat="Month" Width="173px">
                 <DayHeaderStyle BackColor="#CCCCCC" Font-Bold="True" Font-Size="7pt" 
                     ForeColor="#333333" Height="10pt" />
                 <DayStyle Width="14%" />
                 <NextPrevStyle Font-Size="8pt" ForeColor="White" />
                 <OtherMonthDayStyle ForeColor="#999999" />
                 <SelectedDayStyle BackColor="#CC3333" ForeColor="White" />
                 <SelectorStyle BackColor="#CCCCCC" Font-Bold="True" Font-Names="Verdana" 
                     Font-Size="8pt" ForeColor="#333333" Width="1%" />
                 <TitleStyle BackColor="Black" Font-Bold="True" Font-Size="13pt" 
                     ForeColor="White" Height="14pt" />
                 <TodayDayStyle BackColor="#CCCC99" />
             </asp:Calendar>
             </td>
    </tr>--%>
    
     <tr>
        <td class="style7">
            เบอร์โทร :</td>
        <td class="style4">
            <asp:TextBox ID="txttel_sff" runat="server" Height="22px" Width="179px" 
                style="margin-left: 3px"></asp:TextBox>
        </td>
    </tr>
 

   <tr>
            <td class="style7">
            ตำแหน่ง :</td>
            <td class="style22" align=left>
               
                  <asp:DropDownList ID="ddlposi" runat="server" style="margin-left: 0px; margin-bottom: 0px" 
                     DataTextField="posi_name" DataValueField="posi_id" Height="24px" 
                      Width="179px">
                     <asp:ListItem></asp:ListItem>
                  </asp:DropDownList>
               
                 <asp:CompareValidator ID="CompareValidator4" runat="server" 
                                ControlToValidate="ddlposi" ErrorMessage="กรุณาเลือกช่องทางส่งข้อมูล" 
                                Operator="NotEqual" ValueToCompare="==กรุณาเลือก==">
                 </asp:CompareValidator>
                
            </td>
            </tr>
    <tr>
            <td class="style7">
            หน่วยงาน :</td>
            <td class="style22" align=left>
               
                  <asp:DropDownList  ID="ddldept" runat="server" style="margin-left: 0px; margin-bottom: 0px" 
                     DataTextField="dept_name" DataValueField="dept_id" Height="24px" 
                      Width="182px">
                     <asp:ListItem></asp:ListItem>
                 </asp:DropDownList>
                
                 <asp:CompareValidator ID="CompareValidator1" runat="server" 
                                ControlToValidate="ddldept" ErrorMessage="กรุณาเลือกหน่วยงาน" 
                                Operator="NotEqual" ValueToCompare="==กรุณาเลือก==">
                 </asp:CompareValidator>
                
            </td>
            </tr>

   <tr>
         <td class="style5" colspan="2">
             &nbsp;</td>  
   </tr>

   <tr>
       <td class="style6" colspan="2">
        
              <asp:Button ID="btnSave" runat="server" Text="บันทึก" Width="84px" /> &nbsp;&nbsp;
               
              <asp:Button ID="btnCancel" runat="server" Text="ยกเลิก"  Height="26px" 
                  Width="82px" />
              &nbsp;&nbsp;
        
              <asp:Button ID="btnUpdate" runat="server" Text="แก้ไข" Width="84px" /> 
        </td> 

   </tr> 
   <tr>
        <td class="style6" colspan="2">
        
   <asp:SqlDataSource ID="SqlDataSource1" runat="server" 
            ConnectionString="<%$ ConnectionStrings:MaterialDurableStuffConnectionString %>" 
            SelectCommand="SELECT * FROM [tb_staff]"></asp:SqlDataSource>
         </td>
   </tr>  
  <tr>
          <td class="style6" colspan="2">
        <asp:GridView ID="GridView1" runat="server" AllowPaging="True" 
            AllowSorting="True" AutoGenerateColumns="False" BackColor="White" 
            BorderColor="#CCCCCC" BorderStyle="None" BorderWidth="1px" CellPadding="3" 
            DataKeyNames="staff_id" DataSourceID="SqlDataSource1" PageSize="5" 
            style="margin-top: 0px; text-align: center;">
            <Columns>
                <asp:BoundField DataField="staff_id" HeaderText="รหัสเจ้าหน้าที่" 
                    ReadOnly="True" SortExpression="staff_id" />
                <asp:BoundField DataField="staff_name" HeaderText="ชื่อเจ้าหน้าที่" 
                    SortExpression="staff_name" />
                <asp:BoundField DataField="email" HeaderText="อีเมล์" SortExpression="email" />
                <asp:BoundField DataField="addr" HeaderText="ที่อยู่" SortExpression="addr" />
                <asp:BoundField DataField="tel_staff" HeaderText="เบอร์โทร" 
                    SortExpression="tel_staff" />

               
               <asp:TemplateField HeaderText="แก้ไข">
		<ItemTemplate>
         <asp:HyperLink ID="lbEdit" runat="server" Style="text-decoration: underline" 
                Text='แก้ไข'></asp:HyperLink>
		</ItemTemplate>
	</asp:TemplateField>

               
                
            </Columns>
            <FooterStyle BackColor="White" ForeColor="#000066" />
            <HeaderStyle BackColor="#006699" Font-Bold="True" ForeColor="White" />
            <PagerStyle BackColor="White" ForeColor="#000066" HorizontalAlign="Left" />
            <RowStyle ForeColor="#000066" />
            <SelectedRowStyle BackColor="#669999" Font-Bold="True" ForeColor="White" />
            <SortedAscendingCellStyle BackColor="#F1F1F1" />
            <SortedAscendingHeaderStyle BackColor="#007DBB" />
            <SortedDescendingCellStyle BackColor="#CAC9C9" />
            <SortedDescendingHeaderStyle BackColor="#00547E" />
        </asp:GridView>
               
        </td>
   </tr> 
      
</p>
      
</asp:Content>

Imports System.Data
Imports System.IO
Imports System.Data.OleDb
Partial Class _Default
    Inherits System.Web.UI.Page
    Private Property BinaryReader As StreamReader
    Public ObjDb As New Datacenter.Data.clsDBSQLBased(ConfigurationManager.ConnectionStrings("ConStr").ToString)
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        If Not Page.IsPostBack Then
            bindposi()
            binddepartments()
            'BindData()
            Me.btnSave.Visible = True
            Me.btnCancel.Visible = True
        End If
    End Sub
    Protected Sub bindposi()
        Dim sql As String
        Dim dv As DataView
        sql = " SELECT posi_id,posi_name FROM [tb_position]"
        sql += " ORDER BY posi_id "
        dv = ObjDb.GetDataSet(sql).Tables(0).DefaultView
        If dv.Count > 0 Then
            Me.ddlposi.DataSource = dv
            Me.ddlposi.DataBind()
            Me.ddlposi.Items.Insert(0, "== กรุณาเลือก ==")
        End If
    End Sub
    Protected Sub binddepartments()
        Dim sql As String
        Dim dv As DataView
        sql = " SELECT dept_id,dept_name FROM [tb_departments]"
        sql += " ORDER BY dept_id "
        dv = ObjDb.GetDataSet(sql).Tables(0).DefaultView
        If dv.Count > 0 Then
            Me.ddldept.DataSource = dv
            Me.ddldept.DataBind()
            Me.ddldept.Items.Insert(0, "== กรุณาเลือก ==")
        End If
    End Sub
    Protected Sub SaveData()
        Dim sql As String

        sql = "INSERT INTO tb_staff(staff_id,staff_name,email,addr,tel_staff,pois_id,dept_id)"
        sql += " VALUES ('" & Trim(Me.txtstaff_id.Text) & "','" & Trim(Me.txtstaff_name.Text) & "', "
        sql += " '" & Trim(Me.txtemail.Text) & "','" & Trim(Me.txtaddr.Text) & "','" & Trim(Me.txttel_sff.Text) & "','" & Trim(Me.ddlposi.SelectedValue) & "','" & Trim(Me.ddldept.SelectedValue) & "') "

        Response.Write(sql)
        ObjDb.ExecuteNonQuery(sql)
        Page.ClientScript.RegisterStartupScript(Page.GetType(), "clientScript", "alert('บันทึกข้อมูลเรียบร้อย');", True)

    End Sub
    Protected Sub btnCancel_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnCancel.Click
        Me.txtstaff_id.Text = ""
        Me.txtstaff_name.Text = ""
        Me.txtemail.Text = ""
        Me.txtaddr.Text = ""
        Me.txttel_sff.Text = ""


    End Sub
    Protected Sub btnSave_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnSave.Click
        SaveData()
    End Sub

    Protected Sub UpdateData()
        Dim sql As String

        sql = " Update tb_staff SET staff_id='" & Trim(Me.txtstaff_id.Text) & "',staff_name='" & Trim(Me.txtstaff_name.Text) & "',email='" & Trim(Me.txtemail.Text) & "', "
        sql += " addr='" & Trim(Me.txtaddr.Text) & "',tel_staff='" & Trim(Me.txttel_sff.Text) & "' "
        sql += " pois_id='" & Trim(Me.ddlposi.SelectedValue) & "',dept_id='" & Trim(Me.ddldept.SelectedValue) & "' "
        sql += " WHERE staff_id ='" & Request.QueryString("staff_id") & "' " 'ส่วนการส่งid มันก็ ไม่ส่งให้ ต้องทำยังไงคะ ช่วยแนะนำ หน่อนนะคะ
        '
        '
        Response.Write(sql)
        ObjDb.ExecuteNonQuery(sql)
        Page.ClientScript.RegisterStartupScript(Page.GetType(), "clientScript", "alert('แก้ไขข้อมูลเรียบร้อย');", True)
    End Sub
    Protected Sub btnUpdate_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnUpdate.Click
        UpdateData()
    End Sub


End Class