Titolo: Come confrontare due blob
Categoria: Codice |
|
Ultimo Aggiornamento: 24/05/04 |
Ecco un metodo semplice per sapere se due blob sono uguali; ovviamente il primo controllo che fa è che siano della stessa lunghezza e poi controlla carattere per carattere. Da notare che in questo modo i caratteri sono contrallati esattamente, cioè un carattere maiuscolo è diverso dallo stesso minuscolo (case sensitive).
`Metodo: confrontaBlob
`Parametri:
` $1 = Blob; $2 = Blob
`Risultato:
` $0: Vero se uguali, altrimenti falso
C_BLOB($1;$2)
C_BOOLEAN($0)
If (
BLOB size($1)=
BLOB size($2))
$0:=
True For ($vByte;0;
BLOB size($1)-1)
If ($1{$vByte}#$2{$vByte})
$0:=
False $vByte:=
BLOB size($1)
End if End for Else $0:=
FalseEnd if
Inviato da: Umberto Migliore |
|
Visite: 13376 |
Se accedi con utente e password, puoi aggiungere dei commenti.