<% NewCloud.ShowSoftType Set NewCloud = Nothing CloseConn %>