24 lines
590 B
Plaintext
24 lines
590 B
Plaintext
<%@language = "javascript" %>
|
|
<% /*
|
|
$Revision$
|
|
$Id$
|
|
*/ %>
|
|
|
|
<%
|
|
DOCTYPE_Disable = true;
|
|
%>
|
|
<!-- #include file="../Shared/common.inc" -->
|
|
<%
|
|
var xc = Server.CreateObject("SLNKDWF.Barcode");
|
|
xc = new ActiveXObject("SLNKDWF.Barcode")
|
|
xc.Text = getQParam("text");
|
|
xc.Height = getQParamInt("height", 100);
|
|
xc.Narrow = getQParamInt("narrow", xc.Height / 40);
|
|
xc.Wide = getQParamInt("wide", xc.Narrow * 3);
|
|
xc.rotation = getQParamInt("rotation", 0);
|
|
// default code39
|
|
|
|
Response.contenttype = "image/png";
|
|
Response.BinaryWrite(xc.GetAsPNG());
|
|
%><% ASPPAGE_END(); %>
|