I use an Oracle database and this is how I connect to our DB (except I use Msdaora for my provider)... maybe if you do some changing around it will work for you.

vb Code:
  1. Dim Conn As ADODB.Connection
  2. Dim rsRec As ADODB.Recordset
  3.  
  4. Set Conn = New Connection
  5.  
  6. Conn.ConnectionString="Provider=MySQLProv;Database=astramedia;Uid=root;Pwd=Password;"
  7. Conn.Open
  8.  
  9. Set rsRec = New ADODB.Recordset
  10. rsRec.CursorType = adOpenKeyset
  11. rsRec.LockType = adLockOptimistic
  12. rsRec.ActiveConnection = Conn