[vb] กดปุ่มลบบน GridView แล้วลบออกจาก 2 table ซึ่งอยู่คนละ database

Sub GridView10_RowDeleting(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewDeleteEventArgs) Handles GridView10.RowDeleting

        Dim ConDB As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\DataHead.mdb"
        con = New OleDbConnection(ConDB)
        con.Open()

        query = "DELETE FROM tblAbsent "
        query &= "WHERE IDAbsent = " & GridView10.DataKeys(e.RowIndex).Value & " "

        com = New OleDbCommand(query, con)
        com.ExecuteNonQuery()
        con.Close()


        Dim ConDB2 As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\TimeTemp.mdb"
        con2 = New OleDbConnection(ConDB2)
        con2.Open()

        query2 = "DELETE FROM tblTime "
        query2 &= "WHERE DateKey = '" & GridView10.DataKeys(e.RowIndex).Value & "' "
        query2 &= "AND Codeid = '" & GridView10.DataKeys(e.RowIndex).Value & "' "

        com2 = New OleDbCommand(query2, con2)
        com2.ExecuteScalar()
        con2.Close()
        Response.Redirect("adminedit.aspx")

    End Sub