Вот шаги, которые я использую для получения данных из базы данных Visual FoxPro и загрузки в базу данных MySql.Все они помещаются в пользовательский метод в форме, который запускается кнопкой команды.Например, метод будет «uploadnewdata», и я передаю параметры для любых таблиц данных, которые мне нужны
1) Подключение к серверу - я использую MySql ODBC 2) Проверка пользователя (для извлечения правильного используется SQLEXECсоответствующая запись для пользовательских таблиц IF M.WorkingDatabase <> - 1 nRetVal = SQLEXEC (m.WorkingDatabase, "SELECT * FROM users", "csrUsersOnServer")
SELECT csrUsersOnServer
SELECT userid,FROM csrUsersOnServer;
WHERE ALLTRIM(UPPER(userid))=ALLTRIM(UPPER(lcRanchUser));
AND ALLTRIM(UPPER(lcPassWord))=ALLTRIM(UPPER(lchPassWord));
INTO CURSOR ValidUsers
IF _TALLY>=1
ELSE
=MESSAGEBOX("Your Premise ID Does Not Match Any Records On The Server","System Message")
RETURN 0
ENDIF
ELSE
=MESSAGEBOX("Unable To Connect To Your Database", "System Message")
RETURN 0
ENDIF
3) После успешного создания я создаюмой базовый курсор (это тот, с которого я отправляю) 4) Затем я перебираю этот курсор, создавая переменную для значений в полях 5), затем используя SQLEXEC и INSERT INTO, я обновляю каждую запись 6), как только программазавершает обработку курсора, генерирует окно сообщения с сообщением «закончено», и элемент управления возвращается в форму.
Все, что нужно сделать пользователю, - это выбрать стартовую таблицу и ввести свою регистрационную информацию