avoid using Redim Preserve, for ref
http://msdn.microsoft.com/library/default.asp?URL=/library/en-us/dnasp/html/
ASPtips.asp tip : 13
anywoo goin back to ur code
dim opparray
dim i
i=1
'Open ur recordset 
rsItem.open sSql,ocon,1,3
Redim opparray(rsItem.RecordCount)
Do While Not rsItem.EOF
        cst_name = get_cst_name(rsItem("customer"))
        probability = FormatPercent(rsItem("status_probability"),0)
        exp_bk_val = FormatCurrency(rsItem("expected_book_value"),0)
        opparray(i) = rsItem("es_number") & "," & cst_name & "," &
rsItem("date_program") & "," & exp_bk_val & "," & probability & "," &
rsItem("date_quoted") & "," & rsItem("date_due")
        i = i + 1
        rsItem.MoveNext
Loop
-----Original Message-----
From: Hoenig, Robert [mailto:[EMAIL PROTECTED]]
Sent: Thursday, September 26, 2002 10:59 AM
To: [EMAIL PROTECTED]
Subject: [wdvltalk] Dynamically Loading Arrays


I want to load some fields from a database to an array.  It will be dynamic.
I thought the following would work but it isn't.

do while (not rsItem.EOF)
        cst_name = get_cst_name(rsItem("customer"))
        probability = FormatPercent(rsItem("status_probability"),0)
        exp_bk_val = FormatCurrency(rsItem("expected_book_value"),0)
                                        
        Redim Preserve opparray(i)
        opparray(i) = (rsItem("es_number") & "," & cst_name & "," &
rsItem("date_program") & "," & exp_bk_val & "," & probability & "," &
rsItem("date_quoted") & "," & rsItem("date_due"))
        i = i + 1
Loop

Any suggestions on how I can load this information into an array?

Thank you
Robert

____ * The WDVL Discussion List from WDVL.COM * ____
To Join wdvltalk, Send An Email To: mailto:[EMAIL PROTECTED] 
       Send Your Posts To: [EMAIL PROTECTED]
To change subscription settings to the wdvltalk digest version:
    http://wdvl.internet.com/WDVL/Forum/#sub

________________  http://www.wdvl.com  _______________________

You are currently subscribed to wdvltalk as: [EMAIL PROTECTED]
To unsubscribe send a blank email to %%email.unsub%%

____ • The WDVL Discussion List from WDVL.COM • ____
To Join wdvltalk, Send An Email To: mailto:[EMAIL PROTECTED] 
       Send Your Posts To: [EMAIL PROTECTED]
To change subscription settings to the wdvltalk digest version:
    http://wdvl.internet.com/WDVL/Forum/#sub

________________  http://www.wdvl.com  _______________________

You are currently subscribed to wdvltalk as: archive@jab.org
To unsubscribe send a blank email to [EMAIL PROTECTED]

Reply via email to