Listbox .additem

[trackdaychamp]

Hi,

I am trying to add to a listbox from a recordset with the following code. However I am getting a runtime error: The setting for this property is too long

Do Until rtable.EOF

Me![lstRisks].AddItem Item:=rtable.Fields("RiskID").Value & ";" & rtable.Fields("SourceRiskID").Value & ";" & rtable.Fields("Risk") & ";" & rtable.Fields("Owner") & ";" & rtable.Fields("Rating")
rtable.MoveNext

Loop

Can you help?

Thanks,

Mark