DDE Problem

[marabozu]

I have the following code that runs every 15 minutes:

Text1.LinkMode = 0
'Connection to REUTER DDE SERVER
Text1.LinkTopic = "REUTER|IDN"
For d = 0 To 8
Request_String = Rics(c) & Headers(d)
'PTCO.IN, OPENING PRICE"
Text1.LinkItem = Request_String
Text1.LinkMode = 2
Text1.LinkRequest
Requested(d) = Text1.Text
Text1.LinkMode = 0
Next d

This works fine but sometimes the program stops in this line:
Text1.LinkMode = 2
and then if I want to save the program it gives me a Out of Memory error!
Does anyone can help me on this one?
PS. I wouldn't like to use the for next cicle. But I need that my Request_String make a selection, instead of getting only one Item.
The selection should be something like this:

"PTCO.IN, OPENING PRICE" "PTCO.IN, HIGH" "PTCO.IN, LOW" ...
How can I do this?
Thank you