Visual Basic.NET - DATAREAD

HOLA LES CUENTO QUE TENGO ESTE CODIGO EL CUAL ME ARROJA ERROR DE SISTEMA, EL CONFLITO ESTA EN EL DATAREAD YA QUE AL EJECUTAR LA INSTRUCCION CON EL PURO INSERT INGRESA LOS DATOS A LA TABLA ABONO PERO ASI NO ME SIRVE YA QUE PARA INGRESAR DATOS A ESTA TABLA DEBO TENER EL DATO ANTES EL RESERVA

Dim query As String = "SELECT id_reserva from reserva WHERE id_reserva='" & aux_rev & "'"
Dim exquery As New MySqlCommand(query, connection)
connection.Open()
Dim dato As MySqlDataReader = exquery.ExecuteReader()
If dato.Read() = True Then
If IsNumeric(aux_monto) Then
If IsNumeric(aux_serie) Then
'sentencias sql
Dim eSql As String
eSql = "INSERT INTO abono(id_abono,id_reserva,monto,id_moneda,numserie,id_tarjetas) " & _
"VALUES('" & aux_abono & "','" & aux_rev & "','" & aux_monto & "','" & aux_money & "','" & aux_serie & "','" & aux_tar & "')"
Dim comand As New MySqlCommand(eSql, connection)
Dim resultado As Integer
connection.open
resultado = comand.ExecuteNonQuery()
connection.close

Hola

Si no me equivoco, el problema es que el DataReader mantiene la conexión abierta, y más aún, no puedes abrir otra conexión mientras este este ejecutandose, por lo que debes cerrar el reader antes de insertar en tu tabla

Saludos

GRACIAS EDGAR TENIAS TODA LA RAZON, CERRE EL DATAREAD ANTES DE INSERTAR EL LA TABLA Y FUNCIONO PERFECTAMENTE.