Форум программистов, компьютерный форум, киберфорум
Наши страницы
MS Access
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
Ghost_KS
0 / 0 / 0
Регистрация: 25.12.2011
Сообщений: 2
#1

Как реализовать поиск в таблице

29.12.2011, 02:35. Просмотров 885. Ответов 3
Метки нет (Все метки)

Помогите есть таблица с кодом товара (Код товара текстовый)
когда пользователь водит в форме код с начала база должна проверить есть ли такой-же номер а потом только разрешить добавление товара.
Я не могу сделать проверку.
пример привожу подскажите что не так
Visual Basic
1
2
3
4
5
   Dim dbs As Database, rst2 As DAO.Recordset, t As String
    t = Forms!кодтовара.Text
    Set dbs = CurrentDb
    Set rst2 = dbs.OpenRecordset("kod_tov", dbOpenDynaset)
    rst2.FindFirst "sn = " & Format(t,  ")
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
29.12.2011, 02:35
Ответы с готовыми решениями:

Как реализовать поиск в таблице по первым символам???
Кто подскажет где можно посмотреть пример или как вообще реализовать это. То...

Поиск по таблице как в 1с
Всем доброго времени суток! Подскажите, возможно реализовать поиск по таблице...

Поиск записей в одной таблице, где значения ключевого поля не совпадают с полем в другой таблице
Имеется Access XP, надо создать запрос для поиска записей в таблице ТОВАРЫ,где...

Access 2003/ как в подчиненной таблице сделать поиск по фамилии и адресу?
Добрый день Помогите пожалуйста! Бьюсь уже 4 день. Есть форма с полями...

Как реализовать такой поиск..?
Всем привет, наткнулся я тут на интерсное видео...

3
Михайло
115 / 115 / 10
Регистрация: 12.05.2010
Сообщений: 1,204
30.12.2011, 11:12 #2
rst2.FindFirst "sn = """ & t & """"
0
neo-programer
0 / 0 / 0
Регистрация: 01.10.2011
Сообщений: 290
30.12.2011, 15:50 #3
Visual Basic
1
2
3
4
5
Dim dbs As Database, rst2 As DAO.Recordset, t As String
t = Forms!кодтовара.Text
Set dbs = CurrentDb
Set rst2 = dbs.OpenRecordset("kod_tov", dbOpenDynaset)
rst2.FindFirst "sn = " &  Chr(34) &  t  &  Chr(34)
или 100% верняк (см. ниже)
Visual Basic
1
2
3
4
5
Dim dbs As Database, rst2 As DAO.Recordset, t As Integer
t = CInt(Forms!кодтовара.Text)
Set dbs = CurrentDb
Set rst2 = dbs.OpenRecordset("kod_tov", dbOpenDynaset)
rst2.FindFirst "sn = " & t
0
Ghost_KS
0 / 0 / 0
Регистрация: 25.12.2011
Сообщений: 2
31.12.2011, 21:39 #4
Всем спасибо получилось.

p.s. Вот теперь держись подлый юзверь.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
31.12.2011, 21:39

Как реализовать поиск по диапазону дат?
Есть два поля, в которые вводятся даты, нужно чтоб в подчиненной таблице записи...

БД для Гостиниц. Как реализовать запрос (поиск) по выпадающему списку?
Доброе время суток, строю БД для гостиницы. С Access работал очень давно и уже...

Поиск по таблице
Здравствуйте! имеется таблица в которой находится учет принтер, мфу и сканеров...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru