Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > VB6 > Запись в базу данных


Автор: Baha_Ahmed 9.12.2008, 11:58
после объединения нескольких таблиц я вытаскиваю данные в  txtCommentary.Text
Код

DataProcess_education.RecordSource = "SELECT * FROM tblListpupil,scholastic_process,lessons_on_school " & _
"WHERE tblListpupil.id=scholastic_process.idPupil AND " & _
"scholastic_process.idLesson=lessons_on_school.idLessons AND Fio LIKE '" & lblProcess_education.Caption & "*' AND Lessons LIKE '" & "*" & nameLesson & "*'"
DataProcess_education.Refresh
txtCommentary.Text = DataProcess_education.Recordset.Fields("commentary_ task")

 а теперь я хочу добавить в это же поле данные
Код

If KeyCode = vbKeyInsert Then
        DataProcess_education.Recordset.Edit
        DataProcess_education.Recordset.Fields("commentary_ task") =txtCommentary.Text
        DataProcess_education.UpdateRecord
        DataProcess_education.Refresh
        'txtCommentary.Text = ""
        MsgBox "Eiiiaioa?ee anoaaeai!", vbInformation
    End If


 Помогите выдает ошибку:
Can't update.  Database or object is read-only.
то есть эта база данных открыта только для чтения.
Вопрос: Как после запроса по нескольким таблицам обновить данные как это в моем примере. Постоянно с этой проблемой сталкиваюсь. Помогите!!! smile 


Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)