Asp代码
haixu_hx
这个作者很懒,什么都没留下…
展开
-
Asp九九乘法表
Response.Write("九 九 乘 法 表")Dim X,Y,BX = 1Y = 1Do While X Response.Write("")Do While Y > 0 And X >= YZ = X * YA = Y & "*" & X & "=" & Z & " "Response.Write (" "&A&"")Y = Y + 1LoopB = 9 - Y +原创 2008-05-29 00:42:00 · 3189 阅读 · 0 评论 -
Asp生成十三位随机字符串
生成随机字符串Function gen_key(digits)定义并初始化数组dim char_array(80)初始化数字For i = 0 To 9char_array(i) = CStr(i)Next初始化大写字母For i = 10 To 35char_array(i) = Chr(i + 55)Next初始化小写字母For i = 36 To 61char_array(i) =原创 2008-05-29 00:45:00 · 573 阅读 · 0 评论