База данных VB 6.0
Помогите пожалуйста с бд.
На нажатие кнопки, в уже существующей базе данных access, добавлялось новое поле.
На нажатие кнопки, в уже существующей базе данных access, добавлялось новое поле.
чем подключался?
ну както так через дату
Код:
Data1.Recordset.AddNew
ну както так через дату
Я как бы сделал, но при обращении к таблице выдает ошибку несоответствия типа.
Код:
Dim db As dao.Database
Dim tablica As dao.TableDef
Dim fld As dao.Field
Dim ws As dao.Workspace
Set db = dao.OpenDatabase("С:\Lab\Students.mdb")
Set tablica = db.OpenRecordset("students")'ошибка
Set fld = tablica.CreateField("PRIVET", dbText, 10)
tablica.Fields.Append fld
db.TableDefs.Append tablica
db.TableDefs.Refresh
db.Close
Dim tablica As dao.TableDef
Dim fld As dao.Field
Dim ws As dao.Workspace
Set db = dao.OpenDatabase("С:\Lab\Students.mdb")
Set tablica = db.OpenRecordset("students")'ошибка
Set fld = tablica.CreateField("PRIVET", dbText, 10)
tablica.Fields.Append fld
db.TableDefs.Append tablica
db.TableDefs.Refresh
db.Close
Вопрос конечно интересный, но как мне представляется, программно, к сожалению, добавить поле в уже существующую таблицу БД невозможно. Можно вручную через встроенный в VB VisData Manager.
А ошибку выдаёт, потому что OpenRecordset там совсем не по назначению.
А ошибку выдаёт, потому что OpenRecordset там совсем не по назначению.