2009-07-17 10 views
6

デバッグ目的でデータを印刷したいと思います。ASPプリントアウト配列

データフォーマットは

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

resArrayが10の以上のレコード自体から成るこのようなものです。

私は印刷しようとしましたが、失敗しました。

も、私はあなたがScripting.Dictionaryを使用している、従来のASPで

+0

実際に何が起こっていると思いますか? –

+0

あなたの "resArray"はどのデータ型ですか? –

+0

データを印刷できません。 NVPコレクションオブジェクトがresArrayに割り当てられています。 –

答えて

7

をプリントアウトするためにいくつかの方法を持ってくださいと信じて

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は、間違いない。 -

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

ありがとうございます、あなたのソリューションは動作します。 –

1

resArrayはどのようなタイプですか?それはコレクションですか?最初のコードセクションからは、キーで項目にアクセスするように見えるので、単純な配列にすることはできません。 resArrayが宣言され、実装された方法のコード例を挙げられますか?

コレクションは0ベースである場合、それは次のようになります。

For x = 0 to myarr.Count - 1 

コレクションは、それがされる0ベースの場合:

For x = 1 to myarr.Count 

それが基本的な配列で、そうでない場合は

For x = LBound(myarr) to UBound(myarr) 
関連する問題