<% 'include adoCon Dim NoRec, sqlSum sqlSum = "SELELCT COUNT(*) FROM TABLE" Set NoRec = adoCon.Execute(sqlSum) response.write NoRec(0) %>