您正在使用 IPV4 [44.197.114.92] 访问本站,您本次已经查看了 1 页
用户名: 密 码: 验证码:     用QQ登录本站
首页 软件 编程 笑话 知识 公告 台风 日历 计算器
[公益]保护绿色环境,构建和谐社会       悟空收录网      

【腾讯云】 爆款2核2G3M云服务器首年 61元,叠加红包再享折上折      
[公益] 地球是我家,绿化靠大家      
2024年 清明节 007
2024年 劳动节 034
2025年 元 旦 279
2025年 春 节 307
 
您现在的位置:首页 >> ASP/ASP.net >> 内容
本类新增
本类热门
asp中使用随机方法的两个小函数
内容摘要: % Function GetRndNum(Min, Max) If MaxMin Then GetRndNum = 0 : Exit Function Randomize() GetRndNum = CLng((Max - Min) * Rnd() + Min) rem 得到Min和max之间的一个随机的数字 End Function % % Functio......
<%

Function GetRndNum(Min, Max)

If Max < Min Then GetRndNum = 0 : Exit Function

Randomize()

GetRndNum = CLng((Max - Min) * Rnd() + Min)

rem 得到Min和max之间的一个随机的数字

End Function

%>

<%

Function GetRandNum (strLong)

rem 参数 strlong:长度

rem 得到一个字符串

Dim temNum

Randomize

Do While Len(GetRandNum) < strLong

temNum = CStr(Chr((57 - 48) * Rnd + 48))

GetRandNum = GetRandNum&temNum

Loop

End Function

%>

版权声明:本内容来源于网络,如有侵犯您的版权,请联系站长,本站收到您的信息后将及时处理。
上一篇:ASP过滤script脚本的正则函数

 

下一篇:ASP 80040e14错误的解决方法

发布日期:2021/6/15
手机扫二维码直达本页
发布时间:12:34:56
点  击:6
录  入:齐天大圣
相关文章
Baidu
YiJiaCMS 7.3.8 build231228(MSSQL) 闽ICP备05000814号-1
本空间由腾讯云(轻量应用服务器)提供,Cloudflare提供加速防护
运行时间载入中.....