Copy SQL Server 2005 database Visual Basic

I need someone to provide code which will create a copy of a database in SQL Server 2005 using VB 6.0. You can use any database as an example but provide me with way to upload your database into my SQL Server. So the VB code must create a copy of an existing database must be in all VB code. techInfol