Mysql Database connection

Hello all, i'm getting an error when i use the below code to connect to mysql database. Would be great if anybody can try to solve this problem. Code : dim objconnection as new adodb.connection dim svlconnectstring as string svlconnectstring = "driver={mysql odbc 5.1 driver} ; server={192.168.4.208} ; port = {3306} ; database={chat2} ; user = {root} ; password= {}" objconnection.open svlconnectstring 'to open recordset dim rsusers as new adodb.recordset set rsusers = objconnection.execute("select * from user") if not rsusers.eof then msgbox ("first user name:" & rsusers.fields("user")) end if call rsusers.close set rsusers = nothing set objconnection = nothing thanks !