multiple select listbox..

[keybearer]

hi.. need some help here.. again..
i have a report that will display the addresses of my contacts just like in the northwind database.. but i want to be able to select the addresses that i want to be sent to the report.. i know that i have to use a listbox and set it to multiple select enabled.. but how do i send the values to the report?

 

[IMO]

My example here should be what you're looking for.

IMO

 

[keybearer]

hi IMO.. i have a problem with your example.. lets say that i have transferred the wanted ID's/Names to the textbox separated by a comma.. LMH 004, N 005 e.g.. how do i open the report where the addresses are the people whom their ID's is in the textbox?

 

[WayneRyan]

keybearer,

IMO's form builds a query called "qryMultiSelect". In the
code you will have to change the table name and the name of
your primary key.

Look at the query after you run the code.

IMO, that's a nice example!

Wayne

 

[keybearer]

yes.. i know about the qryMultiSelect query.. i've changed the table and the source.. but the report still displays all of the addresses...

 

[IMO]

If you post your DB I'll take a look

IMO

 

[keybearer]

my database is quite big.. ill try to shrink it and post 2morrow.. anyways.. i kept on getting this error..

compile error:

user-defined type not defined

and it highlights this line of code"

Dim loqd As QueryDef

 

[IMO]

You are missing the 'Microsoft DAO 3.6 Object Library'. Open any form in Design view,goto View >>> Code, goto Tools >>> References and select it from the list.

IMO

 

[keybearer]

hmm.. thanks.. that's solved.. now i have a new problem..
theres a

run-time error '3075
syntax error (missing operator) in query expression 'MbrShp IN (A 005, LMH 012)'.

when i looked at the code.. it stopped at loqd.SQL. the pop up is too long and i cant read where im making a mistake..

im getting a headache here..

 

[IMO]

Your ID field needs to be Numeric. Add an Autonumber field to your table and call it 'QID'. Now change this line of code to...

    stSQL = stSQL & "FROM qryYourQuery WHERE QID"

IMO

 

[keybearer]

hi again.. sorry for the late reply.. this is my database after i did some shrinking..
i think where i'm doing wrong is in the queries.. any help on that will be helpful..
if possible, i need the confirm button to just send the values to the textbox and the preview button to open previewed report..
please help..

 

[WayneRyan]

keybearer,

IMO's code works great, you just needed to put single-quotes
around each element. See the query.

I got rid of all of the Trim function calls.

Wayne

 

[WayneRyan]

oops,

I knew I didn't attach it.

Wayne

 

[keybearer]

err... wayne.. the queries work fine, but the report still displays all of the records.. i just need the selected names..

 

[WayneRyan]

keybearer,

oops, I didn't notice that.

That's because your report uses the MailingLabelQuery instead
of the MultiSelectQuery that the form produces.

Wayne

 

[keybearer]

so wayne, what's your suggestion? the data needs to be taken from the MailingLabelQuery.. or is the multiselectQry needs to be changed? if so, can you help me?

 

[WayneRyan]

keybearer,

The form makes the MultiSelectQry, so that should be the data
source for the report.

Just get the FullMailingLabel report in design mode and change
the query name.

Wayne

 

[keybearer]

hey wayne, thanks.. just finished changing the sources and it works!!!!! thanks a lot..

 

[WayneRyan]

keybearer,

No, thank IMO ... Its his code.

Wayne