arrays with fixed length data types are best stored binary, because it's fast and easy:
Code:Dim IntegerArray(10) as integer Dim DynamicLong() as long,length as byte'or use integer for room for larger arrays Dim UDTarray(20) as UDTname length=50 redim Dynamiclong(length-1) 'to write open file for binary as 1 put #1,,IntegerArray put #1,,length put #1,,DynamicLong put #1,,UDTarray 'to read get #1,1,IntegerArray 'reset to start position get #1,,length redim Dynamiclong(length-1) get #1,,Dynamiclong get #1,,UDTarray close 1





Reply With Quote