<% rspromos.Close() Set rspromos = Nothing %>