Cómo conectar VB6.0 a SQL Server 2005

SQLcon público como System.Data.SqlClient.SqlConnection

Sqladapter público como System.Data.SqlClient.SqlDataAdapter

Comando público como System.Data.SqlClient.SqlCommand

Public ds como System.Data.DataSet

Public dr como System.Data.DataTable

sqlcon = Nuevo System.Data.SqlClient.SqlConnection