asp生成条形码

code = request("c")

if code = "" then

code = "*51windows.net*"

else

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

code = "*"&code&"*"

else

code = "*51windows.net*"

errstr = "<br><center style=’color:red;’>含有非法字符 </center>"

end if

end if

ocode = code

code = lcase(code)

%>

<center><form name="form1" method="post">合法字符：ABCDEFGHIJKLMNOPQRSTUVWXYZ 1234567890 + - * / % $ .<br><br><input name="c" type="text" value="<%=request("c")%>" size="25" maxlength="15"> <input type="submit" name="Submit" value="提交"></form><center>