Warning: Illegal string offset 'status' in /home2/icentarb/public_html/icentar/print.php on line 190

Warning: Illegal string offset 'status' in /home2/icentarb/public_html/icentar/print.php on line 190

Warning: Illegal string offset 'status' in /home2/icentarb/public_html/icentar/print.php on line 190

Warning: Illegal string offset 'status' in /home2/icentarb/public_html/icentar/print.php on line 190

Warning: Illegal string offset 'status' in /home2/icentarb/public_html/icentar/print.php on line 190

Warning: Illegal string offset 'status' in /home2/icentarb/public_html/icentar/print.php on line 190

Warning: Illegal string offset 'status' in /home2/icentarb/public_html/icentar/print.php on line 190

Warning: Illegal string offset 'status' in /home2/icentarb/public_html/icentar/print.php on line 190

Warning: Illegal string offset 'status' in /home2/icentarb/public_html/icentar/print.php on line 190
iCentar » Racunari i oprema » Programirannje i baze podataka » Access » logovani korisnik - upis u tabeli
xl_kid 11.08.2011 21:46
Predmet:logovani korisnik - upis u tabeli

Postovani, napravio sam formu za logovanje (na netu sam nasao primere) ali imam problem prilikom upisa korisnika u tabeli tblLogovanje. Preko query-ja je ok. Problem: kako da dobijem korisnikovo ime i prezime i pregled logovanih korisnika. Do sada sam koristio ZXZ-ov primer sa padajucom listom korisnika i zadovoljan sam ali sad pokusavam uraditi bez padajuce liste pa trebam pomoc.

evo i primera
Prilozi:
Login.zip (Velicina datoteke:146.72 KB)

zxz 12.08.2011 09:08
Predmet:Re: logovani korisnik - upis u tabeli

Citat:
Do sada sam koristio ZXZ-ov primer sa padajucom listom korisnika i zadovoljan sam ali sad pokusavam uraditi bez padajuce liste pa trebam pomoc.

Ja te bas i nisam najbolje razumijo sta zelis da napravis.
Pogledao sam ovu formu ta logoovanja i na njoj je kod OK. Kao sto si napisao nisi htio padajucu listu nego tekst box i to si napravio. E sad neznam sta zelis jos da napravis?

xl_kid 12.08.2011 09:29
Predmet:Re: logovani korisnik - upis u tabeli

U tvom ranijem primeru se logovanja upisuju u tabeli A_Logovanja a preko Combobox-a dobijas logovanog korisnika (KorisnikID, Ime i ostali podaci). Mene interesuje kako te podatke da dobijem ovde preko txtbox-a. Preko Query-ja dobijam trenutno logovanog korisnika ali vise mi odgovara da te podatke dobijem preko koda kao sto je to u tvom primeru kao i upis logovanja u tabeli tblLogovanje.

zxz 12.08.2011 09:44
Predmet:Re: logovani korisnik - upis u tabeli

Vjerovatno ti mislis na vrijeme logovanja i vrijeme odlogiranja ili izlaza.
Jesam li u pravu.
To zelis da zapisujes u nekou tabelu?

xl_kid 12.08.2011 09:49
Predmet:Re: logovani korisnik - upis u tabeli

da, da. to je to.

zxz 12.08.2011 18:30
Predmet:Re: logovani korisnik - upis u tabeli

Evo ti na tvom primjeru.
Prilozi:
Login.zip (Velicina datoteke:147.35 KB)

xl_kid 12.08.2011 20:41
Predmet:Re: logovani korisnik - upis u tabeli

ovo je ono sto me je interesovalo. a kako da dobijem ime, prezime i ostale podatke o logovanom korisniku pomocu funkcije.
primer: function ImeKorisnika()
ImeKorisnika = ?
end function

nikako mi ne ide pa trazim pomoc. Disappointed

zxz 12.08.2011 21:14
Predmet:Re: logovani korisnik - upis u tabeli

PreuzmiIzvorni kôd (Visual Basic):
  1. Function KorisnickeP(Id As Integer)
  2. Dim Db  As DAO.Database
  3. Dim Rs As DAO.Recordset
  4. Dim SQL As String
  5. Dim I As Integer
  6. Dim Podaci As String
  7.  
  8.  
  9. SQL = "SELECT * FROM tblUsers WHERE KorisnikID=" & Id
  10.  
  11. Set Db = CurrentDb
  12. Set Rs = Db.OpenRecordset(SQL)
  13. For I = 1 To 5
  14. Podaci = Podaci & Rs.Fields(I) & ","
  15. Next I
  16. KorisnickeP = Left(Podaci, Len(Podaci) - 1)
  17. End Function

zxz 12.08.2011 22:25
Predmet:Re: logovani korisnik - upis u tabeli

Evo mozda ti je ova prikladnija:

PreuzmiIzvorni kôd (Visual Basic):
  1. Function PodaciKorisnika(ID As Integer, Fajl As String)
  2. PodaciKorisnika = DLookup(Fajl, "tblusers", "KorisnikID=" & 1)
  3. End Function

A pozvati mozes evo ovbako napr.
dim Prezime as string
Dim Ime as string
Prezime=PodaciKorisnika(KorisnikID,"Prezime")
Ime=PodaciKorisnika(KorisnikID,"Ime")

Obrazlozenje:
PodaciKorisnika(TvojaMemorijskaIDKorisnika,"Imepoljaiz kog citaspodatak)

xl_kid 12.08.2011 23:01
Predmet:Re: logovani korisnik - upis u tabeli

imam problema kad pozovem funkciju na formu frmMenu na polju Korisnik dobijem #Name?
gde gresim?