if DataEnvironment1.Command2.state=adstateopen then
   DataEnvironment1.Command2.close 
end ifDataEnvironment1.Command2.source=tmpnum
DataEnvironment1.Command2 tmpnum.open........
if DataEnvironment1.Command2.state=adstateopen then
   DataEnvironment1.Command2.close 
end if
使用DataEnvironment1.Command2 前判断DataEnvironment1.Command2 有没有关闭;使用之后及时关闭