[随笔分类]ASP
iteye_15010
这个作者很懒,什么都没留下…
展开
-
StrPad 函数 FOR ASP
Function strPad(strSource, destLength, padChar, L_or_R) Dim srcLength srcLength = Len(strSource) If(srcLength >= destLength) Then strPad = strSource Else ...2007-02-23 21:11:00 · 72 阅读 · 0 评论 -
素数生成器的算法【ASP Edtion】
1<% 2 Function CalcPrimes(intPrimeUBound) 3 'intPrimeUBound 是要计算素数的上限值 4 Dim i, j 5 Dim strTmp 6 Dim bitArray 7 8 Redim bitArray(intPrimeUBound + 1) 910...2005-05-08 10:36:00 · 88 阅读 · 0 评论