asp实现取得数组中的最大值的代码

1. <%  
2. '******************************  
3. '函数：GetMax(str)  
4. '参数：str，待处理的数字数组，以,分隔多了数字  
5. '作者：阿里西西  
6. '日期：2007/7/12  
7. '描述：取得数组中的最大值  
8. '示例：<%=GetMax("360,120,5,600,32")%>  
9. '******************************  
10. function GetMax(str)  
11. num=split(str,",")  
12. max=num(0)  
13. for ii=0 to ubound(num)  
14. if cint(num(ii))>cint(max) then max=num(ii)  
15. response.write "num="&num(ii)&",max="&max&"<br />"  
16. next  
17. getmax=max  
18. end function  
19. %>