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 是零長度字符串，則在同一列表中列出全部項，沒有分界符。