|
|
|
|
Set cmd = New ADODB.Command
With cmd
.ActiveConnection = CurrentProject.Connection
.CommandText = "INSERT INTO aaaa ( h1, h2, h3, word ) " & _
"VALUES (" & ch1 & ", " & ch2 & ", " & ch3 & ", " & Str1 & ")"
.Execute
End With
Set cmd = Nothing
|
Пишет, что отсутствует значение для одного или нескольких параметров. В таблице других полей нет, кроме счетчика, содержимое запроса проверял, SQL запрос сформирован правильно | |
|
| |
|
|
|
|
SQL запрос сформирован правильно
|
Скорее всего не хватает апострофов для значений текстовых полей. | |
|
| |
|