ASP中给函数传参确实是个麻烦事,当参数个数特别多的时候(比如有七八个或者更多的参数个数)差不多就要眼冒金星了,一个个的数吧。而且要命的是参数位置必须不能有丁点错误。每次给函数传一大堆的参数时都让人觉得特无奈……
所以我借鉴了PHP中传参方法,将所有参数放在数组中,传个数组得了。
写了一个函数来实现类似于PHP中的关联数组:
- <%
- Function assArray(iArray,iKey)
- If Not(isArray(iArray)) Then
- assArray = Null
- Exit Function
- End If
- Dim i, j, tmpArr
- For i = 0 to UBound(iArray)
- If InStr(iArray(i),"=>") > 0 Then
- tmpArr = Split(iArray(i),"=>")
- If IsArray(tmpArr) Then
- If UCase(Trim(tmpArr(0))) = UCase(Trim(iKey)) Then
- assArray = tmpArr(1)
- Exit Function
- End If
- End If
- End If
- Next
- assArray = Null
- End Function
-
-
- Dim myArr : myArr = Array("myName => 姓名","myTel => 110","性别=>男")
- Response.Write assArray(myArr,"myname") & assArray(myArr,"性别")
- %>