Так он выглядит на VB и как уже упомянула MS-Access 2000 моя база.

strSQL = " UPDATE tblWarenBestand SET " & _
" ArtikelNr = ( SELECT ArtikelNr FROM tblArtikel WHERE ArtikelName = '" & ctlArtikelName.Text & "' ), " & _
" FilmTitel = '" & txtFilmTitel.Text & "', " & _
" PreisNr = ( SELECT PreisNr FROM tblPreis WHERE Preis = '" & ctlPreis.Text & "' ), " & _
" Datum = '" & txtDatum.Text & "' " & _
" WHERE FilmNr = " & txtFilmNr.Text

Ошибка ADODB N2147217904 - что-то вроде: "Минимум для одного необходимого параметра не было задано значение"
Bока...!

Как это понимать? Только одно мне приходит в голову - ошибка в запросе, но какая?

PavelСделай Debug.Print strSQL и результат снова сюда.

Сделала, а где результат искать? Я ничего не вижу.
Извиняюсь за смешной вопрос, я только учусь...

АлексейКв отличие от VB в аксессе свойство текст доступно только когда на контроле стоит фокус, в других случаях пользуйся value

Не плохо было вы поподробнее

АлексейКдату надо форматировать либо в #mm/dd/yyyy# либо передавать как число

Учту, но как раз на этом месте проблем не было. Проблемы начинаются со сложными запросами:

" ArtikelNr = ( SELECT ArtikelNr FROM tblArtikel WHERE ArtikelName = '" & ctlArtikelName.Text & "' ), " & _
И
" PreisNr = ( SELECT PreisNr FROM tblPreis WHERE Preis = '" & ctlPreis.Text & "' ), " & _
как только хоть одна из этих строк в запросе присутствует так и ...

Суп-п-пер!

Вот результат

UPDATE tblWarenBestand SET ArtikelNr = ( SELECT ArtikelNr FROM tblArtikel WHERE ArtikelName = 'DVD P' ), FilmTitel = '222222222', PreisGruppe = ( SELECT PreisGruppe FROM tblPreis WHERE Preis = '10' ), Datum = '25.03.2001' WHERE FilmNr = '11'

Нашла одну ошибочку в запросе: не PreisNr а PreisGruppe сейчас запрос выглядит так:

strSQL = " UPDATE tblWarenBestand SET " & _
" ArtikelNr = ( SELECT ArtikelNr FROM tblArtikel WHERE ArtikelName = '" & ctlArtikelName.Text & "' ), " & _
" FilmTitel = '" & txtFilmTitel.Text & "', " & _
" PreisGruppe = ( SELECT PreisGruppe FROM tblPreis WHERE Preis = '" & ctlPreis.Text & "' ), " & _
" Datum = '" & txtDatum.Text & "' " & _
" WHERE FilmNr = '" & txtFilmNr.Text & "'"

но после исправления получаю новую ошибку: Nr.: -2147467259 "Операция должна обновляемый опрос использовать"

получаю новую ошибку:

Nr.: -2147467259
"Операция должна обновляемый опрос использовать"