Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Центр помощи > Автоподстановка значений в Access


Автор: Sawell 25.12.2009, 11:18
Подскажите пожайлуста как мне сделать следуюшие: в поле формы вводим значнение штрих кода а остальные поля заполняются сами из таблице. Принцеп мне известен я даже  код набросал. Уже 2 дня голову ломаю (ввиду отсутствия знаний) 

PS/ вариант с полем со списком не предлогать.

Private Sub ШтрихКод_AfterUpdate()
Dim dbs As Database, BarCode As String
    
    Set dbs = CurrentDb 'Выбираем БД
    BarCode = Me![ШтрихКод] 'условие отбора
    dbs.OpenRecordset "SELECT * FROM КарточкиТовара WHERE [ШтрихКод]=" & BarCode 'отбераем

Me![Артикул] = dbs(1).Я так думаю ято вся проблема здесь????
End Sub



Зарание всем спасибо!

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)