Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / MySQL [игнор отключен] [закрыт для гостей] / VBA, ODBC, запрос к серверу, MySQL. Создать DB, таблицы / 2 сообщений из 2, страница 1 из 1
03.06.2015, 11:21:12
    #38975015
мальчик
мальчик
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA, ODBC, запрос к серверу, MySQL. Создать DB, таблицы
Добрый день.
Помогите пожалуйста разобраться, что я делаю не так.
Через VBA, ODBC посредством запросов к серверу пытаюсь создать объекты в MySQL на localhost. Пишу:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
On Error Resume Next
    Set qry = Nothing
    DoCmd.DeleteObject acQuery, "Запрос"
    Set qry = CurrentDb.CreateQueryDef("Запрос")
    qry.Connect = "ODBC;DRIVER={MySQL ODBC 5.1 Driver};UID=root;PORT=3306;SERVER=localhost;FILEDSN=C:\Program Files\Common Files\ODBC\Data Sources\z1.dsn;"
    qry.ReturnsRecords = True
    qry.SQL = "-----"
    DoCmd.OpenQuery "Запрос8"
    Set qry = Nothing
    DoCmd.DeleteObject acQuery, "Запрос"


При qry.SQL = "CREATE DATABASE `zz1`;" База данных создается
При qry.SQL = "DROP DATABASE `zz1`;" База данных удаляется
При qry.SQL = "DROP DATABASE IF EXISTS `zz1`;" запрос не выполняется
При qry.SQL = "DROP DATABASE `zz1`; CREATE DATABASE `zz1`;" запрос не выполняется.
При qry.SQL = "CREATE DATABASE `zz1`; USE `zz1`; CREATE TABLE `aaa` (`ddd` varchar(50));" запрос не выполняется
При созданной базе данных qry.SQL = "USE `zz1`; CREATE TABLE `aaa` (`ddd` varchar(50));" запрос не выполняется

Создается такое впечатление, что если SQL конструкция имеет больше одной команды, то запрос не выполняется. Где моя ошибка? Что я делаю неправильно?
Спасибо
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.06.2015, 11:24:40
    #38975026
мальчик
мальчик
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VBA, ODBC, запрос к серверу, MySQL. Создать DB, таблицы
Ой, Хотел в форум ACCESS забросить. А случайно забросил в MySQL. Удалите здесь пожалуйста. Счас в ACCESS продублирую
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / MySQL [игнор отключен] [закрыт для гостей] / VBA, ODBC, запрос к серверу, MySQL. Создать DB, таблицы / 2 сообщений из 2, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 284ms
Закрыть
start [/forum/topic.php?fid=47&tablet=1&tid=1833115]:
 0ms
get settings:
 9ms
get forum list:
 9ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 46ms
get topic data:
 6ms
get forum data:
 1ms
get page messages:
 16ms
get tp. blocked users:
 1ms
others: 192ms
total:  284ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]