create Sql database

Submitted by: 
This is demo how to create SQL Server Database and Table from VB6 without using SQLDMO. I am using ADODB Connection