please let me know how would i connect using vba code of ms excel 2007 to mysql

Sub dbConnect()
Dim strConn As String

Dim dbConn As New ADODB.Connection
Set dbConn = New ADODB.Connection

strConn = "Provider={MySQL ODBC 5.2 Unicode Driver};Password=swamy;Persist Security Info=True;User ID=root;Data Source=my_ansi;Initial Catalog=wds"
'strConn = "Provider=MSDASQL.1;Password=swamy;Persist Security Info=True;User ID=root;Data Source=mySQL32;Initial Catalog=wds"

dbConn.Open wds = mySQL_UserDSN
dbConn.Open strConn

If dbConn.State = adStateOpen Then
MsgBox "Connected"
MsgBox "DB Connection Failed"
End If

End Sub