2009-07-17 18 views
6

Verileri ayıklama amacıyla yazdırmak istiyorum.ASP yazdırma çıkışı dizisi

Veri formatı

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

resArray fazla 10 kayıt kendisi oluşur, bu gibi olur.

Basmayı denedim, ancak başarısız oldum. Emin inanmak

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 

çalışmıyor da

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 

sürüm 2 çalışmıyor

sürüm 1 Bir Scripting.Dictionary kullanıyorsunuz

+0

"Başarısızlık" dediğinizde - aslında ne oluyor? –

+0

Ve "resArray" hangi veri türüdür? –

+0

Herhangi bir veri yazdırılamıyor. resArray'a atanan NVP Collection nesnesi. –

cevap

7

klasik asp yazdırmak için bir yol var şüphesiz. Kullanılmaması şu şekilde sipariş verilemez: -

+0

teşekkürler, çözümünüz çalışıyor. –

1

Ne tür bir biçim var? Bu bir koleksiyon mu? İlk kod bölümünden, öğelere anahtarla eriştiğiniz anlaşılıyor, bu yüzden basit bir dizi olamaz ..? ResArray'ın nasıl bildirildiğini ve doldurulduğunu gösteren bir örnek verebilir misiniz? Toplama 0 tabanı ise

öyle olacak: bu temel dizi ise

For x = 1 to myarr.Count 

, ve bunun dışındaki: toplama 0 üs

For x = 0 to myarr.Count - 1 

Eğer öyle olacak index dizininin ne olduğunu bilin:

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