Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > VB6 > Проблема с созданием программным путем таблицы в MySQL

Автор: velltar 25.7.2010, 11:28

Здравствуйте!
Есть база данных на хостинге и есть прога которая обращается к этой базе и проводит разного рода манипуляции с данными этой базы. Так вот все зорошо, кроме процесса создания новой таблицы в базе. Почему то высвечивается ошибка о неправильном синтаксисе, хотя на мой взгляд вроде в правильно. Помогите пожалуйста, разобраться. Может что то не доглядел!

Код



Public Sub CreateTabl()
Dim rstRecordSet As New VBMySQLDirect.MYSQL_RS
Dim DUs
DUs = "1111"
If Not OpenDB Then Exit Sub
On Error GoTo l1
Set rstRecordSet = conConnection.Execute("CREATE TABLE " & DUs & "(pole1 VARCHAR(8), PRIMARY KEY  (`pole1`)) ENGINE=MyISAM DEFAULT CHARSET=cp1251;")
rstRecordSet.CloseRecordset
Set rstRecordSet = Nothing
l1:
CloseDB
End Sub

Заранее благодарен всем за помощь.

Автор: Akina 27.7.2010, 08:30

Вместо строки 7:

Код


Debug.Print "CREATE TABLE " & DUs & "(pole1 VARCHAR(8), PRIMARY KEY  (`pole1`)) ENGINE=MyISAM DEFAULT CHARSET=cp1251;"

Результат в студию.
Точный текст ошибки в студию.
Результат выполнения текста запроса непосредственно на сервере через консоль - в студию.

Автор: velltar 27.7.2010, 08:46

Проблема решена. Все дело в том что оказывается smile

название таблиц не может полностью состоять из цифр, поэтому и ошибка вылетала. Так что если кто в будущем столкнется с такой же проблемой, то знайте smile

Большое спасибо всем кто откликнулся.

Автор: Akina 27.7.2010, 10:49

velltar, ну как бы чтение документации никто не отменял