Strange Error

K

Kou Vang

What do I make of the error, when Access doesn't appear to recognize the
".additem"? Do I use ItemSelected somehow?
 
K

Kou Vang

It's as simple as this:

Dim V As Variant
Dim I As Integer
Dim Fname As String
Dim F

V = GetFiles

If Not IsEmpty(V) Then
For I = 0 To UBound(V)
Fname = StrReverse(Split(StrReverse(V(I)), "\", 2)(0))

LstXlsFiles.AddItem Item:=Fname
Next I

End If

It works on my machine as is always the case, and bombs on others. Thanks.
 
A

Alex Dybenko

Hi,
and what error do you get?

Do you have same access version on both PCs?
 
K

Kou Vang

Yes, I have 2002, meaning versions 2000 and earlier do not have additem and
cannot read this. I have read that there is no workaround this. If I cannot
use the additem, how am I to get data into the listboxes?
 
Top