[ gaga_mn @ 07.03.2008. 10:34 ] @
kako da mi se pretraži subform po zadatim poljima u hederu.... molim Vas da mi pomognete
[ Getsbi @ 07.03.2008. 11:51 ] @
Ključna reč je [pretraga]. Ako je uneseš u polje za pretraživanje dobićeš odgovor na svoje pitanje. Evo jedne od tema koja se time bavila. http://www.elitesecurity.org/t304887-1#1822935
[ gaga_mn @ 07.03.2008. 12:00 ] @
da, već sam videla ovaj post i otprilike tako sam i probala da uradim ali nikako ne mogu da ukomponujem ovaj datum od - do. Uzela sam onaj zakačen file ali kažem, nikako da ukomponujem ovaj datum....
[ domaci_a_nas @ 07.03.2008. 14:22 ] @
Probaj da koristiš Date picker, rešio bi mnogo komplikacija. U tom slučaju bi mogla da radiš konverziju iz Date/Time u Long tip podataka. Ja to radim na sledeći način :

Public Function DToN(WhDate As Date) As Long
DToN = FormatNumber(Int(WhDate), 0, vbFalse, vbFalse, vbFalse)
End Function

Recimo u Queryju dodaš izraz DatumBroj koji bi se računao kao Int(Datum) i onda umesto da se petljaš sa datumima upoređuješ brojeve. Vidim da u referencama koristiš ADO, ja sam tu referencu uklonio i zamenio sa DAO. Čini mi se da se datumi kod Ado obeležavaju na drugi način. U DAO se koriste tarabice (#), s tim da u SQL kriterijumu moraš navesti ispravno formatiran datum, zato sam napisao funkciju DateCri. Ovde još treba dodati proveru da li su prazni textovi i tome slično...

Code:
Option Compare Database
Private Sub pretrazi_Click()
sfrmEvidencija.Form.RecordSource = "SELECT [tblevidencija].[refBr], [tblevidencija].[Naziv], [tblevidencija].[datum] " & _
          "FROM tblevidencija Where datum Between " &  DateCri(Datum_od) & " And " & DateCri(Datum_do)
End Sub

Private Function DateCri(WhText As TextBox) As String
DateCri = Format(CDate(WhText), "mm/dd/yyyy")
DateCri = Replace(DateCri, ".", "/")
DateCri = Replace(DateCri, "-", "/")
DateCri = "#" & DateCri & "#"
End Function
[ gaga_mn @ 10.03.2008. 06:44 ] @
možda je ovo i suviše teško za mene ali nisam uspela na osnovu ovog tvog ništa da uradim. Prosto ne radi...
[ domaci_a_nas @ 10.03.2008. 07:44 ] @
Izvinjavam se, trebalo je odmah da okačim i tvoju bazu sa ovim kodom. Moraš voditi računa da uneseš regularne datume.
Pozz
[ gaga_mn @ 10.03.2008. 07:58 ] @
hvalaaa, sad ću da probam
[ Trtko @ 10.03.2008. 08:24 ] @
Ja inace koristim Cdbl kod pretrage kad je datum u pitanju.

sqlupit1 = "select * from prijenos where cdbl(dat_fak)>=" & CDbl(oddatuma) & " and cdbl(dat_fak)<=" & CDbl(dodatuma)

al uvijek zaboravim da postoji between