ASP распечатать массив - PullRequest
6 голосов
/ 17 июля 2009

Я бы хотел распечатать данные для отладки.

Формат данных будет таким:

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

ResArray состоит из более чем 10 записей.

Я пытался распечатать, но не получилось.

версия 1 не работает

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 также не работает

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

Я уверен, что есть способ распечатать в классическом asp

Ответы [ 2 ]

7 голосов
/ 17 июля 2009

Вы используете Scripting.Dictionary без сомнения. Это не приказано использовать это: -

 Sub prArray(myArr)
     Dim key
     For Each key in myArr
         Response.Write key & " = " & myArr.Item(key) & "<br />"
     Next
 End Sub
1 голос
/ 17 июля 2009

Какой тип resArray? Это коллекция? Из первого раздела кода похоже, что вы получаете доступ к элементам по ключу, поэтому это не может быть простой массив. Можете ли вы привести пример кода того, как resArray объявляется и заполняется?

Если коллекция равна 0, то база будет:

For x = 0 to myarr.Count - 1

Если коллекция равна 0, то база будет:

For x = 1 to myarr.Count

Если это базовый массив и вы не знаете, что это за индексная база:

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