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


Автор: xaxx 13.5.2008, 11:46
проблема вот в чём есть база данных есть vb
хочу выбрать в бд только те записи которые мне нужны ,а именно:
Код

adodc1.recordsource="select дата.код,дата.дата from дата where дата.дата=#11/05/2008#
вот так все работает,но если мне нужно самому ввести любую дату...например добавить на форму календарь и там выбирать дату,ни чего не получаетсья..
делал так:
Код

a=calendar1.day
b=calendar1.mouth
c=calendar1.year
adodc1.recordsource="select дата.код,дата.дата from дата where дата.дата=# ' "+a/b/c+" ' #
не получается..вообщем пробовал в разных вариациях и ни как пишет ошибку : тип мисматч 13 что то такое..
была идея сделать так чтобы дата которая в каледаре была типа сегодняшняя дата,и тогда в запросе дата.дата=date()
руки не добрались ещё..
извиняюсь за ошибки...
подскажите пож-та!
всего кода программы просто нет под рукой ,как будет выложу..
заранее спасибо

Добавлено @ 12:00
да ещё один вопросик..как прописать в свойствах adodc1.connectionstring чтобы база данных была в папке с проектом,если папку перенести не было ошибок типа бд не найдена.
подскажите пож-та!

Автор: neiron 14.5.2008, 02:28
xaxx, строковую неправильно составил

Так попробуй:

Код

adodc1.recordsource="select дата.код,дата.дата from дата where дата.дата=# ' " & cstr(a) & "/" & cstr(b) & "/" & cstr(c) & "' #"


Юзай App.Path - это путь к папке, где твой exe лежит.

Автор: Akina 14.5.2008, 07:52

M
Akina
  • Пользуйтесь тегом "Код";
  • Прежде чем задать вопрс - воспользуйтесь поиском;
  • Один топик - один вопрос.

Автор: xaxx 14.5.2008, 11:12
Всем большое спасибо! 
neiron, точно,точно.
я вот вчера сделал так и вроде все работает.
Код

dim a as string
dim b as string
dim c as string
adodc1.recordsource="select дата.код,дата.дата from дата where дата.дата=# "+a/b/c+" #"


Автор: Dexx 15.5.2008, 11:53
Всегда пожалуйста обращайся еще smile 

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