asp取得数组中的最大值的方法

如何取得数组中的最大值(由71port_80端口提供)  
 该函数的作用是取得一组数组中最大的一个值，非常实用且精典，值得收藏! 

复制代码代码如下:

snum="345,231,56,786,1100,356,1200,300,685,111,134,765"   

function GetMax(str)  
num=split(str,",")  
max=num(0)  
for ii=0 to ubound(num)  
if cint(num(ii))>cint(max) then max=num(ii)  
response.Write "num="&num(ii)&",max="&max&"<br />"  
next  
GetMax=max  
end function  

response.Write "数组"&snum&"<br />最大值:"&GetMax(snum)