Con i codici a barre ci si scontra
spesso e sono davvero utili e veloci, a questo proposito ho generato
un custom tag che server per visualizzare un codice a barre in formato
code-39 (o 3 di 9) è abbastanza semplice, cioè data
una stringa considera carattere per carattere e visualizza a video
la relativa immagine del codice a barre, la codifica code 39 però
vuole un punto esclamativo sia all’inizio che alla fine del codice.
Download del Custom Tag
<cf_barcode>
E’ attualmente pienamente funzionante, e prevedo che ci saranno
futuri sviluppi :-) almeno spero.
il codice è questo:
<!— cf_barcode
———————————————–
vers 0.9a
descr: generazione di un codice a barre attraverso il passaggio
di una stringa.
viene utilizzato il code 39 (o 3 di 9) ed ogni codice deve cominciare
con il punto esclamativo e finire con il punto esclamativo
per ora è possibile parrare solo stringhe numeriche il simbolo
del meno ed il simbolo del punto
Author: Enrico Zogno
data release: 28-07-2003
———————————————–
—>
<!— dir dove sono salvate le immagini
dei codici a barre —>
<cfparam name="imagedir"
default="/img-barcode">
<!— Attenzione questa variabile
indica il percorso ASSOLUTO della cartella delle immagini e termina
senza slash finale —>
<!— codice a barre da visualizzare
—>
<cfparam name="attributes.codice"
type="string" default="1234567890.-">
<!— altezza immagini —>
<cfparam name="attributes.h"
default="26">
<!— larghezza singola immagine
—>
<cfparam name="attributes.w"
default="11">
<!— larghezza totale codice
—>
<cfparam name="attributes.wtot"
default="0">
<!— testo alternativo per
le immagini —>
<cfparam name="attributes.alt"
type="string" default="Codice a barre">
<!— Elaborazione parametri
altezza e larghezza o larghezza totale —>
<!— se presente larghezza totale divido per lunghezza del codice
—>
<cfif attributes.wtot gt 0>
<cfset largh=int(attributes.wtot/len(codice)>
</cfif>
<!— se non lunghezza totale immagine
allora considero la singola lettera —>
<cfif attributes.wtot is 0>
<cfset largh=attributes.w>
</cfif>
<cfoutput>
<table cellpadding="0" cellspacing="0">
<tr>
<!— codice iniziale —>
<td><img src="#imagedir#/i.gif" alt="#attributes.alt#"
width="#largh#" height="#attributes.h#" border="0"></td>
<!— Comincio a visualizzare al
stringa come una serie di immagini —>
<cfloop index="i" from="1"
to="#len(attributes.codice)#" step="1">
<!— Singolo carattere della
stringa —>
<cfset car=mid(attributes.codice,i,1)>
<cfif isnumeric(car)> <!—
è un numero? —>
<td><img src="#imagedir#/#car#.gif" alt="#attributes.alt#"
width="#largh#" height="#attributes.h#" border="0"></td>
<cfelseif car is "-"> <!—
Carattere trattino —>
<td><img src="#imagedir#/trattino.gif" alt="#attributes.alt#"
width="#largh#" height="#attributes.h#" border="0"></td>
<cfelseif car is "."> <!—
carattere punto —>
<td><img src="#imagedir#/punto.gif" alt="#attributes.alt#"
width="#largh#" height="#attributes.h#" border="0"></td>
</cfif>
</cfloop>
<!— codice finale —>
<td><img src="#imagedir#/i.gif" alt="#attributes.alt#"
width="#largh#" height="#attributes.h#" border="0"></td>
</tr>
</table>
</cfoutput>
Qui è disponibile il codice completo comprensivo di immagini
per la codifica.
Download del Custom Tag
<cf_barcode>
Comments are closed.