В чем проблема Execute?

Вопросы по программированию, не подходящие в другие разделы.

Модераторы: Naeel Maqsudov, C_O_D_E

Ответить
aligwi
Сообщения: 2
Зарегистрирован: 12 мар 2008, 23:17

Помогите в написание программного кода на VBA-6, где значения переменной (к примеру DIM iFinish as Integer) будут редактировать таблицу "Basa" базы данных. Причем первый цикл отражает номер записи (iFi), а второй номера полей записи (tira - название первого поля содержит записи от 1-250, iFini название последующих полей – цифра!, но не текст)

Private Sub cmdVopros_Click()
Dim dbVopros As Database
Set dbVopros = OpenDatabase (“C:/Forum/dbAccess.mdb”)

For iFi = 1 To 250
For iFini = 1 To 56
iFinish =1/34*eric ‘ здесь некоторые вычисления
dbVopros.Execute "Updata Basa SET tira=iFi WHERE iFini=iFinish"
‘ не работает, как быть?
?
?
?
Next iFini
Next iFi

End Sub

Выручайте!!!
airyashov
Сообщения: 441
Зарегистрирован: 02 ноя 2007, 10:31

="Updata Basa SET tira="+iFi+" WHERE iFini="+iFinish
airyashov
Сообщения: 441
Зарегистрирован: 02 ноя 2007, 10:31

dbVopros.Execute "Update Basa SET tiraj=" + Str(iFi) + " WHERE " + Str(iFini) + "=" + Str(iFinish)
Ответить