|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
<% Dim myarr For i = 0 To 100 Randomize no = Int((1000-1+1)*Rnd+1) For j = 0 To i If no <> myarr(j) And no <> "" Then j = j + 1 Else Exit For End If myarr(i) = no Next If i = 21 Then Exit For End If Next %> 返回类别: 教程 上一教程: REMOTE SCRIPT文档(转载自微软)(七) 下一教程: ASP常用函数 您可以阅读与"一个不错的随机函数"相关的教程: · 利用随机函数获取某一范围的整数及其应用 · 生成一个不重复的随即数字 · 一个生成随机密码的函数 · 很不错的一个UBB代码 · asp中的一个希奇的函数 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |