% dim text dim rsmembers dim strSQL strSQL="SELECT * FROM notice" set rsmembers=strDB.Execute(strSQL) %>