This code a couple of minor bugs with string line continuations, but those are easy enough to fix:
http://www.base64.co.uk/mysql-odbc-driver/
1. Follow the link for the MySQL ODBC Driver and install it (if you haven't already).
2. Be sure to select the Microsoft Remote Data Object 2.0 in your project References.
3. Add your internet service provider as a Remote Database Access host through your control panel (i.e. %.fios.verizon.net).
The first time you attempt to make a connection, the MySQL ODBC Driver install will prompt you to confirm the connection with a pop-up window. It should not come up again.
I had to use my Control Panel User ID and Password to make this work. Virtual ID's did not work (i.e. MyAccountLogin_MyPHPUserID). The only virtual reference that did work was for the actual database itself (i.e. MyAccountLogin_MyDatabaseName).
The only thing left out of this sample is how to pull data fields from the result set. The comments suggest "reference it like !username", but I prefer using something like this:
strName = .rdoColumns.Item("Name")
Lastly, case matters for the table names in your SQL statements. If you have a table named "Products" in your database and you issue a query for a table named "products", it will bomb.
Everything after that should be relatively easy to figure out.
Hope this helps!