|
|
|
Помогите пожалуйста. Ошибка....... (Слишком мало параметров. Требуеться 1)
|
|||
|---|---|---|---|
|
#18+
Помогите пожалуйста. Есть кнопочка Private Sub Кнопка_Click() Dim db As Database Dim rs As Recordset Dim strSQL As String strSQL = "Delete * From Sclad Where [Sclad].Form![Код]=[Sclad]![Код]" Set db = CurrentDb Set rs = db.OpenRecordset("Sclad", dbOpenDynaset) Do Until rs.EOF ТУТ ВЫВОДИТ ошибку: CurrentDb.Execute strSQL, dbInconsistent rs.MoveNext Loop End Sub Ошибка: Слишком мало параметров. Требуеться 1 Подскажите что не так ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.09.2004, 13:27:48 |
|
||
|
Помогите пожалуйста. Ошибка....... (Слишком мало параметров. Требуеться 1)
|
|||
|---|---|---|---|
|
#18+
автор[Sclad].Form![Код]=[Sclad]![Код] Это что? Про конкатенацию слыхали ? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.09.2004, 13:32:38 |
|
||
|
Помогите пожалуйста. Ошибка....... (Слишком мало параметров. Требуеться 1)
|
|||
|---|---|---|---|
|
#18+
Что-то я не понял - Надо удалить запис из таблицы склад при определенном условии (вот он на условии и ругается) - Ты составляешь SQL запрос (но не очень корректно - лично я условия удаления не понял - Акс между прочим тоже :) ) - И совсем не понял, зачем по записям таблицы бежать в цикле? (Уж если цикл по рекордсету, то и работаем с рекордсетом, а цикл, но работаем на уровне запросов да еще и без привязки к данным рекордсета) + FAQ - вдруг пригодится ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.09.2004, 13:34:42 |
|
||
|
Помогите пожалуйста. Ошибка....... (Слишком мало параметров. Требуеться 1)
|
|||
|---|---|---|---|
|
#18+
Мне вообще-то записи с Формы Расход нужно сравнить с Таблицей Sklad и удалить их оттуда ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.09.2004, 13:41:18 |
|
||
|
Помогите пожалуйста. Ошибка....... (Слишком мало параметров. Требуеться 1)
|
|||
|---|---|---|---|
|
#18+
ВОТ ЭТО ПРАЛЬНЫЙ ВАРИАНТ Private Sub Кнопка_Click() Dim db As Database Dim rs As Recordset Dim strSQL As String strSQL = "Delete * From Sclad Where [Расход].Form![Код]=[Sclad]![Код]" Set db = CurrentDb Set rs = db.OpenRecordset("Sclad", dbOpenDynaset) Do Until rs.EOF CurrentDb.Execute strSQL, dbInconsistent rs.MoveNext Loop End Sub ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.09.2004, 13:43:05 |
|
||
|
Помогите пожалуйста. Ошибка....... (Слишком мало параметров. Требуеться 1)
|
|||
|---|---|---|---|
|
#18+
strSQL = "Delete * From Sclad Where [Sclad].Form![Код]=[Sclad]![Код]" strSQL = "Delete * From Sclad Where [Код]=" & me![Код] Если [Код] число по моему так и strSQL = "Delete * From Sclad Where [Код]='" & me![Код] & "'" по моему так если [Код] строка ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.09.2004, 13:43:43 |
|
||
|
Помогите пожалуйста. Ошибка....... (Слишком мало параметров. Требуеться 1)
|
|||
|---|---|---|---|
|
#18+
неправильно - [Sclad]![Код] нужно [Sclad].[Код] ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.09.2004, 13:48:00 |
|
||
|
Помогите пожалуйста. Ошибка....... (Слишком мало параметров. Требуеться 1)
|
|||
|---|---|---|---|
|
#18+
Sklad это таблица. Ставил me![Код] или [Sclad].[Код] не работает - не может найти поле. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.09.2004, 13:51:56 |
|
||
|
Помогите пожалуйста. Ошибка....... (Слишком мало параметров. Требуеться 1)
|
|||
|---|---|---|---|
|
#18+
авторSklad это таблица. Ставил me![Код] или [Sclad].[Код] не работает - не может найти поле. напиши строку целиком как написал, надоело телепятить ... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.09.2004, 13:58:03 |
|
||
|
Помогите пожалуйста. Ошибка....... (Слишком мало параметров. Требуеться 1)
|
|||
|---|---|---|---|
|
#18+
sposad авторSklad это таблица. Ставил me![Код] или [Sclad].[Код] не работает - не может найти поле. напиши строку целиком как написал, надоело телепятить ... strSQL = "Delete * From Sclad Where [Код]=" & me![Код]. На этой строке и останавливаеться ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.09.2004, 14:06:18 |
|
||
|
Помогите пожалуйста. Ошибка....... (Слишком мало параметров. Требуеться 1)
|
|||
|---|---|---|---|
|
#18+
Как обратиться к таблице. У меня в базе Таблица Sclad, я хочу обратиться к полю Код, которое находиться в этой таблице. Пробовал [Sclad]![Код] - Не может найти поле. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.09.2004, 14:12:50 |
|
||
|
Помогите пожалуйста. Ошибка....... (Слишком мало параметров. Требуеться 1)
|
|||
|---|---|---|---|
|
#18+
Alexey Shнеправильно - [Sclad]![Код] нужно [Sclad].[Код] Сорри.. первую строчку забыл убрать )).. Собственно ее исиправлял ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.09.2004, 14:13:38 |
|
||
|
Помогите пожалуйста. Ошибка....... (Слишком мало параметров. Требуеться 1)
|
|||
|---|---|---|---|
|
#18+
LutykКак обратиться к таблице. У меня в базе Таблица Sclad, я хочу обратиться к полю Код, которое находиться в этой таблице. Пробовал [Sclad]![Код] - Не может найти поле. CurrentDB.Exeute "DELETE * FROM [Sclad] WHERE [Код] =" & Me![Код] Обратиться например так Удаляет из таблицы Sclad, находящейся в текущей базе, все записи где значение поля "Код" совпадает со значением поля "Код" в текущей форме. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.09.2004, 14:19:13 |
|
||
|
Помогите пожалуйста. Ошибка....... (Слишком мало параметров. Требуеться 1)
|
|||
|---|---|---|---|
|
#18+
strSQL = "Delete * From Sclad Where [Sclad].[Код]=" & me![Код].Value если Код - число и открыта форма, с которой сравниваешь ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.09.2004, 14:26:58 |
|
||
|
Помогите пожалуйста. Ошибка....... (Слишком мало параметров. Требуеться 1)
|
|||
|---|---|---|---|
|
#18+
Я могу ошибаться, но по-моему в конце должно быть & ";" То есть: "Delete * From Sclad Where [Sclad].[Код]=" & me![Код].Value & ";" ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 22.09.2004, 08:42:33 |
|
||
|
|

start [/forum/topic.php?fid=45&msg=32691837&tid=1671636]: |
0ms |
get settings: |
7ms |
get forum list: |
17ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
33ms |
get topic data: |
9ms |
get forum data: |
2ms |
get page messages: |
62ms |
get tp. blocked users: |
2ms |
| others: | 208ms |
| total: | 344ms |

| 0 / 0 |
