ASP一个实用的字符串、数组输出函数

asp对于一般的字符串输出，使用内置对象的Response.Write即可，但对于数组的输出就显得有些力不从心了，下面这个函数就可以解决这个问题，虽然很简单的函数，但对于调试或者数组输出需要的项目来使用是非常方便的。

 程序代码
<%
PRintln("something")
println(array("some", "more", "lines"))

Response.write array("some", "more", "lines")
function arrayize(value)
  if isArray(value) then
    arrayize = value
  elseif isEmpty(value) then
    arrayize = array()
  else
    arrayize = array(value)
  end if
end function

function [](value)
  [] = arrayize(value)
end function

sub println(line)
  for each l in [](line)
  response.write(l)
  next
end sub
%>

补充一下，如果只是单纯的一维数组的话，可以用

 程序代码
<%Response.Write(Join(arrTest, "<br />"))%>

来实现同样的输出结果。

附上关于Join函数的简短解释：

 引用内容

Join 函数
返回一个字符串，此字符串由包含在数组中的许多子字符串联接创建。
Join(list[，delimiter])
参数
list
必选项。包含要联接的子字符串一维数组。
Delimiter
可选项。在返回字符串中用于分隔子字符串的字符。如果省略，将使用空字符 ("")。如果 delimiter 是零长度字符串，则在同一列表中列出全部项，没有分界符。