Portal    Foro    Buscar    FAQ    Registrarse    Conectarse

Portal » Foro » Gambas » General

Fecha y hora actual: Jueves, 02 May 2024, 19:23 • Todas las horas son UTC + 1 Hora
Ver tema anterior Temas recientes Habilitar biblioteca Descargar tema Versión imprimible Correo a un amigo Ver siguiente tema

Como Bajar Una Linea De Codigo Larga En Gambas


Publicar nuevo tema  Responder al tema  		Página 2 de 2
Ir a la página Anterior  1, 2
 
Como Bajar Una Linea De Codigo Larga En Gambas
Autor Mensaje
Desconectado shordi Sexo: Masculino
Analista Programador
Analista Programador
avatar
Registrado: Septiembre 2009
Mensajes: 4982
Edad: 64
Ubicación: spain.png Albacete
 
 
Responder citando   Descargar mensaje  
Mensaje Re: Como Bajar Una Linea De Codigo Larga En Gambas 
 
Haseo:
Ahorras algunas pulsaciones si escribes:
sql = "insert into contactos(cedula,nhistoria,nombre,apellido,sino,estadocivil,estudios,analfabeta,"
sql &= "aprobados,lnacimiento,fnacimiento,estado,pais,direccion,telefono,religion,establecimiento,"
sql &=  "municipio,parroquia,comunidad,etnias,madre,ocupacion,padres,ocupacion1,representante)"
sql &= "values('" & TxtCedula.Text & "','" & Txthistoria.Text & "','" & TxtNombre.Text & "',"
sql &=  "'" & TxtApellido.Text & "','" & CombSexo.Text & "','" & CombEstadoCivil.Text & "','" & CombEstudios.Text & "',"
sql &=  "'" & CombAnalfabeta.Text & "',"
sql &= "'" & Txtanosaprobados.Text & "','" & Txtnacimiento.Text & "','" & Txtfnacimiento.Text & "',"
sql &=  "'" & Txtestado.Text & "','" & Txtpais.Text & "','" & Txtdireccion.Text & "','" & Txttelefono.Text & "',"
sql &=  "'" & Txtreligion.Text & "','" & Txtestablecimiento.Text & "','" & Txtmuninicipio.Text & "','" & Txtparroquia.Text & "',"
sql &= "'" & Txtcomunidad.Text & "','" & Txtetnias.Text & "','" & Txtmadre.Text & "','" & Txtocupacion.Text & "','" & Txtpadre.Text & "',"
sql &=  "'" & Txtocupacion1.Text & "','" & CombRepresentante.Text & "')"  
agregar = conexion.$Con.Exec(sql)

 



 
última edición por shordi el Miercoles, 13 Febrero 2013, 09:38; editado 1 vez 
#11  Miercoles, 13 Febrero 2013, 09:38
shordi - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Desconectado jguardon Sexo: Masculino
Administrador
Administrador
avatar
Registrado: Septiembre 2009
Mensajes: 2708
Edad: 57
Ubicación: spain.png Granada
 
 
Responder citando   Descargar mensaje  
Mensaje Re: Como Bajar Una Linea De Codigo Larga En Gambas 
 
Este es más elegante, si cabe, ya que prescindimos de tanto operador de concatenación y comillas, siempre tan proclives a confusiones.

Además no tenemos que preocuparnos de los tipos de campos (si son cadenas, fechas o números) ya que gambas se encarga de construir la consulta correctamente.
Los argumentos de Con.Exec() a partir del segundo, funcionan como en el método Subst(). Todavía no entiendo cómo algunos siguen usando el rollo de las comillas y los ampersand para concatenar o construir consultas como ésta.

Y sí, si... funciona sin problemas

  sql = "insert into contactos(cedula,nhistoria,nombre,apellido,sino,estadocivil,estudios,analfabeta,"
  "aprobados,lnacimiento,fnacimiento,estado,pais,direccion,telefono,religion,establecimiento,"
  "municipio,parroquia,comunidad,etnias,madre,ocupacion,padres,ocupacion1,representante) "
  "values(&1,&2,&3,&4,&5,&6,&7,&8,&9,&{10},&{11},&{12},&{13},&{14},&{15},&{16},&{17},&{18},&{19},&{20},"
  "&{21},&{22},&{23},&{24},&{25},&{26});"
  
  agregar = conexion.$Con.Exec(sql, TxtCedula.Text, Txthistoria.Text, TxtNombre.Text, TxtApellido.Text,
    CombSexo.Text, CombEstadoCivil.Text, CombEstudios.Text, CombAnalfabeta.Text, Txtanosaprobados.Text,
    Txtnacimiento.Text, Txtfnacimiento.Text, Txtestado.Text, Txtpais.Text, Txtdireccion.Text, Txttelefono.Text,
    Txtreligion.Text, Txtestablecimiento.Text, Txtmuninicipio.Text, Txtparroquia.Text, Txtcomunidad.Text,
    Txtetnias.Text, Txtmadre.Text, Txtocupacion.Text, Txtpadre.Text, Txtocupacion1.Text, CombRepresentante.Text)



Saludos
 




===================
Jesús Guardón

Por favor, usemos el corrector ortográfico antes de pulsar el botón "Enviar".

"uo ǝs ʇɐu pıɟıɔıן ɐdɹǝupǝɹ ɐ dɹoƃɹɐɯɐɹ, soןo ɥɐʎ bnǝ dɹodouǝɹsǝןo"
 
#12  Miercoles, 13 Febrero 2013, 17:59
jguardon - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Como Pasar Los Graficos A Codigo Fuente En... metalgearxd General 5 Martes, 22 Enero 2013, 20:15 Ver último mensaje
Dani26
No hay nuevos mensajes Como Bajar Una Linea De Codigo Larga En G... metalgearxd General 6 Miercoles, 30 Enero 2013, 04:31 Ver último mensaje
razaAztk
No hay nuevos mensajes Función Con Muchos Parámetros. Una Linea... Shell General 2 Martes, 15 Abril 2014, 13:31 Ver último mensaje
vuott
No hay nuevos mensajes Seguir En Siguiente Linea De Codigo stongench General 8 Domingo, 14 Junio 2015, 10:33 Ver último mensaje
Shell
 

Publicar nuevo tema  Responder al tema  Página 2 de 2
Ir a la página Anterior  1, 2

Portal » Foro » Gambas » General

Fecha y hora actual: Jueves, 02 May 2024, 19:23 • Todas las horas son UTC + 1 Hora
Ver tema anterior Temas recientes Habilitar biblioteca Descargar tema Versión imprimible Correo a un amigo Ver siguiente tema

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno

 
Lista de permisos
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario


  

 
cron