Split Function

[Bristowj]

Hi, I have an Access 2000 db that I have converted to access 97. The db was using the access 2000 Split function with vbNewLine to create an array that takes a text files values line by line in a loop. Does anyone know of a way to get this code running in Access 97?


LineArray = Split(Str1, vbNewLine)
If UBound(LineArray) > 0 Then
StrResult = ""
For i = LBound(LineArray) To UBound(LineArray)
StrResult = AppendLine(StrResult, String(lIndent, " &quot & LineArray(i))
Next


Thanks Jonas %-(

 

[MichaelRed]

Search for 'basSplit' in these forums. It is just a small workaround I built to use in ver '97. Crude - but effective.

MichaelRed
m.red@att.net

There is never time to do it right but there is always time to do it over