这段代码什么意思啊,asp的

<%
function paramAdd(strParam,strAdd,value)
'定义过程paramAdd并传递三个参数strParam,strAdd,value，其中arrParam的值含有字符'&'
dim arrParam,intI,intJ
'定义变量
arrParam=split(strParam,"&")
'返回值数组 = Split("字符串","分割符")
strAdd=lcase(strAdd)
'lcase将大写字母转换成小写字母
intJ=Ubound(arrParam)
'Ubound返回一个 Long 型数据，其值为指定的数组维可用的最大下标。
paramAdd=""
for intI=0 to intJ
if inStr(1,lcase(arrParam(intI)),strAdd&"=")<>1 then paramAdd=paramAdd&arrParam(intI)&"&"
'接受搜索的字符串表达式arrParam(intI)为被&分开的strParam字符串中的每一部分 如果其中含有某部分中的起始位置与strAdd&"="相同 则不会被输出
next
paramAdd=paramAdd&strAdd&"="&value
'你可以尝试输出结果paramAdd
response.Write paramAdd
end function
'拟定strParam,strAdd,value 三个变量的值。可自行修改
call paramAdd("A&b=aD&e","B",3)
%>