trouble creating string 1

[butchkmd]

I'm reading a recordset and creating a string to be used in a select case.

Do While Not rsT.EOF
strLinked = """ & Trim(rsT(1)) & "", " & strLinked
rsT.MoveNext
Loop

I can't get it to give me a string of

"rst(1)", "rst(1)", and so on.

silly I know.

Thanks

 

[Targol]

try this :

Do While Not rsT.EOF
    strLinked = chr$(34) & Trim(rsT(1)) & chr$(34) & ", " & strLinked
    rsT.MoveNext
Loop

Water is not bad as long as it stays out human body ;-)

 

[THOMASNG]

Yes, you can't directly have a " included as part of a
string, as " is reserved to mark the ends of strings. That's
why you had to use Chr(34).