| |
|
|
| | VS 2010
Записываю изменения в поля таблицы.
GLB_CONNECTION_SPR.Execute("update [TUNING_TBL] set [ZNACHENIE]= '" & Me.TXT_ZNACHENIE.Text & "' where ID='" & Me.LAB_ID.Text & "'")
GLB_CONNECTION_SPR.Execute("update [TUNING_TBL] set [USE]= " & Me.CheckBox1.Checked & " where ID='" & Me.LAB_ID.Text & "'")
' GLB_CONNECTION_SPR.Execute("update [TUNING_TBL] set [USE]= 1 where ID='" & Me.LAB_ID.Text & "'")
|
Средняя строчка ни ошибок не выдаёт, ни изменений в таблице не делает.
Подставлял True, -1, 0, Истина.....
На истину ругнулося.
В конструкторе запросов наваял
В базе работает...
UPDATE TUNING_TBL SET TUNING_TBL.USE = True WITH OWNERACCESS OPTION;
|
В программе не работает...
GLB_CONNECTION_SPR.Execute("UPDATE TUNING_TBL SET TUNING_TBL.USE = True where ID='" & Me.LAB_ID.Text & "'")
не работает - Галочку не ставит...  | |
| |
| |
| |
|
|
| |
GLB_CONNECTION_SPR.Execute("UPDATE TUNING_TBL SET TUNING_TBL.USE = True where ID='" & Me.LAB_ID.Text & "'")
|
Вроде нет ошибок. Попробуй:
Debug.Print "UPDATE TUNING_TBL SET TUNING_TBL.USE = True where ID='" & Me.LAB_ID.Text & "'"
|
И посмотри что там именно в запросе получается. Особенно после where id= | |
| |
| |
| |
 16 Кб. |
|
| | Простите. не совсем понял совет.
Me.LAB_ID.Text - при отладке видно значение - это и в Lable написано - первая строка то же условие - пишется нормально.
А галка не ставится.
GLB_CONNECTION_SPR.Execute("UPDATE TUNING_TBL SET TUNING_TBL.USE = true")
галка не ставится.
GLB_CONNECTION_SPR.Execute("UPDATE TUNING_TBL SET TUNING_TBL.USE = " & 0)
ДОВЫЁЖИВАЛСЯ все галки убралися
GLB_CONNECTION_SPR.Execute("UPDATE TUNING_TBL SET TUNING_TBL.USE = " & -1)
не работает........ | |
| |
| |
|
|
| |
|
|
| |
GLB_CONNECTION_SPR.Execute("UPDATE TUNING_TBL SET TUNING_TBL.USE = False")
|
Так работает - всё нафиг удалило - все галки | |
| |
| |
| |
|
|
| | Z jabu t ваю.....
GLB_CONNECTION_SPR.Execute("update [TUNING_TBL] set [USE]= " & True & " where ID='" & Me.LAB_ID.Text & "'")
|
Вот как работает....  
и вот так
'GLB_CONNECTION_SPR.Execute("update [TUNING_TBL] set [USE]= not(" & False & ") where ID='" & Me.LAB_ID.Text & "'")
|
| |
| |
| |
