Predmet:Re: logovani korisnik - upis u tabeli
PreuzmiIzvorni kôd (Visual Basic):Function KorisnickeP(Id As Integer)
Dim Db As DAO.Database
Dim Rs As DAO.Recordset
Dim SQL As String
Dim I As Integer
Dim Podaci As String
SQL = "SELECT * FROM tblUsers WHERE KorisnikID=" & Id
Set Db = CurrentDb
Set Rs = Db.OpenRecordset(SQL)
For I = 1 To 5
Podaci = Podaci & Rs.Fields(I) & ","
Next I
KorisnickeP = Left(Podaci, Len(Podaci) - 1)
End Function
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.