MySQL - Alguien que me ayude!!

Hola, estoy tratando de hacer una aplicación con Mysql y VB6(soy novata en esto de Mysql y VB6). La forma en que realizo la conexión a la base de datos es la siguiente:

Dim cnn As ADODB.Connection
Dim rs As ADODB.Recordset

Set cnn = New ADODB.Connection
Set rs = New ADODB.Recordset

cnn.Provider = "MySQLProv"
cnn.Properties("Data Source") = "SERVER=localhost; DB=prueba"

cnn.Properties("User id").Value = "root"
cnn.Properties("Password") = "passw"
cnn.Open

El problema es que cada que ejecuto la aplicación me pide que introduzca el nombre de la base de datos de la cual va a obtener la información, la cual se supone que ya esta especificada (prueba), es normal que haga esto? o estoy haciendo algo mal?.

De antemano, gracias por la ayuda.

Este sitio puede ayudarte mucho...aprovéchalo, pues a mí si me sustentó.
http://www.able-consulting.com/ADO_Conn.htm

Hola..
Ya solucione mi problema, pero de todas formas te agradezco tu respuesta y estaré checando el sitio que me recomiendas.

Por cierto, si a alguien le interesa

cnn.Properties("Data Source") = "SERVER=localhost; DB=prueba"
lo cambie por:
cnn.Properties("Location") = "localhost"
cnn.Properties("Data Source").Value = "prueba"

Nuevamente Gracias.