The solution seems to be okay for beginner levels or if doing for KB purposes. But I do not see it as an Enterprise level solutions but I rather go with SQL Server performance Dashboard if i am running SQL 2005 or higher.

Also, when I tried this I got error message "User-Defined type not defined"

on line "Dim cnPubs As ADODB.Connection":hehe:

However, I appreciate the efforts for knowledge sharing.