Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Findfirst

[es] :: Visual Basic 6 :: Findfirst

[ Pregleda: 1733 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

ico22
Bihac

Član broj: 17109
Poruke: 9
*.net.hinet.hr



Profil

icon Findfirst02.12.2003. u 21:01

Imam problem, tj. ne znam kako da napravim da mi u metodi Findfirst trazeni pojam pocne sa prvim slovom koje zadam u txtboxu.


Form1.Data1.Recordset.FindFirst "prezime ='" & Text1.Text & "'"


Pokusao sam staviti >= ali nikako da uspijem.

02.12.2003. u 21:01 

mladenovicz
Zeljko Mladenovic
Xoran Technologies, Inc., Ann Arbor, MI,
USA / Software Engineer
Ann Arbor, MI, USA

Član broj: 6598
Poruke: 2065
*.yubc.net

Jabber: mladenovicz@elitesecurity.org
ICQ: 95144142
Sajt: yubc.net/~mz


Profil

icon Re: Findfirst03.12.2003. u 09:53
Code:

Form1.Data1.Recordset.FindFirst "prezime LIKE '" & Text1.Text & "%'"

03.12.2003. u 09:53 

ico22
Bihac

Član broj: 17109
Poruke: 9
*.net.hinet.hr



Profil

icon Re: Findfirst03.12.2003. u 20:41
Laptopovi

Probao sam na razne nacine ali mi nikako ne uspijeva.
03.12.2003. u 20:41 

mladenovicz
Zeljko Mladenovic
Xoran Technologies, Inc., Ann Arbor, MI,
USA / Software Engineer
Ann Arbor, MI, USA

Član broj: 6598
Poruke: 2065
*.yubc.net

Jabber: mladenovicz@elitesecurity.org
ICQ: 95144142
Sajt: yubc.net/~mz


Profil

icon Re: Findfirst04.12.2003. u 09:45
ajde probaj ovo

Code:

Dim S As String

    S = Text1.Text
    Form1.Data1.Recordset.FindFirst "prezime Like '*" & S & "*'"

    If Form1.Data1.Recordset.NoMatch Then
        MsgBox "No match was found."
    End If


pa ako ovo radi izbaci ovu prvu zvezdicu
04.12.2003. u 09:45 

ico22
Bihac

Član broj: 17109
Poruke: 9
*.net.hinet.hr



Profil

icon Re: Findfirst04.12.2003. u 18:48
Radi.

Hvala
04.12.2003. u 18:48 

[es] :: Visual Basic 6 :: Findfirst

[ Pregleda: 1733 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.