Есть база данных на хостинге и есть прога которая обращается к этой базе и проводит разного рода манипуляции с данными этой базы. Так вот все зорошо, кроме процесса создания новой таблицы в базе. Почему то высвечивается ошибка о неправильном синтаксисе, хотя на мой взгляд вроде в правильно. Помогите пожалуйста, разобраться. Может что то не доглядел!
- Код: Выделить всё
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
Заранее благодарен всем за помощь.