Hola todos,
Tengo unas DBF que tienen algunos campos numéricos (normalmente sin decimales).
¿Cómo los encriptarían ustedes?
Muchas gracias,
nRetCLAVE := ( DbEmpresa:cAlias )->NCGCCLAVE // numerico
nSequencial := ( nRetCLAVE ) * 3 + 87654321
cCLAVE := STR( nSequencial )
cCampoClave := ENCRYPT( ALLTRIM( cCLAVE ), "*+-." )
? cCampoClave
TRABAREG(0)
REPLACE SEQUENCIA WITH cCampoClave
DESTRABA(0)
karinha wrote:Talvéz:
- Code: Select all Expand view
nRetCLAVE := ( DbEmpresa:cAlias )->NCGCCLAVE // numerico
nSequencial := ( nRetCLAVE ) * 3 + 87654321
cCLAVE := STR( nSequencial )
cCampoClave := ENCRYPT( ALLTRIM( cCLAVE ), "*+-." )
? cCampoClave
TRABAREG(0)
REPLACE SEQUENCIA WITH cCampoClave
DESTRABA(0)
Saludos.
Return to FiveWin para Harbour/xHarbour
Users browsing this forum: No registered users and 11 guests