Rambler's Top100
Форум: MS ACCESSVBVBA MS OfficeMS SQL server
Новые сообщения: 0000

Форум: MS ACCESS

Вопросы связанные с MS ACCESS

Обновить визитку
Участники «Online»
Все участники

 
 

Доброго времени суток, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: Условие WHERE по текстовому полю
 
 автор: shaucha   (21.10.2008 в 17:23)   личное сообщение
 
 

Столкнулся с проблемой -

неопределенная функция 'noWHERE' в выражении


Dim strSQL As String
Dim strUserName As String
    strUserName = "Admin"
    strSQL = "UPDATE serUsers SET serUsers.DAccess = No" & _
    "WHERE (((serUsers.User)<>'" & strUserName & "'))"
    CurrentDb.Execute strSQL


Что я делаю не так? Может по другому условие WHERE для текстового поля нужно задавать?

Понимаю, что бред, но таким образом реализуется типа управление доступом пользователей к базе...

  Ответить  
 
 автор: FORMAT   (21.10.2008 в 17:34)   личное сообщение
 
 

Можно использовать либо LIKE либо ф-цию InStr

  Ответить  
 
 автор: shaucha   (21.10.2008 в 17:42)   личное сообщение
 
 

не совсем понял, как тут InStr использовать...

Мне нужно чтобы выполнился запрос, если User не равен "Admin".
NOT LIKE не срабатывает - таже ошибка...

  Ответить  
 
 автор: Кабан   (21.10.2008 в 18:13)   личное сообщение
 
 

потомучто после NO пробел надо

"UPDATE serUsers SET serUsers.DAccess = No WHERE (((serUsers.User)<>'" & strUserName & "'))" 

  Ответить  
 
 автор: Анатолий (Киев)   (21.10.2008 в 18:16)   личное сообщение
 
 

...No" & _
"WHERE...
У вас нет пробела между "No" и "WHERE"

"User" - не лучшее имя для поля. Пишите так: serUsers.[User]

  Ответить  
 
 автор: shaucha   (21.10.2008 в 18:21)   личное сообщение
 
 

Спасибо.
Такие нюансы, чорт побери )))
Буду учиться.

  Ответить  
 
 автор: shaucha   (21.10.2008 в 18:24)   личное сообщение
 
 

Логично же было подумать, что он ругается на noWHERE )))
Вот я тормоз )

  Ответить  
HiProg.com - Технологии программирования
Rambler's Top100 TopList