Turn a One Column Table into a string?

[CptCrusty1]

I have a Table that I need to have turned into a string.

The table is called tblDestinationLoc:

The column is called:
Location_Num (Text 4)
The output needs to look like:

'0001','0002','0003' and so on. There can be 1 record, or 500 records. The number of records is defined by the user.

I think I'm going to have to use DAO commands, but if there is an easy way.........

Thanks.
Rich.

 

[grande]

With Currentdb.OpenRecordset("tblDestinationLoc")
     Do Until .EOF
          strText = "'" & .Fields("Locaton_Num") & "', "
          .MoveNext
     Loop
End With

Hope this helps!

-------------------------
Just call me Captain Awesome.

 

[dhookom]

There is a generic concatenate function with sample usage at

http://www.rogersaccesslibrary.com/OtherLibraries.asp#Hookom,Duane

Duane MS Access MVP
[green]Ask a great question, get a great answer.[/green] [red]Ask a vague question, get a vague answer.[/red]
[green]Find out how to get great answers faq219-2884.[/green]

 

[CptCrusty1]

I'm getting an error saying Item not found in this location for the line:

strText = "'" & .Fields("Locaton_Num") & "', " When I hover over the .Fields portion, it says:

.Fields("Location_Num")=<Item not found in this collection.>

I'm doing this from within a module.

THanks
Richard.

 

[grande]

What is the name of the field with the data in it? I thought it was Location_Num, but if not you should change it to the correct field name.

-------------------------
Just call me Captain Awesome.

 

[CptCrusty1]

The field with the data in it is Location_Num which is a text field. I think its having a problem with the .Field Method. Is their a reference I need to select? (Tools>references) from VB?

RK

 

[grande]

I see the problem. We both typed location wrong:
Locaton
Location

Hopefully that'll do it.

-------------------------
Just call me Captain Awesome.