Я стараюсь держаться подальше от пользовательских форм, которые являются большими. Я предпочитаю использовать электронную таблицу для обработки сбора данных для таких вещей. Если есть зависимости, я при необходимости скрываю / выделяю строки или использую несколько листов. Я считаю, что это более простое решение (иногда).
Хосты, где вы обращаетесь к своему серверу базы данных, очень редко разрешают удаленный доступ к базе данных из-за пределов своей среды размещения (я ее никогда не видел).
Если вы сами настраиваете базу данных MySql (на выделенном или виртуальном плане сервера), вы должны иметь возможность настроить ее для приема удаленных хостов. В этом случае вам нужно изменить свой файл my.con, чтобы разрешить удаленные хосты (вы также можете сделать это с помощью инструментов MySql Admin), и вам необходимо предоставить логин, который вы пытаетесь использовать для доступа с удаленного IP:
http://www.cyberciti.biz/tips/how-do-i-enable-remote-access-to-mysql-database-server.html
Ваш предыдущий комментарий о SQLyog - очень хорошая идея. И я могу поручиться за этот продукт. Это отличный инструмент. Бесплатные админ-инструменты из MySql (Workbench - http://www.mysql.com/downloads/workbench/ ) также достойны и позволят вам также проверять удаленный доступ.
У меня была эта проблема. Я мог подключаться с локального хоста, но не с клиентского компьютера. Я отключил брандмауэр Windows (Windows 8). Однако никакой радости. Затем я создал новое правило в расширенных настройках брандмауэра и BINGO. Новое правило разрешало входящие соединения на порт 3306 в моей частной сети.
Добавьте mysqlid.exe в настройки брандмауэра Windows для удаленного доступа к вашему серверу
Другой подход для VB6. Я использую его так, как это во всех моих приложениях, и он работает в течение многих лет.
Dim StoreDB As ADODB.Connection
Вкл. Error Resume Next
Set StoreDB = Новый ADODB.Connection
StoreDB.Open «Драйвер = {MySQL ODBC 3.51 Driver]; Сервер = 000.000.000.000; Порт = 3306; База данных = имя вашего DBNAME; Пользователь = Someusername; Пароль = Somepassword; = 8; "
Если Err.Number = 0 Затем
[код VB6 для выполнения]
Else
myErrorString = Err.Description
blockquote>End If
blockquote>StoreDB.Close
Установить StoreDB = Nothing
< / blockquote>Как уже упоминалось, убедитесь, что порт 3306. У меня есть хост, который использует 3307. Я не вижу проблем с вашим кодом. Вероятно, вам нужно отсортировать это с хостом.
проверить это решение на подключение удаленно, когда вы получаете сообщение об ошибке 10060
http://forums.mysql.com/read.php?34,49742,239961
http://www.bigresource.com/VB-Remote-MySQL-Server-h6Z8Cbaszz.html#
MySQL очень легко настраивает удаленные подключения. Однако вы должны настроить MySQL, чтобы разрешить пользователям. Другое дело, убедитесь, что порт 3306 открыт на хосте. Если это не так, то вы не можете подключиться к MySQL. Самый простой способ сделать это - ...
telnet myhost 3306
Если вы получите что-то вроде ..., 3.23.54-log▬I_ & amp;: 309i☻
, тогда порт 3306 открыт и MySQL слушает.
Затем убедитесь, что ваш userid настроен для разрешения доступа на сервере MySQL. Вы можете сделать это с помощью программного обеспечения клиента mysql или программного обеспечения mysqlcc.
Надеемся, что это поможет