Asp生成條形碼

2021-04-02 07:41:09 字數 2981 閱讀 8665

<%

function haiwaocde(zfstr)

zf = zfstr

zf = replace(zf,"0","_|_|__||_||_|")

zf = replace(zf,"1","_||_|__|_|_||")

zf = replace(zf,"2","_|_||__|_|_||")

zf = replace(zf,"3","_||_||__|_|_|")

zf = replace(zf,"4","_|_|__||_|_||")

zf = replace(zf,"5","_||_|__||_|_|")

zf = replace(zf,"7","_|_|__|_||_||")

zf = replace(zf,"6","_|_||__||_|_|")

zf = replace(zf,"8","_||_|__|_||_|")

zf = replace(zf,"9","_|_||__|_||_|")

zf = replace(zf,"a","_||_|_|__|_||")

zf = replace(zf,"b","_|_||_|__|_||")

zf = replace(zf,"c","_||_||_|__|_|")

zf = replace(zf,"d","_|_|_||__|_||")

zf = replace(zf,"e","_||_|_||__|_|")

zf = replace(zf,"f","_|_||_||__|_|")

zf = replace(zf,"g","_|_|_|__||_||")

zf = replace(zf,"h","_||_|_|__||_|")

zf = replace(zf,"i","_|_||_|__||_|")

zf = replace(zf,"j","_|_|_||__||_|")

zf = replace(zf,"k","_||_|_|_|__||")

zf = replace(zf,"l","_|_||_|_|__||")

zf = replace(zf,"m","_||_||_|_|__|")

zf = replace(zf,"n","_|_|_||_|__||")

zf = replace(zf,"o","_||_|_||_|__|")

zf = replace(zf,"p","_|_||_||_|__|")

zf = replace(zf,"r","_||_|_|_||__|")

zf = replace(zf,"q","_|_|_|_||__||")

zf = replace(zf,"s","_|_||_|_||__|")

zf = replace(zf,"t","_|_|_||_||__|")

zf = replace(zf,"u","_||__|_|_|_||")

zf = replace(zf,"v","_|__||_|_|_||")

zf = replace(zf,"w","_||__||_|_|_|")

zf = replace(zf,"x","_|__|_||_|_||")

zf = replace(zf,"y","_||__|_||_|_|")

zf = replace(zf,"z","_|__||_||_|_|")

zf = replace(zf,"-","_|__|_|_||_||")

zf = replace(zf,"*","_|__|_||_||_|")

zf = replace(zf,"/","_|__|__|_|__|")

zf = replace(zf,"%","_|_|__|__|__|")

zf = replace(zf,"+","_|__|_|__|__|")

zf = replace(zf,".","_||__|_|_||_|")

haiwaocde = zf

end function

code_h = 52

code_w = 2

function dragcode(ccode)

c = ccode

c = replace(c,"_","")

c = replace(c,"|","")

dragcode = c

end function

function dragtext(ccode)

c = ccode

dragtext = ""

for i=1 to len(c)

dragtext = dragtext&""&mid(c,i,1)&""

next

dragtext = dragtext

end function

function checkexp(patrn,str)

set regex=new regexp

regex.pattern=patrn

regex.ignorecase=true

regex.global=true

checkexp = regex.test(str)

end function

code = request("c")

if code = "" then

code = "*youdomain.com*"

else

if checkexp("^[abcdefghijklmnopqrstuvwxyz1234567890/+/-/*///%/$/.]*$",code) then

code = "*"&code&"*"

else

code = "*youdomain.com*"

errstr = "

含有非法字元 "

end if

end if

ocode = code

code = lcase(code)

%>

<%=dragcode(haiwaocde(code))%>

<%=(ocode)%>

<%=errstr%>

用Asp生成條形碼

一個用asp生成條形碼的例子 注意 生成的圖形為html 而非,列印時,請在ie的internet選項 高階 列印 選定 列印背景顏色和影象 條形碼生成程式 海娃 2004 4 4 含有非法字元 end if end if ocode code code lcase code dragcode ha...

生成條形碼

一 路由 routes.maproute name home url home getbar defaults new 二 html頁 text value id codenum button value 生成條形碼 onclick wds createbar width 200px height ...

條形碼生成

生成條形碼的類 public class barcode128dll set private font m valuefont new font 宋體 10 是否顯示可見號碼 如果為null不顯示號碼 public font valuefont set private byte m magnify ...

PHP生成條形碼

1.什麼是條形碼?列印出來的優惠券,商家需要用驗證器讀取條形碼,來獲得其有效性。2.如何生成條形碼?2.1檔案結構 2.2具體解析 1 class資料夾是已封裝好生成條形碼的類,只需要呼叫即可。2 index.php是一個可選擇條件生成條形碼的功能,是主程式的入口,而html資料夾是提供的被引用的 ...

PHP生成條形碼

前陣子在做一個商家優惠券的功能,需要用到條形碼,於是將資料重新整理下。1.什麼是條形碼?列印出來的優惠券,商家需要用驗證器讀取條形碼,來獲得其有效性。2.如何生成條形碼?首先找到強大的開源資料,在barcode barcodegen.1d php5.v5.0.1.zip版本,然後解壓檔案放到你的ap...