FiveTech Software tech support forums

... oRs:Sort := "id"
for each v in { "Manzana", "Pera", "Naranja", "Mandarina", "Mango", "Banana", "Papaya", "Grape", "Guva", "Durian" }
oRs:AddNew( "fruit", v )
next

return oRs

//----------------------------------------------------------------------------//

function InsertFruits( oRs ...

... oCn, "fruits" )
oRs:Sort := "id"
for each v in { "Manzana", "Pera", "Naranja", "Mandarina", "Mango", "Banana", "Papaya", "Grape" }
oRs:AddNew( "fruit", v )
next

return oRs

//----------------------------------------------------------------------------//

function InsertFruit( oRs ...

... Append( "fldDate", adDate )

END
oCat:Tables:Append( oTable )

? "created"

oRs := FW_OpenRecordSet( oCn, "select * from " + cTable )
oRs:AddNew( { "fldint", "fldtext", "fldbool", "fldDate" }, ;
{ 99, "FiveWin", .t., hb_DateTime() } )
oRs:MoveFirst()

aTypes := {}
for n := 0 to oRs ...

... dar de alta el registro y luego:

wvar = MEMOREAD( ".\TestRTF.RTF" )
oRsRTF := CargaRecordSet( "select * from demo1 where id = 2", CadenaCon )
oRsRTF:ADDNEW()
oRsRTF:Fields( "testo" ):Value := STRTOHEX(wvar)
oRsRTF:Update()
oRsRTF:Close()

de esta manera lo guarda sin errores.

Saludos
Jorge

Hola, buenas tardes, alguien me puede explicar porque la forma de cargar una foto A lo hace perfecto y la B me error

A: oRS1Cli:ADDNEW()
oRs1Cli:Fields( "foto" ):Value := STRTOHEX( MEMOREAD( "foto.jpg"))

B: jj := STRTOHEX( MEMOREAD( "foto.jpg" ))
sqldetl = "INSERT INTO vehiculos_fotos ([Codigo ...

... colNvalue } }

If you want to insert the data into another existing RowSet with identical structure, you can do it using oRs2:AddNew( aFields, aRows[ 1 ] ) }
But you can not create a new rowset in memory with this data.
A RowSet can be created ONLY by reading data from the MySql ...

... colNvalue } }

If you want to insert the data into another existing RowSet with identical structure, you can do it using oRs2:AddNew( aFields, aRows[ 1 ] ) }
But you can not create a new rowset in memory with this data.
A RowSet can be created ONLY by reading data from the MySql ...

... and holds it in the client's memory.

We normally open recordsets using adLockOptimistic .

All calls to the methods Update(), Delete() and AddNew( aCols, aVals ) make the changes to the underlying database immediately and are visible to other users on the network.

We can also open the ...

... the English version first and then the Italian one in another folder

The author is American

L egal Department
NCH Software, Inc.
6120 Greenwood Plaza Blvd
Greenwood Village CO, 80111
USA

the software is free and can be found on this site

m

there are also the snapshot ( see the invoice addnew)

... in Opening CUSTOMER table here" ) RETURN(.F.)END TRYSelect 1Use Customer via "DBFCDX" EXCLGo topDO while .not. eof() oRsCust:AddNew() oRsCust:Fields("CustomerEid"):Value := "011111111111111111" // generate any random number for your primary key oRsCust:Fields&#40 ...

... local oDlg,lSalvar := .f.,vcodigo:=space(21),vnombre:=space(33)
local lSaved := .f.

IF lNuevo
oRs:AddNew()
ENDIF



DEFINE DIALOG oDlg SIZE 500,210 PIXEL ;
TITLE "Prueba de la Clase Fwh mariadb"
oDlg:lHelpIcon := .f.

@ 20, 20 SAY "Codigo" SIZE ...

... cuando estoy adicionando un registro.
Cambio la estructura de los campos que estan en Null a Not Null tampoco.
Asi:

IF lNuevo
oRsResolu:AddNew()
ENDIF
oRsResolu:Fields("CODIGO"):value :=oUni:vCodigo-------->AQUI GRABA BIEN ESTE CAMPO
oRsResolu:Fields("NOMIP01"):value :=oUni:vPropie ...

Servicomver:

Ya entrados en gastos, te recomiendo que no uses la función oRs:AddNew() + oRs:Update(), mas adelante
te puedes encontrar con pequeños problemas, en su lugar utiliza los comandos INSERT INTO y UPDATE.

Saludos
I have been using ADO from the time it was released by Microsoft. Used with ...

Servicomver:

Ya entrados en gastos, te recomiendo que no uses la función oRs:AddNew() + oRs:Update(), mas adelante
te puedes encontrar con pequeños problemas, en su lugar utiliza los comandos INSERT INTO y UPDATE.

Saludos

Para ingresar un registro en una Tabla SQL hago:

oRecordSet:Addnew()
oRecordSet:Fields("Bill_num"):value := alltrim(Var1)
oRecordSet:Update()

Para borrar:
oRecordSet:Delete()
oRecordSet:Requery()

Como seria para buscar la Variable xRFC ??
oRecordSet:Find( xRfc, If( lContinue, 1, 0 ) ) //Asi marca ...