Prueba esto. Es lo mismo que te puse arriba, pero con tus nombres de campos, a ver si así lo entiendes.
Como ves, mucho más claro y sencillo que la cadena sql.

Lo que es a mi esta forma me parece mucho mas adecuada, incluso para debuggear que estás metiendo pero bueno ... para gustos los colores.

shordi escribió: [Ver mensaje]

Prueba esto. Es lo mismo que te puse arriba, pero con tus nombres de campos, a ver si así lo entiendes.
Como ves, mucho más claro y sencillo que la cadena sql.

Código: [Descargar] [Ocultar] [Seleccionar]

Código: [Descargar] [Mostrar]

PRIVATE db AS NEW Connection

PUBLIC FUNCTION conexion() AS Boolean
 db.close()
 db.type = "mysql"
 db.host = "10.5.225.24"
 db.login = "laraujo"
 db.password = "*********"
 db.open()
 RETURN TRUE
 CATCH
 message.error(Error.text)
 RETURN FALSE
 END
 
PUBLIC SUB Button2_Click()  '<<<---------Boton Guardar

dim rs as result
dim contrl as object

rs=db.create("SIET.datos")

rs!Titulo= Trim(UCase(TextBox1.Text))  
rs!Autor= UCase(Trim(TextBox2.Text))
rs!Fecha=Trim(UCase(TextBox3.Text))
rs!Precio=Trim(UCase(TextBox4.Text))
rs!Descripcion=Trim(UCase(TextBox5.Text))
rs!Genero=Trim(UCase(TextBox6.Text))

rs.update

for each contrl in me.controls
   if contrl is textbox then
        contrl.Clear()
   endif
next

    TextBox1.SetFocus
  
END

MUCHISIMAS GRACIASSS ESTE ME FUNCIONO DE MARAVILLA
GRACIAS POR LA PACIENCIA DE VERDAD ESTUVE VARIOS DIAS ALLANDO LA FORMA PERO ERA POR QUE SOLO SABIA ESE METODO PARA GUARDAR, HASTA QUE ME TOPE CON ESTE SISTEMA QUE NECESITABA GUARDAR VARIOS DATOS
               
GRACIAS POR LA PACIENCIA.