Here is a server side javascript that generates an HTML table which displays a
type 39 code. If that is what you need this has worked well for me for several
years.
Paste the attached into a WT server side javascript action.
You'll need to place a one pixel black and one pixel white gif on your
webserver - please just edit out
https://www.learningannex.com/js/b.gif and
https://www.learningannex.com/js/w.gif
and replace them with the URL for your server's images.
Then call it in a subsequent pane (where '1234567890' is your barcode variable):
<@assign request$barcode <@script expr="DisplayBarcode('fg', '1234567890' , 0,
15, 1);" encoding=none>>
And to show the barcode just use
<@var request$barcode encoding=none>
____________________
Quinn McLaughlin
Coincidence Networks
www.coincidence.net
831 458 1500
---------- Original Message ----------------------------------
From: Mark Weiss <[EMAIL PROTECTED]>
Reply-To: [email protected]
Date: Sat, 28 Jan 2006 09:46:45 -0800
>
>Hi All,
>
>On a windows Server Witango 5.5, I am creating order paperwork. I
>like to have a barcode on the top of each page.
>
>currently, I am pre-creating bar code jpegs to match the order
>numbers. I do this on a mac using a great program. Bar Code Creator.
>However, I would prefer having a script or something called from
>Witango that auto creates the jpg as needed.
>
>I can do this on a Mac Server using Applescript. But I know nothing
>about windows.
>
>further, I don't really want to use a bar code font, because if I
>understand this correctly, the client machines need the font and that
>isn't practical
>
>SO, may I ask for any suggestions this great group might have to help
>me solve my dilemma?
>
>Thanks
>
>Mark Weiss
>
>________________________________________________________________________
>TO UNSUBSCRIBE: Go to http://www.witango.com/developer/maillist.taf
>
________________________________________________________________________
TO UNSUBSCRIBE: Go to http://www.witango.com/developer/maillist.taffunction Code39(strDataToEncode, blnAddCheckDigit){
var ary3of9CharSet = new Array(43);
var strChar = "";
var lngCheckDigit = 0;
var lngCharIndex = 0;
var strEncode = "";
var strEncodeFormat = "";
var i = 0;
var j = 0;
var reg = new RegExp("[a-zA-Z0-9\-._\$\/+\%]");
var cstrGuard = "010010100";
var cstrPadd = "0";
var strEncodedString = "";
// numbers 0 to 9
ary3of9CharSet[0] = "000110100";
ary3of9CharSet[1] = "100100001";
ary3of9CharSet[2] = "001100001";
ary3of9CharSet[3] = "101100000";
ary3of9CharSet[4] = "000110001";
ary3of9CharSet[5] = "100110000";
ary3of9CharSet[6] = "001110000";
ary3of9CharSet[7] = "000100101";
ary3of9CharSet[8] = "100100100";
ary3of9CharSet[9] = "001100100";
// letters A to Z
ary3of9CharSet[10] = "100001001";
ary3of9CharSet[11] = "001001001";
ary3of9CharSet[12] = "101001000";
ary3of9CharSet[13] = "000011001";
ary3of9CharSet[14] = "100011000";
ary3of9CharSet[15] = "001011000";
ary3of9CharSet[16] = "000001101";
ary3of9CharSet[17] = "100001100";
ary3of9CharSet[18] = "001001100";
ary3of9CharSet[19] = "000011100";
ary3of9CharSet[20] = "100000011";
ary3of9CharSet[21] = "001000011";
ary3of9CharSet[22] = "101000010";
ary3of9CharSet[23] = "000010011";
ary3of9CharSet[24] = "100010010";
ary3of9CharSet[25] = "001010010";
ary3of9CharSet[26] = "000000111";
ary3of9CharSet[27] = "100000110";
ary3of9CharSet[28] = "001000110";
ary3of9CharSet[29] = "000010110";
ary3of9CharSet[30] = "110000001";
ary3of9CharSet[31] = "011000001";
ary3of9CharSet[32] = "111000000";
ary3of9CharSet[33] = "010010001";
ary3of9CharSet[34] = "110010000";
ary3of9CharSet[35] = "011010000";
// allowed symbols - . _ $ / + %
ary3of9CharSet[36] = "010000101";
ary3of9CharSet[37] = "110000100";
ary3of9CharSet[38] = "011000100";
ary3of9CharSet[39] = "010101000";
ary3of9CharSet[40] = "010100010";
ary3of9CharSet[41] = "010001010";
ary3of9CharSet[42] = "000101010";
// validate data to encode
// replace spaces w/ underscores
// remove all asterisks * (we will add t
// hem later)
// force upper case per spec
while (strDataToEncode.indexOf(" ") != -1) strDataToEncode =
strDataToEncode.replace(" ", "_");
while (strDataToEncode.indexOf("*") != -1) strDataToEncode =
strDataToEncode.replace("*", "");
strDataToEncode = strDataToEncode.toUpperCase();
// encode data using character set
// get the check digit calculation while
// we're at it
for (i = 0; i < strDataToEncode.length; i++){
strChar = strDataToEncode.substr(i, 1);
if (!reg.test(strChar)){
alert("Invalid Character Specified!");
return "";
}
switch (true){
case strChar == "-": lngCharIndex = 36; break;
case strChar == ".": lngCharIndex = 37; break;
case strChar == "_": lngCharIndex = 38; break;
case strChar == "$": lngCharIndex = 39; break;
case strChar == "/": lngCharIndex = 40; break;
case strChar == "+": lngCharIndex = 41; break;
case strChar == "%": lngCharIndex = 42; break;
case !isNaN(strChar): lngCharIndex = eval(strChar); break;
default: lngCharIndex = strChar.charCodeAt(0) - 55; break;
}
lngCheckDigit += lngCharIndex;
strEncode += ary3of9CharSet[lngCharIndex];
}
// finish the check-digit
lngCheckDigit %= 43;
// should we incorporate the check digit
// ?
if (blnAddCheckDigit != 0) strEncode += ary3of9CharSet[lngCheckDigit];
// add start/stop characters (asterisks
// "*")
strEncode = cstrGuard + strEncode + cstrGuard;
// now, format the output - the std aspe
// ct ratio is 3:1 per spec (used here)
//- the minimum ratio is 2:1 fyi.
// hint -- the odd/even value of the var
// iable "j" (found by "or-ing" by 1)
// indicates whether a bar or space shou
// ld be produced. the value (1 or 0) found
//
// in the string variable "strEncodeForm
// at" at the location of "j" indicates
// whether the bar/space should be a wid
// e or narrow element in the bar code.
for (i = 0; i < strEncode.length; i += 9){
strEncodeFormat = strEncode.substr(i, 9);
for (j = 0; j < 9; j++){
if ((j & 1) == 1){
strEncodedString += ((strEncodeFormat.substr(j, 1) == 1) ?
"000" : "0");
}else{
strEncodedString += ((strEncodeFormat.substr(j, 1) == 1) ? "111" :
"1");
}
}
strEncodedString += cstrPadd;
}
return strEncodedString;
}
function DisplayBarcode(div, val, checkdigit, h, w){
var val = Code39(val, checkdigit);
var htm = "";
var bit = 0;
var gif = "";
var lngPtr = 0;
if (isNaN(h)) h = 5;
if (isNaN(w)) w = 1;
if (h < 5) h = 5;
if (w < 1) w = 1;
// get a count of contiguous 1s or 0s un
// til the current value
// being counted changes, then, if the c
// urrent value is a 1, select the
// single black pixel .gif otherwise use
// the single white pixel .gif and
// stretch its width to the number of ch
// aracters counted - not forgetting to acc
// ount
// for the width of the bars the user ha
// s specified. that's it ...
for (lngPtr = 0; lngPtr < val.length; lngPtr++){
bit = eval(val.substr(lngPtr, 1));
intCharacterCount = 1;
if (lngPtr == val.length) break;
while (bit == eval(val.substr(lngPtr + 1, 1))){
intCharacterCount++;
lngPtr++;
if (lngPtr == val.length) break;
}
gif = ((bit == 1) ? "https://www.learningannex.com/js/b.gif"; :
"https://www.learningannex.com/js/w.gif";);
htm += "<Img src\=\"" + gif + "\" style=\"height:'" + h + "'\; width:'" +
(w * intCharacterCount) + "'\;\">";
}
return htm;
}
![https://www.learningannex.com/js/b.gif"](https://www.learningannex.com/js/b.gif"){kind=link}
![https://www.learningannex.com/js/w.gif"](https://www.learningannex.com/js/w.gif"){kind=link}