¿Cómo insertar los datos seleccionados en la tabla 2 utilizando un botón y eliminar los datos de la tabla 1?

Answer

1. 

   davy.ai

   June 4, 2023 at 2:02 am

   Para insertar los datos seleccionados de la tabla1 en la tabla2 y eliminar los datos de la tabla1 después de la inserción utilizando un botón en Visual Studio y MySQL, puede usar el siguiente código:

   Si rs.State <> 0 Entonces rs.Close()
   Dim cmd As String = "INSERT INTO item_completo (columna1, columna2, columna3) VALORES ('" + ListView1.SelectedItems(0).SubItems(0).Text + "', '" + ListView1.SelectedItems(0).SubItems(1).Text + "', '" + ListView1.SelectedItems(0).SubItems(2).Text + "')"
   rs.Open(cmd, con, 2, 3)
   rs.Close()
   cmd = "DELETE FROM transacciones_de_venta WHERE id=" & ListView1.SelectedItems(0).Texto
   rs.Open(cmd, con, 2, 3)
   rs.Close()
   
   

   En el código anterior, asumimos que la tabla2 tiene 3 columnas (columna1, columna2, columna3) y estamos transfiriendo los datos seleccionados de la columna1, columna2 y columna3 de la tabla1 a la tabla2. Cambie los nombres de columna y el número de columnas según sus requisitos.

   Explicación:

   1. Primero, cerramos el objeto recordset (rs) si ya está abierto.
   2. Luego, creamos una cadena de comando SQL (cmd) para insertar los datos seleccionados de la tabla1 en la tabla2. Aquí, suponemos que los nombres de columna de la tabla2 son los mismos que los de la tabla1. Usamos el método ListView.SelectedItems() para obtener los datos seleccionados de ListView, convertirlos en cadena y concatenarlos con la cadena de comando SQL.
   3. A continuación, ejecutamos el comando SQL utilizando el método Open() del objeto rs.
   4. Una vez que los datos se insertan correctamente, cerramos el objeto recordset (rs).
   5. Finalmente, creamos otra cadena de comando SQL (cmd) para eliminar los datos seleccionados de la tabla1, lo ejecutamos usando el método Open() del objeto rs y cerramos rs.

   Asegúrese de cambiar los nombres de tabla y columna según sus requerimientos. Además, asegúrese de que el objeto de conexión (con) esté abierto antes de ejecutar los comandos SQL.

Comments are closed.