>>I have a form where I open tables at runtime. The tables have a random name. The problem is: how can I close all open tables at a given time except one? I've tried calling the dataenvironment's opentables method but didn't work. Am I missing something?.
>>
>>Thanks in advance.
>

>Dimension laList[1]
>lnOpen = AUsed(laList)
>For i=1 TO lnOpen
>	If Upper(laList[<font color=red>i, 1</font>]) <> "MYALIAS"
>		USE In laList[<font color=red>i, 2</font>]
>	Endif
>Endfor

---

Sergey's code is what you need, I just fixed two things (in red)