if active then open;好象这一句有问题好象应该是
if not Active then Open;