FiveTech Software tech support forums

goosfancito:

mira esto,
http://forums.fivetechsupport.com/viewt ... xt#p228072

Silvio: Try this    @  8, 75 COMBOBOX aGet[1] VAR cFormato ITEMS aFormati SIZE 50,90 PIXEL OF oDlg;         ON CHANGE (cambiapagina(@nAltezza, @nLarghezza,aget,cFormato,lOrizontale), oDlg:Update)   it change the value from 29.7 to 30 why ???????    @ 22, 75 GET aGet[2] VAR nLarghezza SIZE 50,12 PIXE...

Adriano en el foro puedes encontrar muchos ejemplos de accesar a tablas sql, aqui tienes un ejemplo #include "ado.ch" #include "xbrowse.ch"    xsource:="localhost"   //nombre servidor    xCatalog:="arturo"     // nombre bd    xUserID:= "root"       /...

Adriano
me parece que tienes que agregarlo desde el sql management studio, presiona attach y selecciona tu archivo .mdf

Hola remtec con ! y dbseek() tambien deberia de funcionar FUNCTION Crea_Lista()    FIELD NAME  // CAMPO DEL BD    LOCAL oDlg2, oBrw2, oFont2, oFont4, otitu2, oFont5, oFont6, oFont10    LOCAL oGroup, oGroup1, oGroup2    PRIVATE  oGet1, oGet2, oGet3, oGet4 ,  oGet5, oGet6, oGet7, oGet8, oGet9, ;      ...

Excellent!

Silvio: at the beginning, ncounter should be 0 Dear artu01, I have been looking for solutions for a week, turning the forum many times and all my saves from 1992 to today, from fw14.4 to the penultimate 32-bit version of 2020, unfortunately I can't try the 16-bit exes because I have to find old 16-...

Dear Antonio, IF I made ( I saw a Nages topic) local nCounter := 1 and then oReport:bFor := { || If((dInicio <= CU->HIREDATE .AND. CU->HIREDATE <= dFinal), (nCounter++, .t. ), .f. ) }         ACTIVATE REPORT oReport   ;        ON STARTGROUP oReport:NewLine() ;              ON END ( oReport:StartLin...

Hola a todos Para agregar un registro en un ambiente de red a un fichero dbf/cdx venía utilizando el codigo: nIntentos := 5 cAlias    := "ALIAS" lUnLock   := .F. DO WHILE .T.    (cAlias)->(dbAppend(lUnLock))    If !NetErr() // Si no hay error       RETURN .t.    EndIf    If nIntentos <=0 ...

Silvio:
Add it

Carlos. El siguiente es codigo parcial que utilizo en uno de mis sistemas de facturacion. Espero te sea util como guía.  local bTotales := ;         {|| oBrw:Total:Value := oBrw:Cantidad:Value * oBrw:Precio:Value ,;               if(oBrw:PDesc:Value > 0, oBrw:VDesc:Value := Round( (oBrw:Total:Value...

Karinha, gracias por contestar Lo que me propones es lo mismo que hago yo, pero como en ocasiones se generaban registros vacios le agrege el movimiento del puntero en el area de trabajo y ahora en determinadas ocasiones (no se exactamento cual el la situación) se queda colgado en la orden (dbgoto) ...

It's understood Mr. Rao
Thank you

Thank you Master i had seen posts in this forum using the method save of this way  oRS:Fields( 'Descri' ):value:=cDescri  oRs:Save()   i myself have checked that it works but not always (that was the reason for my question) Using the method update() never fail oRS:Fields( 'Descri' ):value:=cDescri o...

Gente utilizo ADO para trabajar con tablas de sql server
Mi duda es algunas veces me funciona el oRs:save pero a veces bota error y no se el motivo, pero si utilizo oRs:Update siempre funciona

Cuando debo de utilizar cada una de ellas?

Estoy con la version fwh 17.12