夕颜 发表于 2004-5-16 20:14:00

[灌水]冷冷清清啊，看不下去了，



大家都干吗去了呀？？？？

蓝白，，有米有收到封口费呀？？？偶们逛街去………………














梦回罗马 发表于 2004-5-16 22:50:00

我现在每天6点起，10点回家

毕业设计进度太慢了，导师怒了，把我们圈养在机房

内详 发表于 2004-5-17 00:07:00

<html>
<head>
< http-equiv="Content-Type" content="text/html; charset=gb2312">
< name="Keywords" content="51windows.Net">
<META NAME="Author" CONTENT="haiwa">
<title>Asp生成条形码</title>
<style>
<!--
*         {font:menu}
-->
</style>
</head>

<body>
<%
'条形码生成程序
'海娃@2004-4-4
'http://www.51windows.Net
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,"_","<span style='height:"&code_H&";width:"&code_w&";background:#FFFFFF'></span>")
c = replace(c,"|","<span style='height:"&code_H&";width:"&code_w&";background:#000000'></span>")
dragcode = c
end function
function dragtext(ccode)
c = ccode
dragtext = ""
for i=1 to len(c)
dragtext = dragtext&"<span style='width:26;text-align:center'>"&mid(c,i,1)&"</span>"
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 = "*51windows.net*"
else
if Checkexp("^*$",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>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" height="79">
    <tr>
      <td height="61" align="center"><%=dragcode(haiwaocde(code))%></td>
    </tr>
    <tr>
      <td height="18" align="center" style="text-align:justify;text-justify:Distribute-all-lines;"><%=(ocode)%></td>
    </tr>
</table>
</center>
</div>
<%=errstr%>
</body>

</html>

梦回罗马 发表于 2004-5-17 00:24:00

我也是asp

这代码什么啊，看不大懂

长发拖把 发表于 2004-5-17 00:50:00

干嘛？

难道大家都去情报机关工作了？

蓝白永恒 发表于 2004-5-17 10:21:00

哈哈，我天天都在啊
只是你们都不在啊
55555555555555555555555555555555
忧闷啊，
罗马，你被圈养啊？
好可怜~！~！

shmily80 发表于 2004-5-17 18:05:00

来新疆已经有一个多月了，归期将至，不知到时有什么活动没有

梦回罗马 发表于 2004-5-17 18:20:00

你，还活着........

夕颜 发表于 2004-5-17 21:32:00

以下是引用蓝白永恒在2004-5-17 10:21:00的发言：
哈哈，我天天都在啊
只是你们都不在啊
55555555555555555555555555555555
忧闷啊，




老在的话，就催催封口费哈~~~~~~~

内详 发表于 2004-5-17 22:04:00

哎真是看不到人了

长发拖把 发表于 2004-5-17 23:31:00

那看到的是什么？

GeminiShark 发表于 2004-5-18 13:25:00

毕业设计真的 很难吗？？
需要圈养啊
哎 今年下半年看来要痛苦了

蓝白永恒 发表于 2004-5-20 07:04:00

要不等 兽医JJ 回来的时候再聚吧……

梦回罗马 发表于 2004-5-20 11:26:00

带个新疆妹子回来，大家乐一乐

shmily80 发表于 2004-5-20 14:44:00

你养她？

梦回罗马 发表于 2004-5-20 23:14:00

我连自己都养不起

不过我会骗的她很幸福的

蓝白永恒 发表于 2004-5-21 13:33:00

……我汗……
这贩卖人口的勾当……可别在这儿干……

shmily80 发表于 2004-5-21 16:02:00

幸福又不能当饭吃.........

琴瘦 发表于 2004-5-21 18:16:00

我最大的目标就是能打的起10块钱的开口番麻将再包几个2x…………

TENKS 发表于 2004-5-21 20:17:00

最近看见程序就晕了~~555555

梦回罗马 发表于 2004-5-22 01:18:00

以下是引用琴瘦在2004-5-21 18:16:00的发言：
我最大的目标就是能打的起10块钱的开口番麻将再包几个2x…………


一生何求

梦回罗马 发表于 2004-5-22 01:19:00

以下是引用TENKS在2004-5-21 20:17:00的发言：
最近看见程序就晕了~~555555


我的快完工了，QQ上碰到咱俩聊聊

内详 发表于 2004-5-23 11:49:00

以下是引用琴瘦在2004-5-21 18:16:00的发言：
我最大的目标就是能打的起10块钱的开口番麻将再包几个2x…………


禽兽有语法错误哦2x只有一个多了就是（2+n）xn为自然数
页: [1]
查看完整版本: [灌水]冷冷清清啊，看不下去了，