Comunidad Gambas-es

Update en dos tablas a todo o nada en Gambas

gambafeliz 20-04-2022, 11:36

Hola

Necesito actualizar dos tablas donde ambas tienen que ser datos válidos para actualizar o de lo contrario debe no existir la actualización.

¿Como se hace en Gambas y SQLite3 como DataBase?

Gracias.

Nota: Yo hasta ahora siempre uso:

Código:
' Ejemplo de como lo hacia

Dim sSQL AS String = "UPDATE miTabla SET Valor=" & sValor & " WHERE miTabla.ID=" & lblID.Text & ";"      '(Debe dar error)

gConn.Exec(sSQL)

' Mi solución

Dim sSQL AS String = "UPDATE miTabla SET Valor=" & sValor & " WHERE miTabla.ID=" & lblID.Text & ";"      '(Debe dar error)

gConn.Begin()

         gConn.Exec(sSQL)

gConn.Commit()

Catch

        gConn.Rollback()

Bases de Datos Respuestas 2

Han usado Connection.Edit en un Result

gambafeliz 17-04-2022, 19:14

Hola

Alguien a usado Connection.Edit en un Result con la intensión siguiente. Si uno hace un Connection.Exec("Select * From tabla") uno obtiene los datos en un Result. Pero alguien ha experimentado esta idea, osea, Result = Connection.Edit("tabla", sCriteria, iParameter) y con los datos obtenidos poderlos usar como si de un Result = Connection.Exec, donde usas los datos pero que también puedes editar los datos internos del Result para seguir usándolos en el programa sin que al final actualices nada en la tabla origen.

¿Me explique la idea?
¿Alguien lo ha realizado y le a funcionado?

General Respuestas 3

RegExp para validar Email

omoreno 16-04-2022, 21:40

Hola a todos.

Gambas 3.17.2
Componente: gb.pcre
Clase: RegExp

En la ayuda del componente gb.pcre, clase RegExp colocan un ejemplo de expresión regular para validar los formatos de email:

(?i)\b[a-z0-9._%\-]+@[a-z0-9._%\-]+\.[A-Z]{2,4}\b

Con la expresión regular anterior, estoy intentando validar el texto de un objeto WebTextBox asi:

Código:
   If Not RegExp.Match(WebTxt_Email.Text, "(?i)\b[a-z0-9._%\-]+@[a-z0-9._%\-]+\.[A-Z]{2,4}\b") Then

     WFrmMensajesX.MostrarMensajes("ERR", "Formato de email incorrecto")

     WebTxt_Email.SetFocus()

     Return True

   Endif

Pero me marca un error en la compilación: "carácter de constante de cadena incorrecto..."

[Imagen: qgLfYlH.png]