• 2 odgovora
  • 2.565 pregleda
traženje sloga u bazi 09.01.2006. u 18:48 · pre 253 meseci #1
kako da mi ovo proradi. trebam da upisem neki broj u text1.text i onda po njemu da mi nade u tabeli (mat) taj slog po ključu "ulica" (prvo polje u tabeli)
i kako da napravim opciju match tj. da dalje trazi jos ako ima jos takvih slogova.


probao sam nesto ovako, i zamjenit bb sa text1.text i bez kk i svakako al nikako ne uspjevam.. please help

.
.
Dim bb As String
Dim kk As Integer
bb = Text1.Text
kk = rsAdresar.Open "SELECT * from mat where ulica=bb", cnGlavna, adOpenDynamic, adLockOptimistic
rsAdresar.AbsolutePosition = kk
popunipolja
.
.
Re: traženje sloga u bazi 11.01.2006. u 15:03 · pre 253 meseci #2
Nije ti bas najjasniji kod ali pokusacu...


Ovako

Dim bb As String
Dim kk As Integer
bb = Text1.Text

'Pod pretpostavkom da si deklarisao promenljivu Dim rsAdresar as New Recordset
' i pod uslovom da ti je tekstualno polje u tabeli mat

rsAdresar.Open "SELECT * from mat where ulica= " & " ' " & trim(bb) & " ' ", cnGlavna, _ adOpenDynamic, adLockOptimistic

rsAdresar.MoveFirst

'Na formi iscrtaj komandno dugme i stavi Caption na "Trazi dalje..."

Private sub Command1_Click()

rsAdresar.MoveNext
popuniTextBoxove()

end sub

Za sada toliko, jer mi nije jasno sta si zeleo da kazes, ali se nadam da ce pomoci...
Re: traženje sloga u bazi 11.01.2006. u 18:44 · pre 253 meseci #3
http://www.elitesecurity.org/tema/154513-trazenje-sloga-bazi
Potpis
-Odracuonogakomijedrpiorazmaknicu.
-Ne rxdi mi txstxturx, kxd god hocu dx
ukucxm "x" onx ukucx "x".
-Ko kaaz e da ja neuummem da kuuca
m.
-Piše "Insert disk 3", a jedva sam i ova
dva ugurao u drajv
-Postoje samo dve osobe kojima
verujem, jedna sam ja, a druga nisi ti
Tema je zaključana, nove poruke nisu moguće.

Premeštanje teme