Не удается подключиться к серверу MySQL (10060) и (4)

Question

Я пытаюсь сделать заявку в RealBasic. Я не могу создать соединение с удаленным сервером.

На XP (VirtualMachine):

Не удается подключиться к серверу MySQL в "xxx" (10060)

На последней версии OS X:

Не удается подключиться к серверу MySQL в "xxx" (4)

Однако: HeidiSQL и Sequel Pro подключаются нормально. Еще одно самодельное приложение в.NET прекрасно подключается. Все же, кажется, все связано с брандмауэром, если я Google.

Код, если это поможет:

dim db as new MySQLCommunityServer
db.host = ""
db.port = 3306
db.databasename = "dbname"
db.username = "dbuser"
db.password = "dbpass"
if (db.connect = true) then MsgBox("Connected") else MsgBox(db.errormessage)