Novo

Forum kao aplikacija na telefonu

Dodajte forum na početni ekran i koristite ga kao aplikaciju, sa menijem na dnu ekrana.

Kako iz maticnog broja gradjana dobiti automatski datum rodjenja

  • 10 odgovora
  • 11.495 pregleda

Najnovija ↓

Kako iz maticnog broja gradjana dobiti automatski datum rodjenja 29.01.2007. u 18:27 · pre 240 meseci #1
U accessu sam formirao bazu podataka preko koje unosim tekuce pacijente u jednoj zdravstvenoj ustanovi.Preko obrasca(forms)unosim podatke.U polju forme jmb ubacujem maticni broj gradjana.Da li je moguce da u drugom polju forme u kojem mehanicki unosim datum i godinu rodjenja napravim vezu koja ce mi omoguciti da samim unosom jmb u jednom polju dobijem datum rodjenja u drugom polju,koje ce biti sacuvano u tabeli
Potpis
Dejan Stojanovic
Re: Kako iz maticnog broja gradjana dobiti automatski datum rodjenja 29.01.2007. u 21:11 · pre 240 meseci #2
Polje za JMBG mora biti tekstualno zbog vodećih nula. Na On Enter događaj polja datum koje se nalazi iza polja JMBG upiši sledeći kod.

Private Sub datum_Enter()
Dim dan As Long
Dim mesec As Long
Dim godina As Long
Dim datum As Date


dan = Left(Me![JMBG], 2)
mesec = Mid(Me![JMBG], 3, 2)
godina = Mid(Me![JMBG], 5, 3)

If godina > 900 Then
godina = godina + 1000
Else
godina = godina + 2000
End If

Me![datum] = DateSerial(godina, mesec, dan)

End Sub

U tabeli i na formi stavi format datuma recimo Short Date. Napravi masku recimo 00,00,00;0;0 za tabelu i 00.00.00;0;_ za polje na formi.
Potpis
https://mzahorjanski.wixsite.com/mzahorjanski
https://www.fiverr.com/miroljubzahorja?up_rollout=true
https://www.youtube.com/@miroljubzahorjanski


Re: Kako iz maticnog broja gradjana dobiti automatski datum rodjenja 30.01.2007. u 15:50 · pre 240 meseci #8
Citat:
dejanalfa: ljudi hvala uspeo sam al ima jedan problem!!!! Na maticni broj 12.05.956.256817 izbaci datum rodjenja 12/12/2005

Izvinite, ali gde ste videli JMBG koji sadrzi tacke u sebi?

Ocigledno je neophodna kompletna validacija da bi se korisnik obavestio da nije dobro upisao JMBG.
Prijavite se da biste odgovorili u ovoj temi.PrijavaRegistracija

Premeštanje teme