Re: Strange Error

Tech Tip: Click here to run a free scan for Windows Errors and optimize PC performance

Hi,
you can use this code:
http://alexdyb.blogspot.com/2005/11/additem-and-removeitem-for-listboxes.html

for me it works fine in any access version

--
Alex Dybenko (MVP)
http://alexdyb.blogspot.com
http://www.PointLtd.com


"Kou Vang" <KouVang@xxxxxxxxxxxxxxxxxxxxxxxxx> wrote in message news:854805E5-2CDC-470C-9E56-D1E75BA36EC2@xxxxxxxxxxxxxxxx
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?

"Alex Dybenko" wrote:

Hi,
and what error do you get?

Do you have same access version on both PCs?

--
Alex Dybenko (MVP)
http://alexdyb.blogspot.com
http://www.PointLtd.com


"Kou Vang" <KouVang@xxxxxxxxxxxxxxxxxxxxxxxxx> wrote in message
news:76216723-7B3B-4E39-94FF-08637A7BE25E@xxxxxxxxxxxxxxxx
> 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.
>
> "Alex Dybenko" wrote:
>
>> Hi,
>> perhaps you post code, which cause this error
>>
>> -- >> Alex Dybenko (MVP)
>> http://alexdyb.blogspot.com
>> http://www.PointLtd.com
>>
>>
>> "Kou Vang" <KouVang@xxxxxxxxxxxxxxxxxxxxxxxxx> wrote in message
>> news:29BE4DE9-EA23-4ECE-BE6F-2EA5C087CC3A@xxxxxxxxxxxxxxxx
>> > What do I make of the error, when Access doesn't appear to recognize
>> > the
>> > ".additem"? Do I use ItemSelected somehow?
>>
>>



.

Relevant Pages