Filtr a vyhledávání – Visual Basic – Fórum – Programujte.com

Zdravím, potřeboval bych udělat filtr pomocí textboxu, kam se napíše hledaný výraz a z databáze mi to vypíše všechny nalezené výrazy, konkrétně do textboxu zadám datum od: do: a do listboxu se mi vypíšou z databáze hodnoty s daným datem

neviem ci to uz mas ale napisem ti ako to robim ja

kod je z VB6 a databaza je access takze sa to inde moze lisit

tak najskor si musis prekonvertovat datum, pretoze v access sa vyhladava vo formate mm/dd/yyyy

ja pouzivam objekt datepicker tam si pekne vyberies datum ktory potrebujes

Date1 = Replace(Format(DatePicker1.Value, "mm.dd.yyyy"), ".", "/")
Date2 = Replace(Format(DatePicker2.Value, "mm.dd.yyyy"), ".", "/")

vysledok je ze datum napr. 1.2.2013 budes mat 02/01/2013

a potom musis otvorit databazu

SQLQ = "SELECT * FROM databaza WHERE Datum BETWEEN #" & Date1 & "# AND #" & Date2 & "#"
oRS.Open SQLQ, strDbAccess, adOpenForwardOnly, adLockReadOnly

'potom uz len priradis do listboxu udaje ktore vytiahnes
do while not ors.eof
    list1.additem ors("datum")
    ors.movenext
loop
ors.close