Results 1 to 3 of 3
  1. #1
    Join Date
    Jul 2006
    Posts
    157

    Unanswered: Meaning of that line

    Hi: Can any one please tell me what is the meaning of that line
    ReDim Preserve sITUserID(i)

    Thanks.

    Sub UserTeam()
    Dim sqlquery As String
    Dim i As Integer

    oDBUtil.ExecuteInputPackage "0062K\DEVELOPMENT", "pkg_DistList_Distribution"

    oDBUtil.OpenADORecordSet "tbl_DistList_IT", cnADOSQL, rsADO, 0, adCmdUnknown
    Do While Not rsADO.EOF
    i = i + 1
    ReDim Preserve sITUserID(i)
    sITUserID(i) = rsADO!UserName
    rsADO.MoveNext
    Loop
    End Sub

  2. #2
    Join Date
    Jul 2003
    Location
    Michigan
    Posts
    1,941
    BOL gives a much better explanation of REDIM than I ever could.
    Inspiration Through Fermentation

  3. #3
    Join Date
    Jun 2004
    Location
    Arizona, USA
    Posts
    1,848
    try this...

    Highlight "ReDim"

    Then, press the F1 key. (The one labelled "Help")
    Lou
    使大吃一惊
    "Lisa, in this house, we obey the laws of thermodynamics!" - Homer Simpson
    "I have my standards. They may be low, but I have them!" - Bette Middler
    "It's a book about a Spanish guy named Manual. You should read it." - Dilbert


Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •