Pomoc oko baze podataka

Pomoc oko baze podataka 27.03.2004. u 15:36 · pre 275 meseci #1

Imam bazu podataka u kojoj su smestena polja SIFRA i IME.
Kako sad da napisem kod da kad unesem text u polje txtSifra i pritisnem taster ENTER da mi u polju txtIme automatski bude upisano ime za trazenu sifru. Znaci program otvara bazu i proverava sifru i upisuje ime.
Poz

Re: Pomoc oko baze podataka 27.03.2004. u 16:04 · pre 275 meseci #2

Pogledaj ovu temu.

Potpis

Blue Man Group

Re: Pomoc oko baze podataka 27.03.2004. u 16:30 · pre 275 meseci #3

Citat:

mladenovicz:
Pogledaj ovu temu.

Video sam i nista.
NEMA resenja mog problema

Re: Pomoc oko baze podataka 27.03.2004. u 22:09 · pre 275 meseci #4

U neku DB komponentu stavi da ti query izgleda ovako

select username from users WHERE password = '''+password.text+'''

Onda samo procitas (ako ije isto ko u ASPu onda je)

Record.Open
username.text = record("username")

fora je da mogu da ti se dese dve iste sifre.

Re: Pomoc oko baze podataka 28.03.2004. u 14:34 · pre 275 meseci #5

Citat:

byTer:
U neku DB komponentu stavi da ti query izgleda ovako

select username from users WHERE password = '''+password.text+'''

Onda samo procitas (ako ije isto ko u ASPu onda je)

Record.Open
username.text = record("username")

fora je da mogu da ti se dese dve iste sifre.

Mislim da nisam ukapirao ovo bas najbolje :)
Fora je u tome sto je ovo rad za skolu. Nesto kao seminarski. Treba napraviti program tako da kad uneses sifru artikla da ti program izbaci naziv tog artikla, cenu po jedinici mere, jedinicu mere... i tako to...
E sad ja sve podatke drzim u bazi podataka. Al' ne znam kako da napravim da kad unesem sifru artikla i pritisnem ENTER da mi se u ostalim tekstualnim poljima iscita ime artikla, cena...
Poz.

Re: Pomoc oko baze podataka 28.03.2004. u 15:44 · pre 275 meseci #6

Ja koristim Delphi, ali verovatno ima nekih komponenti kao sto su DBTextBox u delphiju koje povezes na DataSuorce (koji je povezan sa Recordsetom) tako da ti automatski prikazuje DB polja. A onda uradis ono od napred.

Re: Pomoc oko baze podataka 28.03.2004. u 16:32 · pre 275 meseci #7

Mozes i ovako.Postavi jedan textbox (nek bude Text1) kome ces dodeliti polje iz baze u kome su ti sifre i stavi visible false,zatim napravi jos dva textbox-a txtSifra i txtIme i textbox-u txtIme dodeli polje iz baze gde su smestena imena.I ukucaj sledeci kod u keypress event txtSifra

Code:
Private Sub txtSifra_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
db.Recordset.FindFirst "[ime polja gde su sifre] = " & Val(txtSifra.Text)
If db.Recordset.NoMatch = True Then MsgBox "U bazi ne postoji artikl sa unetom sifrom"
End If
End Sub

Ovo je kod pod uslovom da ti je polje gde su sifre neki number datatype(integer,long...), a ukoliko je string onda kod izmeni ovako

Code:
Private Sub txtSifra_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
db.Recordset.FindFirst "[ime polja gde su sifre] = '" & txtSifra.Text & "'"
If db.Recordset.NoMatch = True Then MsgBox "U bazi ne postoji artikl sa unetom sifrom"
End If
End Sub

Poz.

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

Forum kao aplikacija na telefonu

Srodne teme