Snjana143 Ответов: 2

Как найти записи между двумя датами с помощью vb6.o

Частные Command1_Click Югу()
Вызовите dbConnect


Среда SQL = "выбрать * из расходов где ((('месяц') между # " &амп; DTPicker1.Стоимость усилителя; amp; "# и # " &АМП; DTPicker2.Стоимость усилителя; "#))"
RS.Откройте SQL, Conn, adOpenForwardOnly, adLockReadOnly
С помощью DataReport5.Sections("Section1").Controls 'section1 означает, что раздел, который вы создаете в datareport
.Пункт("Текст1").Свойство datafield = РС("идентификатор").Название
.Item("Text2").DataField = RS("месяц").Name
.Item("Text3").DataField = RS("расходы").Name
.Пункт("Надпись4").Свойство datafield = РС("цель").Название
.Пункт("Надпись5").Свойство datafield = РС("сумма").Название

'.Item("Function1").DataField = MYR("Сумма").Name

Конец С

Набор DataReport5.Источник данных = РС
DataReport5.Показать

Конец подводной лодки


iam с использованием базы данных ms-access 2003
месяц тип данных, как текст, который я поставил "месяц"



но я не вижу результата в отчете о данных.


пожалуйста помогите мне

2 Ответов

Рейтинг:
0

Amitava Bag (Kolkata)

SQL = "SELECT *" & _
"От расходов" & _
"Где ( '13/окт/20013' между '" &амп; формат(DTPicker1.Значение,"ДД/МММ/гггг") &ампер; "' и '" &АМП; формат(DTPicker2.Значение,"ДД/МММ/гггг") &ампер; "')"


Примечание: '13/Oct/20013' - это переменная дата, которая будет сравниваться с передним концом.
Fromatting date in dd/MMM/yyyy (т. е. 13/Oct/2013)-это хорошая практика, но если вы используете fornt end в многоязычной платформе, пожалуйста, сравните его с форматом sql server mm-dd-yyyy.

Рейтинг:
0

Aniket Yadav

Попробовать это.

Если месяц находится в формате мм, то,

SELECT * FROM Expences WHERE ('Month') Between '" & Format(DTPicker1.Value, "MM") & "' And '" & Format(DTPicker2.Value, "MM") & "'


Надеемся, что это позволит решить проблемы УР.