Inicio > Visual FoxPro > cesarpech > exportar datos de postgres con datos text

exportar datos de postgres con datos text

Experto:
Usuario:
Fecha: 16/04/2008
Valoración: (5,00 sobre 5) Categoría: Visual FoxPro
19/03/2008
sergio182, usuario preguntando en Visual FoxPro
Usuario
hola tengo un problema, cuando exporto datos de la base de datos postgres me trae a un combo box en formato memo. y yo quiero que me traiga en caracter de doy el ejemplo de como hago.
PRIVATE result
IF conexion<= 0
= MESSAGEBOX('Conexion fallida')
ELSE
= MESSAGEBOX('Conexion existosa')
result=SQLEXEC(conexion,"Select tipo from tipos_ca_operacion order by tipo ;",'crstipos_ca_operacion')&& envía una instrucción SQL
IF result<0
= MESSAGEBOX('Conexion fallida')
ENDIF
ENDIF
thisform.cbotipos_ca_operacion.RowSource= 'crstipos_ca_operacion.tipo'
es asi como lo hago pero cuando ejecuto el formulario m trae formao memo porque en la base de datos esta el campo en formato TEXT. si me pueden ayudar como hago con i cursor o algo asi. gracias
19/03/2008
sergio182, experto respondiendo en Visual FoxPro
Experto
Para que te lo traiga en texto, el ancho del texto debe ser menor a 254 caracteres, probablemente estés usando mas, por eso te lo regresa en MEMO.
24/03/2008
sergio182, usuario preguntando en Visual FoxPro
Usuario
en d0nde verifico eso, lo que pasa que la base de datos no puedo tocar. yo utilizo un cursor para que me traiga y me tire en un combo box, yo nose ti tengo que cambiar mi cursor o poner en algun tipo de formato. si tnes un ejemplo para facilitar. muchas gracias desde ya.
PRIVATE result
IF conexion<= 0
= MESSAGEBOX('Conexion fallida')
ELSE
= MESSAGEBOX('Conexion existosa')
result=SQLEXEC(conexion,"Select tipo from tipos_ca_operacion order by tipo ;",'crstipos_ca_operacion')&& envía una instrucción SQL
IF result<0
= MESSAGEBOX('Conexion fallida')
ENDIF
ENDIF
thisform.cbotipos_ca_operacion.RowSource= 'crstipos_ca_operacion.tipo'
 esta es la forma que hago.
 
26/03/2008
sergio182, experto respondiendo en Visual FoxPro
Experto
tendrias que hacer un segundo cursor:
select left(tipo,254) from tipos_ca_operacion into cursor 'crstipos_ca_operacion2 order by tipo
 
y en tu combo podnrias:
thisform.cbotipos_ca_operacion.RowSource= 'crstipos_ca_operacion2.tipo'
thisform.cbotipos_ca_operacion.Refresh
28/03/2008
sergio182, usuario preguntando en Visual FoxPro
Usuario
amigo probe asi como me diste el ejemplo, pero que pasa eso solo se utiliza para comandos de consulta de visual foxpro9 para consulta de posgret es otra la cual nose me sigue dando error y no me trae aun, ya nose como hacer probe muchas formas y sigo con lo mismo. te envio el ejemplo tuyo para que te recuerdes cual es el problema gracias amigo, pero si tenes una forma mas me podes mandar el ejemplo pero lo antes posible porque estoy retrazado en el proyecto.
*!* tendrias que hacer un segundo cursor:
*!* select left(tipo,254) from tipos_ca_operacion into cursor 'crstipos_ca_operacion2 order by tipo
*!*
*!* y en tu combo podnrias:
*!* thisform.cbotipos_ca_operacion.RowSource= 'crstipos_ca_operacion2.tipo'
*!* thisform.cbotipos_ca_operacion.Refresh
15/04/2008
sergio182, experto respondiendo en Visual FoxPro
Experto
que error te genera?
16/04/2008
sergio182, usuario preguntando en Visual FoxPro
Usuario
hola experto, ya me salio amigo te queria agradecer.
ahora tengo un pequeño problema amigo es con la grilla. quiero cargar un datos calculados, que se encuetran en un text box la forma que hago es asi :
Thisform.grid_Operaciones_Realizadas.colDescOpeReal.text1.Value= thisform.txtdescOpeCaj.value
thisform.grid_Operaciones_Realizadas.colImporteOpeReal.text1.value= thisform.txtMontoPagar.value
y no me carga los valores que se encuentran en el textbox en la grilla y quiero saber porque es el problema si es de grilla o es de comandos. gracias
Enlaces patrocinados