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

Форум: MS ACCESS

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

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

 
 

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

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

тема: помогите новику =) (97)
 
 автор: CBETJIbIu   (08.11.2008 в 10:01)   личное сообщение
 
 

Всем здравствуйте. Вот начал учить access 97. Возник такой вопрос: нужно сделать выборку на поле со списком. Если флажок активирован, то надо, чтобы в в поле отображались толко те данные, поле штрихкод которых пустое (текстовое). Не могу такое реализовать. Кто может помоч?

  Ответить  
 
 автор: myth   (08.11.2008 в 13:59)   личное сообщение
 
 

что- то типо того:..

    sql = "select*  from Table1"  
    if(CheckBox1.Value = true) then   sql = sql & "where IsNull(Table1.PoleShtrihKod)"
    ПолеСоСписком.RecordSource = sql
  

  Ответить  
 
 автор: CBETJIbIu   (08.11.2008 в 14:12)   личное сообщение
 
 

так пойдет?
Private Sub Form_Open(Cancel As Integer)
CancelInput = False
SQL = "select* from Склад"
If (Флажок186.Value = True) Then SQL = SQL & "where IsNull(Склад.ШтрихКод)"
поле_выбора.RecordSource = SQL
End Sub

а то он ругается на RecordSource. пишет "метод или компонент не найдн"

  Ответить  
 
 автор: П.Полиграфович   (08.11.2008 в 14:13)   личное сообщение
15 Кб.
 
 

ВОТ. Только непонятно, зачем текстовое поле сделали из ШТРИХА Товарищ?
Да и ПОМОЧЬ пишется с мягким..

  Ответить  
 
 автор: CBETJIbIu   (08.11.2008 в 14:18)   личное сообщение
 
 

делали до меня. не знаю. как раз вот мысль ришла, а не сделать тупо числовое впихнуть элементарный код...

  Ответить  
 
 автор: П.Полиграфович   (08.11.2008 в 14:26)   личное сообщение
 
 

При текстовом, синтаксис немного другой будет и всё..

  Ответить  
 
 автор: CBETJIbIu   (08.11.2008 в 14:55)   личное сообщение
 
 

на счет неправильности написания слов - печатаю быстро. некоторые клавиши тупят и нет времени проверять написанное к сожалению

  Ответить  
 
 автор: П.Полиграфович   (08.11.2008 в 14:58)   личное сообщение
15 Кб.
 
 

А Access у вас какой? Формат MDB. Пробуйте, еще один...

  Ответить  
 
 автор: CBETJIbIu   (08.11.2008 в 15:00)   личное сообщение
 
 

RunTime MS Access 97

  Ответить  
 
 автор: П.Полиграфович   (08.11.2008 в 15:04)   личное сообщение
11 Кб.
 
 

Вот под 97

  Ответить  
 
 автор: CBETJIbIu   (08.11.2008 в 15:18)   личное сообщение
 
 

спасибо большое всем.

  Ответить  
 
 автор: CBETJIbIu   (08.11.2008 в 14:57)   личное сообщение
 
 

вопрос такой...файл, котрый прикрепили, не открывается. пишет Unrecognized database format

  Ответить  
 
 автор: час   (08.11.2008 в 15:31)   личное сообщение
 
 

Вот то, что в примере написано:
Me.cbo1- поле сосписком
Me.Check1 - флажок

Private Sub cbo1_GotFocus()
If Me.Check1 = -1 Then' Если флажок с галочкой
Me.cbo1.RowSource = "SELECT Код, Штрих, Наименование FROM TBL WHERE IsNull(Штрих) = -1 or штрих = 0 ORDER BY Штрих;"
Me.cbo1.Requery
' Если флажок без галочки
Else: Me.cbo1.RowSource = "SELECT * FROM TBL ORDER BY Наименование;"
End If
End Sub

  Ответить  
 
 автор: myth   (08.11.2008 в 22:21)   личное сообщение
 
 

Точно, перепутал блин rowSource с recordsource :)) пардон

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