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

<%
"******************************
"函数：GetMax（str）
"参数：str，待处理的数字数组，以,分隔多了数字
"作者：阿里西西
"日期：2007/7/12
"描述：取得数组中的最大值
"示例：<%=GetMax（"360,120,5,600,32"）%>
"******************************
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
%>