For Each objChild In objContainer.Children If objChild.Type = 1 Then If CLng(m_lngTotalSize/1024) > MAX_DOWNLOAD_SIZE Then Exit For End If CountAssetsInFolder(objChild.Identifier) Else intArrCount = intArrCount + 1 ReDim Preserve arrItems(intArrCount) arrItems(intArrCount) = objChild.Identifier End If Next
Were you able to get this to work? I very badly need to implement some type of download limit. Thanks,Rich