• Viernes 8 de Noviembre de 2024, 23:14

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - helidel

Páginas: [1]
1
Visual FoxPro / Re: Contar Registros De Una Tabla
« en: Miércoles 16 de Agosto de 2006, 03:36 »
Hola Jessy, la consulta sería mas o menos así:

select count(*) as total from nametable where len(alltrim(margesi))=0 into cursor fantasma && consulta
if _tally<>0 then && si la consulta devulve registros
  select fantasma
  go top
  thisform.text1.value=str(fantasma.total)
else
 thisform.text1.value='No hay Registros en Blanco'
endif

&& espero te haya ayudado.

2
Visual FoxPro / Re: Compatibilidad De Foxpro
« en: Martes 15 de Agosto de 2006, 05:15 »
ya que instalaste el programa de desarrollo has un seguimiento para saber en donde ocurre el error, de esta manera sabras que sucede, o como dice electro pasa el proyecto y lo hacemos por ti, jajajjajajajajajaj, mentiras trata de corregirlo!!!!!!!!!

3
Visual FoxPro / Re: Sistema Hotelero
« en: Martes 15 de Agosto de 2006, 05:10 »
De seguro habrá una solición, pasalo y veremos en que se te puede ayudar compañero

4
Visual FoxPro / Re: Conteo De Registros
« en: Martes 15 de Agosto de 2006, 05:07 »
Código: Text
  1. &#60;ruta de control&#62;.txtResultado.Value =alltrim(str(_tally))
  2.  

5
Visual FoxPro / Re: Ingresar Datos Desde Un Grid A Una Caja De Texto
« en: Martes 15 de Agosto de 2006, 04:52 »
Hola Yessi, yo lo haría de esta forma:

en el evento ..interactichange del textbox iria el codigo mas o menos asi,

&& almaceno lo digitado en una variable

cadena=alltrim(this.value)

&& genero la consulta con los registros que coincidan con el parametro ingresago

select * from tablename where nombrefield like '%'+'&cadena'+'%' into cursor fantasma

&&selecciona el cursor lectura-escritura del formulario donde se encuentra el grid

select cursor_temp
zap &&elimino el contenido del cursor
append from dbf('fantasma')  &&agrego el resultado de la consulta
go top  && ubico el cursor en el primer registro
 
&&en la propiedad name del formulario donde se encuentra el grid indica un nombre para identificarlo posterior mente name=FRM_BUSQ

&&busco el formulario en la aplicacion actual
for i=1 to _screen.formcount
  if upper(_screen.forms(i).name)='FRM_BUSQ'
    _screen.forms(i).grid1.refresh
 endif
next

notas:
para realizar el append from dbf() el cursor a actualizar y la consulta deben tener los mismos campos con los mismos nombres

no vincules la tabla directamente, usa en el grid un cursor readwrite para actualizarlo posteriormente

espero me halla hecho entender, y suerte.

Páginas: [1]