ASP 인쇄 배열

Question

디버깅 목적으로 데이터를 인쇄하고 싶습니다.

데이터 형식은

cntryCode  = resArray("COUNTRYCODE") 
    business  = resArray("BUSINESS") ' Payer's business name. 
    shipToName  = resArray("SHIPTONAME") 

resArray는 10 개 이상의 레코드를 자체 구성과 같은 것입니다.

나는 인쇄하려했지만 실패했습니다. 나는 확실히 믿는다

public sub prArray (myarr) 
    Dim x, ResponseData 
    For x = 0 to UBound(myarr) 
     ResponseData = ResponseData & myarr(x) & " = " & myarr(x) & "<br>" 
    Next 
    Response.Write ResponseData 
end sub 

작동하지 않습니다 또한

public sub prArray (myarr) 
    Dim x, ResponseData 
    For x = 0 to myarr.Count 
     ResponseData = ResponseData & myarr.Key(x) & " = " & myarr.Item(x) & "<br>" 
    Next 
    Response.Write ResponseData 
end sub 

버전 2를 작동하지

버전 1은 당신은 Scripting.Dictionary를 사용하는

Answer 1

기존 ASP에서 인쇄하는 몇 가지 방법이있어 의심의 여지가 없습니다. 다음을 사용하도록 주문하지 않았습니다. -

Sub prArray(myArr) 
    Dim key 
    For Each key in myArr 
     Response.Write key & " = " & myArr.Item(key) & "<br />" 
    Next 
End Sub 

Answer 2

resArray 유형은 무엇입니까? 컬렉션입니까? 첫 번째 코드 섹션에서 키를 기준으로 항목에 액세스하는 것처럼 보이므로 간단한 배열 일 수는 없습니다. resArray가 선언되고 채워지는 방법에 대한 코드 예제를 줄 수 있습니까? 컬렉션이 0 기지 인 경우

이 될 것입니다 : 그것은 기본 배열 인 경우

For x = 1 to myarr.Count 

, 당신은하지 않습니다 컬렉션이 0 기본이

For x = 0 to myarr.Count - 1 

경우가있을 것입니다

For x = LBound(myarr) to UBound(myarr)